Triângulo no Delphi - Canvas

01/07/2016

0

Olá pessoal..

Seguinte, quero desenhar um triângulo no Delphi por meio do Canvas.
Esse ponteiro servirá como um ponteiro de um gauge (speedometer).
Segue um exemplo do que quero: https://pixabay.com/static/uploads/photo/2013/07/12/14/53/speedometer-148960_960_720.png

Eu tenho o TPoint() para onde o ponteiro apontará, sei o ponto inicial, mas minha dificultade está em, por assim dizer, rotacionar o triângulo para ângulo correto.

Alguém poderia me ajudar?

Grato desde já.
Andrey

Andrey

Responder

Posts

04/07/2016

Andrey

Up...
Responder

04/07/2016

Mateus Ribeiro

Bom dia!
Olha dei uma breve pesquisada... Creio que dê para você adaptar no seu projeto!

var Points: array of TPoint;
begin
  SetLength(Points, 3);
  Points[0] := Point(5, 5);
  Points[1] := Point(25, 5);
  Points[2] := Point(30, 200);
  //Canvas.Pen.Width := 2;
  Canvas.Pen.Color := clYellow;
  Canvas.Brush.Color := clYellow;
  Canvas.Polygon(Points);
Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar