Ver Mensaje Individual
  #2  
Antiguo 05-08-2005
Avatar de epuigdef
epuigdef epuigdef is offline
Miembro
 
Registrado: jul 2005
Posts: 196
Reputación: 19
epuigdef Va por buen camino
puedes simular un recorrido de la siguiente forma:

Declara 2 variables globales al form, llamadas posx y posy.

Pincha un objeto TTimer en el formulario, y dale un tiempo de 100 ms

En el onclick del botón activas el Timer:
Timer.active := true;

En el evento que se disparará del timer cada 100 ms le pones el siguiente código:

image.left := posx;
image.top := posy;
if posx < 300 then
posx = posx + 1;
if posy < 300 then
posy = posy + 1;

self.repaint;

if (posx>=300) and (posy >= 300) then
timer.enabled := false

Esto te llevará la imagen en diagonal hasta las coordenadas (300,300)
Para cambiar la velocidad modifica los 100 ms del timer

Para darle un camino deberças jugar con los incrementos de las coordenadas posx y posy.

Lo importante es el self.repaint, si no lo pones no vas a ver nada hasta el final!

Suerte!

Edu
Responder Con Cita