Moin!
Vielleicht klappt es in der FormCreate so:
Code:
procedure TForm1.FormCreate(Sender: TObject);
begin
PaintBox1.Canvas.Brush.Color := clblack;
PaintBox1.Width := ClientWidth ;
PaintBox1.Height := ClientHeight ;
end;
Weil die Form1 Instanzenvariable innerhalb der Klasse zu verwenden ist gefährlich und kein einzigen Sinn/Nutzen...
MfG
Muetze1