Ver Mensaje Individual
  #4  
Antiguo 27-02-2020
compuin compuin is offline
Miembro
 
Registrado: oct 2010
Posts: 230
Reputación: 16
compuin Va por buen camino
Hola

Pero estoy usando este codigo que es el que me ha funcionado mejor a mi necesidad

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

 //   Ellipse(FormMain.Wheel.Canvas.Handle, 17, 17, 674, 674);

    Windows.Ellipse(FormMain.Wheel.Canvas.Handle,
                    Max((FormMain.Wheel.Width - FormMain.Wheel.Height) div 2, 0),
                    Max((FormMain.Wheel.Height - FormMain.Wheel.Width) div 2, 0),
                    -Max((FormMain.Wheel.Width - FormMain.Wheel.Height) div 2, 0) + FormMain.Wheel.Width,
                    -Max((FormMain.Wheel.Height - FormMain.Wheel.Width) div 2, 0) + FormMain.Wheel.Height);

Como lo ajusto aqui ?
Responder Con Cita