Forum: Object-Pascal / Delphi-Language
by TLAng,
17. Jul 2022
Auch Dir danke schön.
Es gibt ja immer verschiedene Lösungen. :thumb:
Forum: Object-Pascal / Delphi-Language
by TLAng,
17. Jul 2022
Hi himitsu,
herzlichen Dank für deine Hilfe. Das habe ich gesucht.:thumb:
Forum: Object-Pascal / Delphi-Language
by TLAng,
16. Jul 2022
Ich möchte abwechselnd blau und rote Zellen haben.
In einer Reihe sind 8 Zellen und ich habe 8 Reihen.
In der nächsten Reihe versetzt.
Forum: Object-Pascal / Delphi-Language
by TLAng,
16. Jul 2022
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if (Sender as TStringGrid).Cells <> '' then begin
(Sender as TStringGrid).Canvas.Brush.Color := clRed;
(Sender as TStringGrid).Canvas.FillRect(Rect);
end;
end;
Hier mein Code.
Forum: Object-Pascal / Delphi-Language
by TLAng,
16. Jul 2022
Hallo,
Ich bin am verzweifeln, bekomme es nicht hin.
Ich möchte ein DrawGrid diagonal mit einer Farbe füllen.
Bei mir werden immer die Spalten unterschiedlich gefüllt!
Kann mir einer einen Tipp geben? :)