StringGrid Zelle wird erst nach verlassen der Zelle eingefär

[Chemiker]

Hallo mkinzler,

DefaultDrawing habe ich nicht verstellt, sie steht auf TRUE. Was meinst Du mit nur die Farbe setzen?

Mit Doppel-Click auf die Zelle, wird ein ColorDialog geöffnet und man kann die Farbe aussuchen.

Delphi-Quellcode:

procedure TfrmStringGridDemo.StringGrid1DblClick(Sender: TObject);
begin
  with Sender as TStringGrid do
  begin
    if ColorDialog1.Execute then
    begin
      Objects[Col,Row]:= pointer (ColorDialog1.Color);
      Invalidate;
    end;
  end;
end;

Bis bald Chemiker