Einzelnen Beitrag anzeigen

Benutzerbild von Nonsense
Nonsense

Registriert seit: 23. Nov 2002
389 Beiträge
 
Delphi 5 Standard
 
#1

### DrawGrid -> Farbwechsel funktioniert nicht ###

  Alt 25. Nov 2003, 22:38
Hallo Community,
ich möchte gerne in ein DrawGrid zeichnen. Soweit kein Problem.
Wenn ich jetzt ein Spalte/Zeile auswähle, wird die Farbe der Zelle auf Blau gesetzt. Das Problem ist aber, dass, solange die Zelle noch ausgewählt ist, die Farbe von der Markierung "überschrieben" wird.
D.h., erst wenn ich auf mein Formular oder auf eine andere Komponente klicke, wird das Blau in der Zelle sichtbar, ansonsten bleibt die Zelle weiß.
Gibt es eine Möglichkeit, dass meine Zelle nach dem Anklicken _sofort_ ein sichbares Blau zeigt?

Hier der Code:
Delphi-Quellcode:
procedure TFormMain.DrawGridDrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
  if (state = [gdSelected]) then
    with TDrawGrid(Sender), Canvas do
    begin
      Brush.Color := clBlue;
      FillRect(Rect);
    end;
end;
Danke!
  Mit Zitat antworten Zitat