Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by MarcoWarm,
7. Sep 2005
zu der Zeichnung:
bei Paintbox.OnPaint wird ja deine Zeichnung erstellt... Was spricht dagegen das was bei dem Ereignis passiert in eine eigene Prozedur
MakeZeichnung(Canvas: TCanvas)
zu verschieben und dann im OnPaint der Paintbox und im StringGrid aufzurufen?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by MarcoWarm,
7. Sep 2005
du brauchst nicht erst ne Paintbox um irgendwas zu zeichnen.... du kannst direkt auf die Canvas der einzelnen Zellen zeichnen.
Im folgenden ein Beispiel, wie du Zellen einfärben kannst
procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
begin
if odd(ARow) then begin //bei ungeraden Zeilen
...