|
Registriert seit: 10. Jun 2003
Ort: Berlin
9.857 Beiträge
Delphi 12 Athens
|
Re: Paintbox sichtbar machen
17. Mär 2009, 02:29
Das läuft eben nicht so wie du es dir vorstellst. In OnPaint musst du alles Zeichnen, was auch nach einem Neuzeichnen des Formulars da sein soll. Wenn das Formular nach dem Erzeugen und damit nach deinem Code angezeigt wird, wird alles, was du in OnCreate gezeichnet hast, überschrieben.
Du musst also entweder einfach OnPaint benutzen wie du es in dem Beispiel siehst oder du nimmst ein TImage statt der TPaintBox. In einem TImage werden die Inhalte bei einem Neuzeichnen nicht überschrieben.
|