Einzelnen Beitrag anzeigen

aschne1

Registriert seit: 18. Jul 2004
Ort: Davos
64 Beiträge
 
Delphi 2005 Professional
 
#6

Re: Tstringgrid einzelne Zellen färben

  Alt 26. Jul 2004, 23:15
Hallo Dragon27

Ich habe bei Delphi-Source.de folgendes gefunden. Es färbt zwar ganze Zeilen, doch ich denke so verstehst Du einmal das Prinzip wie Du vorzugehen hast.

Delphi-Quellcode:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  if odd(ARow) then begin //bei ungeraden Zeilen
    StringGrid1.Canvas.Brush.Color := clYellow;
    StringGrid1.Canvas.FillRect(Rect);
  end;
end;

mfg Armin
Armin
aschne1
  Mit Zitat antworten Zitat