MIky
16 de Septiembre del 2004

Saludos a todos, por casualidad alguien sabrá como hacer dinamizar un control line de manera que pareciera como si se estuviera moviendo (como una fila de hormigas)

mvallejos
16 de Septiembre del 2004

Jugando con las propiedades X1,Y1,X2,Y2 que son las coordenadas de inicio y final
Cada vez que cambies el valor de esas propiedades para simular movimientos llama a DoEvents para refrescar la pantalla

Ejemplo de un ida y vuelta del Line

Dim i as Integer
' Ida
For i = 1 To 5
Line1.X1 = Line1.X1 + 180
Doevents
Next i

' Vuelta
For i = 1 To 5
Line1.X1 = Line1.X1 - 180
Doevents
Next i

mvallejos
16 de Septiembre del 2004

Me faltó agregar algo, entre movimiento y movimiento, vas a tener qye generar algún retardo, podés usar la función API Sleep