Thema: Delphi Was ist TGridDrawState

Einzelnen Beitrag anzeigen

Benutzerbild von Martin K
Martin K

Registriert seit: 20. Okt 2005
919 Beiträge
 
Turbo Delphi für Win32
 
#6

Textfarbe in einem StringGrid ändern (bestimmter Bereich)

  Alt 4. Nov 2005, 18:24
Hab's jetzt selber rausgefunden, das geht so:
Delphi-Quellcode:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  If (ACol=5) and (ARow=5) then //für die Zelle 5,5
  begin
    StringGrid1.Canvas.Font.Color:=clRed;
    DrawText(StringGrid1.Canvas.Handle,PChar(StringGrid1.Cells[ACol,ARow]),Length(StringGrid1.Cells[ACol,ARow]),Rect,0);
  end;
end;
  Mit Zitat antworten Zitat