Projekt mit PaintBoxen funktioniert nich wie gewollt :/

[cetinbiryoldayim]

folgende also?

ZeichneBackground()
ZeichneMaskAndInhalt()
AusgabeViewingBox()
definiereMaskundInhaltRects()

und wenn ja wie sollte es dann aussehen wenn sie im OnPaint-Ereignis sind?

[mkinzler]

Ich würde zudem die Berechnung vom Zeichnen trennen.

[cetinbiryoldayim]

Gäbe es keine andere Möglichkeit? Wenn ich es über das OnPaint-Ereignis machen würde müsste ich nämlich alles umstellen.

Und ich denke auch nicht, dass die Rechtecke deswegen nicht verschoben werden weil es nicht mit OnPaint ist...
Habe ich vllt nicht doch irgendwo einen Fehler im Programm?

[cetinbiryoldayim]

juhuuu ich habs

procedure TForm1.ZeichneNeu();
begin
ZeichneBackground();
definiereMaskundInhaltRects();
ZeichneMaskAndInhalt();
AusgabeViewingBox();
end;

definiereMaskundInhaltRects() hatte gefehlt

nabend noch