[Onti]

Por ejemplo este código dibuja un circulo en el formulario al presionar el botón

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  Canvas.Ellipse(10,10,100,100);
end;