Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Farbanje redova u dbgrid-u

[es] :: Pascal / Delphi / Kylix :: Farbanje redova u dbgrid-u

[ Pregleda: 2358 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

MatezYU

Član broj: 4114
Poruke: 1586
*.adanet.co.yu.



+17 Profil

icon Farbanje redova u dbgrid-u08.06.2006. u 12:01 - pre 217 meseci
Kako mogu da resim sledeci problem... Recimo ako je vrednost nekog podatka u bazi veca od 1000 onda ceo taj red u dbgrid-u da se ofarba u zeleno a ako je manji od 1000 onda u crveno... Cisto kao neka vizuelna kontrola...
Hvala
 
Odgovor na temu

_deran_

Član broj: 69493
Poruke: 252
*.suonline.net.



+1 Profil

icon Re: Farbanje redova u dbgrid-u08.06.2006. u 13:29 - pre 217 meseci
Code:
 
procedure Tform1.DBGrid1DrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
begin
 if podatak.asinteger>=1000 then
    DBGrid1.Canvas.Font.Color := clgreen
      else
    DBGrid1.Canvas.Font.Color := clred;
  DBGrid1.DefaultDrawDataCell (Rect, Column.Field, State);
end;
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Farbanje redova u dbgrid-u

[ Pregleda: 2358 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.