2014-03-04 2 views
2

FireMonkey 모바일 응용 프로그램의 양식에 TGridlayout 구성 요소를 사용하고 있습니다.TColorbutton (Delphi XE5 - Mobile App)에 텍스트 속성이 표시되지 않습니다.

런타임시 색상, 텍스트 및 이미지가있는 버튼을 만들고 싶습니다. TColorbuttonTimage 구성 요소를 사용하고 있지만 TColorbutton은 그림과 색상 만 표시합니다. Text 속성에 입력 한 텍스트가 나타나지 않습니다.

http://i.stack.imgur.com/nUN0S.png

어떻게 동적으로 (색상, 이미지 및 텍스트)와 버튼을 만들 수 있습니까?

답변

2

단추 내부에 동적으로 표제를 만들어야합니다. 예제는 여기에 있습니다 :

var btn:TColorButton; 
var testo:TLabel; 

     btn:=TColorButton.Create(panTastiera); 
     btn.Width:=200; 
     btn.Height:=65; 
     btn.Parent:=Form1; 
     btn.Position.X:=10; 
     btn.Position.Y:=10; 

     testo:=TLabel.Create(btn); 
     testo.Text:='Button 1'; 
     testo.OnClick:=btn.OnClick; 
     testo.Parent:=btn; 
     testo.FontColor:=$ffffff; 
     testo.TextAlign:=TTextAlign.Center; 
     testo.AutoSize:=true; 
     testo.Align:=TAlignLayout.Client; 

참고 : TColorButton.Create 매개 변수에 사용되는 "panTastiera", dinamically TImage의를 작성, 당신은 동일한 기능을 수행 할 수있는 이미지를 추가하려면 기본 폼

에 TPanel과입니다. 내 원래의 코드에서 I 버튼의 배열을 생성 한 이미지가

enter image description here

+1

지안루카와 같이, 응답 주셔서 감사합니다. 그것은 내가 필요한 것입니다. – user3378944