Hallo,
ich habe mal wieder ein Problemchen.
Ich habe ein Stringgrid und möchte, dass der Text der 1. Zeile in rot erscheint.
Daher habe ich in das OnDrawEvent des Grids folgendes eingebaut:
Delphi-Quellcode:
procedure TForm1.gridDrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if (ARow=0) then
grid.Font.Color := clRed
else
grid.Font.Color := clBlack;
end;
Dummerweise ist nun die 2.(!) Zeile rot und das ganze Grid flackert, als würde es permanent neu gezeichnet.
Was habe ich denn falsch gemacht?
