Paintbox sichtbar machen

[jaenicke]

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.