Ellipse(x1,y1,x2,y2); !!!Résolu

Question

Salut

comment puis je dessiner un circle comme Victor ?
avec Photoshop on peut le cercle et l' déformer example :

mais avec Delphi :
procedure TForm1.Button1Click(Sender: TObject);
begin
  Canvas.Ellipse(0,0,200,200); // cet ça est ne pas un Victor  !
end;

BernieNoel68 · Accepted Answer

Bonjour, 

Peut etre en utilisant le composant TShape (pallette de composant Supplément) et en mettant sa propriété Shape à stEllipse

Bacterius · Answer

Bonjour, peut-etre qu'en utilisant Google associé à la touche F1 tu trouverais ton bonheur également ... Et clique sur réponse acceptée si la réponse de bernieNoel te convient !

Cordialement, Bacterius !

PS : "// cet ça est ne pas un Victor  !"  tu m'expliqueras ce que ça veut dire ...

Caribensila · Answer

NB :  Ce n'était pas Victor Hugo qui dessinait, mais sa fille Léopoldine:





« …





et, tout en écrivant, parmi mes manuscrits 
Je rencontrais souvent quelque arabesque folle 
Et qu'elle avait tracée...
 »

MiniProgramer · Answer

merci, TShape sont Victors
mais comment je peut copie cet Shape dans Image ?

je copie image2 dans Image1 comme ça:
Image1.Canvas.StretchDraw(Rect(0,0,100,100), Image2.Picture.Bitmap);

Ellipse(x1,y1,x2,y2); !!!

4 réponses

Votre réponse

Discussions similaires