Entwickler-Ecke

Multimedia / Grafik - Grafische Komponenten verschwinden beim Zeichnen von Linien


Peter Wolf - Di 06.12.05 18:07
Titel: Grafische Komponenten verschwinden beim Zeichnen von Linien
Hallo Leute,

ich nehme Bezug auf einen Post von mir http://www.delphi-forum.de/topic_Gezeichnete+Linien+sind+weg_51920.html.
Mit dem Zeichnen (Verwendung von TBitMap) funktioniert es ja jetzt wunderbar, ohne dass beim Minimieren/Wiederherstellen die gezeichneten Linien verschwinden.
Nur hab ich jetzt das Problem, dass z.B. ein gesetztes Label oder irgend eine andere grafische Komponente beim Zeichnen verschwindet. Wie speichere ich mir das nun ab?

Vielen Dank im Voraus!
Grüße Peter


Peter Wolf - Mi 07.12.05 09:51
Hallo zusammen,

also, ich bin jetzt selber draufgekommen.
Ich muss jede Komponente im Ereignis "OnPaint" vom Form1 mit "Repaint" neu zeichnen lassen.

z.B.

Delphi-Quelltext 
1:
2:
3:
4:
5:
 
procedure TForm1.FormPaint(Sender: TObject);
begin
  BitBlt(Form1.Canvas.Handle,0,0,bmp.Width,bmp.Height,bmp.Canvas.Handle,0,0,SRCCOPY);
  Label1.Repaint;
end;


Grüße Peter


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!