Bei einem StringGrid etwa so:
Delphi-Quellcode:
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if (StringGrid1.Col = ACol) and (StringGrid1.Row = ARow) then
begin
StringGrid1.Canvas.Brush.Color := clRed;
StringGrid1.Canvas.FillRect(Rect);
end;
end;
Dies markiert das selektierte Feld rot.
Florian