Einzelnen Beitrag anzeigen

Benutzerbild von sx2008
sx2008

Registriert seit: 15. Feb 2008
Ort: Baden-Württemberg
2.332 Beiträge
 
Delphi 2007 Professional
 
#7

AW: Paintbox problem

  Alt 29. Aug 2011, 01:42
Besser das Bitmap nur im OnPaint auf das Canvas der Paintbox kopieren: http://www.michael-puff.de/Programmi...enBitmap.shtml
Das OffscreenBitmap verhindert das Flackern beim Zeichnen entbindet aber nicht von der Pflicht nur innerhalb des OnPaint-Event auf den Canvas der Paintbox zuzugreifen.
Wann immer die Paintbox durch ein Fenster (auch teilweise) verdeckt und dann aufgedeckt wird, feuert das OnPaint-Event.
Daher ist das OnPaint-Event die einzig richtige Stelle um etwas auf dem Canvas der Paintbox zu zeichnen.

Borland hat leider den Fehler begangen, den Canvas als public Property freizugeben.
Um die Programmierer vor falscher Handhabung zu schützen hätte man den Canvas protected anlegen müssen.
Damit man dann überhaupt auf dem Canvas zeichnen kann müsste das Paintevent so aussehen:
TOnPaintEvent = procedure(Sender:TObject; Canvas:TCanvas) of object; So wäre man gezwungen, nur im OnPaint-Event auf den Canvas zuzugreifen und es gäbe keine Fehler.
  Mit Zitat antworten Zitat