gridde istenilen satırın rengini değiştirme?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
buraksandikci
Üye
Mesajlar: 9
Kayıt: 24 Ağu 2004 12:31
Konum: İzmir/Bornova - Balıkesir

gridde istenilen satırın rengini değiştirme?

Mesaj gönderen buraksandikci »

arkadaşlar bi programda grid kullandım kar zarar alanlarım var zarar olanları
dbgridde başka bi renkte olmasını istiyorum grid tek satırını nasıl kontrol edebilirim veya başka bir grid tavsiye edebilirmisiniz ?
Madem TÜRK'sün Kullan gücünü tüm dünya görsün
Kullanıcı avatarı
cuneyt22
Üye
Mesajlar: 213
Kayıt: 07 Şub 2004 03:32
İletişim:

Mesaj gönderen cuneyt22 »

hocam bu konu hakkında araştırma yaparsan bir sürü dokuman kod bulabilirsin renk yada grid renk diye arat çok sayıda sayfa gelir..kolay gelsin
Kullanıcı avatarı
huseyinert
Üye
Mesajlar: 233
Kayıt: 19 Nis 2005 06:49
Konum: Bartın

Mesaj gönderen huseyinert »

Kod: Tümünü seç

procedure Tcek_rap_tl.DBGrid1DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
begin
 if gdSelected in State then Exit;

  if DBGrid1.DataSource.DataSet.FieldByName('Tahsilat').Value='Yapıldı' then
    DBGrid1.Canvas.Brush.Color :=clInactiveCaptionText
  else
    if DBGrid1.DataSource.DataSet.FieldByName('Tahsilat').Value='Yapılmadı' then
      DBGrid1.Canvas.Brush.Color :=clGradientInactiveCaption;

  DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
bu kod ile tahsilat yapılanlar ile yapılmayanları farklı renkte görebilirsin
umarım işine yarar.

kolay gelsin
"Kula bela gelmez Hak yazmayınca,Hak bela yazmaz kul azmayınca..." MEVLANA
Cevapla