Visual Basic - Dibujar circulo perfecto en picture

Life is soft - evento anual de software empresarial
 
Vista:

Dibujar circulo perfecto en picture

Publicado por hernan (32 intervenciones) el 29/10/2006 00:52:25
Hola foro!
Alguien sabe como puedo hacer para dibujar un circulo cuyo centro este EXACTAMENTE en el centro del picture y cuyo diametro sea el ancho del picture? yo se como dibujar el circulo (lo estoy haciendo con el metodo circle) pero no consigo que el circulo este en el medio del picture. debe ser algo relacionado con la escala pero no lo se. gracias de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

RE:Dibujar circulo perfecto en picture

Publicado por ricaurtem (313 intervenciones) el 29/10/2006 00:56:34
bueno el centro del picture seria picture.with / 2 y picture.height / 2

ahora bien eso tiene un top y un left

si tengo tiempo te hago algo, pero esa es la idea.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Dibujar circulo perfecto en picture

Publicado por hernan (32 intervenciones) el 29/10/2006 01:03:51
gracias.
Esto es lo que hice (que no me funciona):

x = Picture1.Left + (Picture1.Width / 2)
y = Picture1.Top + (Picture1.Height / 2)
Picture1.Circle (x, y), (Picture1.Height / 2), vbBlack

ahora bien, mediante ensayo y error, esta me funcionó:

x = Picture1.Left + (Picture1.Width / 5.5) '
y = Picture1.Top + (Picture1.Height / 3.25) '
Picture1.Circle (x, y), (Picture1.Height / 2), vbBlack

Por que esos valores? que cosa mas extraña...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Dibujar circulo perfecto en picture

Publicado por Natalia Camino (88 intervenciones) el 29/10/2006 11:30:42
probas asi;

Picture1.Circle ((Picture1.ScaleWidth + Picture1.ScaleLeft) / 2, _
(Picture1.ScaleHeight + Picture1.ScaleTop) / 2), Picture1.ScaleWidth / 2, vbBlak

Para que esto funcione el picture debe tener igual ancho que alto.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Dibujar circulo perfecto en picture

Publicado por hernan (32 intervenciones) el 29/10/2006 18:59:44
gracias natalia! si funciono!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar