الرسم بواسطة canvas

[chamsderreche]

هذا هو الحل 

PHP كود :

procedure TForm1.FormCreate(Sender: TObject);
begin
paintbox1.canvas.rectangle(0,0,150,200);
paintbox1.canvas.rectangl(10,10,140,160);
    paintbox1.Canvas.Ellipse(75,170,20,20);
end;