Triângulo no Delphi - Canvas

Engenharia de Software

Delphi

01/07/2016

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

Curtidas 0

Respostas

Andrey

Andrey

01/07/2016

Up...
GOSTEI 0
Mateus Ribeiro

Mateus Ribeiro

01/07/2016

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);
GOSTEI 0
POSTAR