12-03-2020, Saat: 14:23
Merhaba,
Designer içinde yer alan bileşenlerin özelliklerini duruma göre değiştirebilirsiniz, OnPrepareDrawItem eventini kullanarak. (uses bölümüne uDrawCanvas, uSkinItems eklenmeli)
Örnek;
(burda label ve butonun özelliklerini değiştirdim fakat SkinFMXImage nesnesinin de özellikleri aynı şekilde değiştirilebilir,
örneğin SkinFMXImage1.Prop.Picture.SkinImageList atanmış ise SkinFMXImage1.Prop.Picture.ImageIndex istenilen şartlara göre değiştirilebilir)
Sonuç;
[attachment=1008]
Designer içinde yer alan bileşenlerin özelliklerini duruma göre değiştirebilirsiniz, OnPrepareDrawItem eventini kullanarak. (uses bölümüne uDrawCanvas, uSkinItems eklenmeli)
Örnek;
(burda label ve butonun özelliklerini değiştirdim fakat SkinFMXImage nesnesinin de özellikleri aynı şekilde değiştirilebilir,
örneğin SkinFMXImage1.Prop.Picture.SkinImageList atanmış ise SkinFMXImage1.Prop.Picture.ImageIndex istenilen şartlara göre değiştirilebilir)
procedure TForm28.SkinFMXListBox1PrepareDrawItem(Sender: TObject; ACanvas: TDrawCanvas; AItemDesignerPanel: TSkinFMXItemDesignerPanel; AItem: TSkinItem; AItemDrawRect: TRect); begin SkinFMXListBox1.BeginUpdate; if AItem.Detail='EASY' then begin l_duel_zorluk_taban.Material.BackColor.FillColor.Color:=$FF27BA27; //YEŞİL b_duel_accept.enabled:=true; end; if AItem.Detail='HARD' then begin l_duel_zorluk_taban.Material.BackColor.FillColor.Color:=$FFE1442B; //KIRMIZI b_duel_accept.enabled:=true; end; if AItem.Detail='MASTER' then begin l_duel_zorluk_taban.Material.BackColor.FillColor.Color:=$FF8A2BE1; //MOR b_duel_accept.enabled:=FALSE; end; SkinFMXListBox1.EndUpdate; end;
Sonuç;
[attachment=1008]

