Нарисовать треугольник Опции

[basics]

Народ помогите нарисовать простой треугольник в Delphi

[volvo]

Проще некуда:

procedure TForm1.Button1Click(Sender: TObject);
begin
  form1.canvas.MoveTo(100, 100);
  form1.canvas.LineTo(200, 200);
  form1.canvas.LineTo(  0, 200);
  form1.canvas.LineTo(100, 100);
end;

[мисс_граффити]

...или

Form1.Canvas.Polygon([Point(10,10),Point(200,200),Point(60,90)]);

[спасибо очень выручил]

Проще некуда:

procedure TForm1.Button1Click(Sender: TObject);
begin
  form1.canvas.MoveTo(100, 100);
  form1.canvas.LineTo(200, 200);
  form1.canvas.LineTo(  0, 200);
  form1.canvas.LineTo(100, 100);
end;

[plaquenil side effects when stop]

Kamagra Vente Libre Etats Unis

[discount generic viagra blue pil]

Viagra En Algerie

[do i need a doctor prescription]

Cialis Equivalent Viagra

[nishaknapp]

Why not settling on games that is fun and at the same time your earning. Well it'll make suspense because the game is well but dude just try it and it gave me hope while pandemic is real rn. Top 4 Casino Games Popular to Newbies and Veteran Players