Wenn du auf dem Canvas der Paintbox malen möchtest, dann musst du auch auf dem Canvas der Paintbox malen und nicht auf dem Canvas der Form!
Delphi-Quellcode:
procedure TForm1.PaintBox1Paint(Sender: TObject);
var
LCanvas: TCanvas;
begin
LCanvas := TPaintBox(Sender).Canvas;
LCanvas.Ellipse(100,100,400,400);
end;
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)