+- Delphi Can (https://www.delphican.com)
+-- Forum: Delphi (https://www.delphican.com/forumdisplay.php?fid=3)
+--- Forum: Mobil Platform - FireMonkey (FMX) (https://www.delphican.com/forumdisplay.php?fid=7)
+--- Konu Başlığı: OrangeUI SkinFMXDBGrid Satırlara Resim Ekleme Hk. (/showthread.php?tid=4605)
Sayfalar:
1
2
Cvp: OrangeUI SkinFMXDBGrid Satırlara Resim Ekleme Hk. - egeven - 02-04-2020
Resimleri imagelist içine aldıktan sonra, onGetCellDisplayText eventi içinde SkinFMXImage3 ImageIndex değerini datadan gelen 'Status' kolonuna göre ayarlayabiliriz.
procedure TForm1.SkinFMXDBGrid1GetCellDisplayText(Sender: TObject;
ACol: TSkinVirtualGridColumn; ARow: TBaseSkinItem; var ADisplayText: string);
begin
SkinFMXImage3.Prop.Picture.ImageIndex:= FDMemTable1.FieldByName('Status').AsInteger-1;
end;
Örneğin yeni hali
[attachment=1047]
Cvp: OrangeUI SkinFMXDBGrid Satırlara Resim Ekleme Hk. - pro_imaj - 02-04-2020
(02-04-2020, Saat: 19:55)egeven Adlı Kullanıcıdan Alıntı: Resimleri imagelist içine aldıktan sonra, onGetCellDisplayText eventi içinde SkinFMXImage3 ImageIndex değerini datadan gelen 'Status' kolonuna göre ayarlayabiliriz.
procedure TForm1.SkinFMXDBGrid1GetCellDisplayText(Sender: TObject; ACol: TSkinVirtualGridColumn; ARow: TBaseSkinItem; var ADisplayText: string); begin SkinFMXImage3.Prop.Picture.ImageIndex:= FDMemTable1.FieldByName('Status').AsInteger-1; end;
Örneğin yeni hali
Cevap için teşekkür ederim.
Asıl sorun tablodan veriyi alamamaktı, çünkü sizin ilk mesajdaki gibi gridListPrepareDrawItem propery'den hareket etmeye çalışıyordum.
*Örnek ufak bir proje bir sorunun anlaşılması için çok önemli olduğu ortaya çıkmış oldu.
Teşekkürler.