DBGrid satırları renklendirme

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
fazil14
Üye
Mesajlar: 46
Kayıt: 31 Ağu 2003 02:40
Konum: eskişehir

DBGrid satırları renklendirme

Mesaj gönderen fazil14 »

iyi günler DBGrid'de istediğim satırı istediğim renge nasıl dönüştürürüm

yani satırlar
sarı
kırmızı
mavi
kırmızı

olabilsin.
ilgilendiğiniz için teşekkürler.
Kullanıcı avatarı
lazio
Moderator
Mesajlar: 1526
Kayıt: 11 Tem 2003 04:55
Konum: İstanbul

Mesaj gönderen lazio »

dataset içindeki bir bilgiye göre;

DrawColumnCell
if DbGrid3.DataSource.DataSet.FieldByName('print').Value = 't' then
begin // irsaliye yazdırılmış ise skyblue renkte
DbGrid3.Canvas.Font.Color := clNavy;
DbGrid3.Canvas.Brush.Color := clSkyBlue;
DbGrid3.Canvas.FillRect(Rect);
DbGrid3.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;

kayıt no.suna göre
DrawDataCell
if odd(DBGrid1.DataSource.DataSet.RecNo) then
DBGrid1.Canvas.Brush.Color := clWhite
else
DBGrid1.Canvas.Brush.Color := clSkyBlue;
DBGrid1.DefaultDrawDataCell(Rect, Field, State);
Cevapla