Centrar ellipse en TImage

[compuin]

Buenas noches foro

Estoy tratando de colocar un circulo a traves de una ellipse en un TImage pero por mas que lo intento no logro que me quede completamente centrado

El TImage tiene estas dimensiones

Código Delphi [-]
  FormMain.Wheel.Top := 10;
  FormMain.Wheel.left:= 250;
  FormMain.Wheel.Height:= 650;
  FormMain.Wheel.Width:= 1000;

En cuanto al circulo, lo estoy realizando con estas dimensiones

Código Delphi [-]
Ellipse( 17, 17, 674, 674 );

Segun he leido, los 2 ultimos valores son el alto y largo del circulo pero con los 2 primeros trato de posicionarlo en el centro del TImage pero no funciona. So estos valores como una coordenada?

Cual es la manera correcta de posicionarlo?

Gracias de antemano

[[kuan-yiu]]

La única vez que hice algo parecido los parámetros indicaban otra cosa: las coordenadas del rectángulo en el que está inscrita la elipse, vértice superior izquierdo, vértice inferior derecho.

Código Delphi [-]
Ellipse(0, 0, dibujo.Width, dibujo.Height);

Supongo que ese procedimiento estará sobrecargado, asegúrate de estar usando la versión que te interesa o prueba otra a ver si se ajusta más a lo que necesitas.

[Neftali [Germán.Estévez]]

En estos casos el refrán de, "Una imagen vale más que 1000 palabras", vendría muy bien.

También me queda la duda de si el procedimiento que estás utilizando es el de TCanvas.

[compuin]

Empezado por Neftali [Germán.Estévez]

En estos casos el refrán de, "Una imagen vale más que 1000 palabras", vendría muy bien.

También me queda la duda de si el procedimiento que estás utilizando es el de TCanvas.

Si, utilizo TCanvas

En un instante subo la imagen

[Neftali [Germán.Estévez]]

Si usas el camvas de la imagen, puedes usar algo como esto:

Código Delphi [-]
  Wheel.Canvas.Pen.Color := clRed;
  Ellipse(Wheel.Canvas.Handle, 0, 0, Wheel.Width, Wheel.Height);

Si usas el del formulario, tendrás que ajustar esas coordenadas.

[compuin]

Aca la imagen

[compuin]

Empezado por Neftali [Germán.Estévez]

Si usas el camvas de la imagen, puedes usar algo como esto:

Código Delphi [-]
  Wheel.Canvas.Pen.Color := clRed;
  Ellipse(Wheel.Canvas.Handle, 0, 0, Wheel.Width, Wheel.Height);

Si usas el del formulario, tendrás que ajustar esas coordenadas.

Con este codigo aun no logra centrar el circulo

[Neftali [Germán.Estévez]]

A mi me sale centrado.
En negrio el original, en rojo el que te he puesto.