Hola Fernando.
<<Se complica bastante
No para VFP jajaja , viendo un ejemplo del profe Luis María
Dibujando polígonos con VFP 9.0 se me ocurrió, usar line en lugar de shape, en el command button tengo:
SELECT * FROM rsmedida INTO ARRAY ThisForm.Line1.aOct
SELECT * FROM rsmedida INTO ARRAY ThisForm.Line2.aOct
SELECT * FROM rsmedida INTO ARRAY ThisForm.Line3.aOct
ThisForm.Line1.PolyPoints = "ThisForm.Line1.aOct"
ThisForm.Line2.PolyPoints = "ThisForm.Line2.aOct"
ThisForm.Line3.PolyPoints = "ThisForm.Line3.aOct"
y listo.
No tiene esas líneas suavizadas pero me gusta, Ahora toca clasear.
Saludos.
Mauricio
