Delphi - Movimientos en Delphi

 
Vista:

Movimientos en Delphi

Publicado por Fernando (2 intervenciones) el 19/07/2004 17:19:04
Hola!
Estoy haciendo mis primeras aplicaciones en delphi. Pero solo manejan Bases de Datos, no hacen demasiado.
Para mi proximo proyecto tenía en mente hacer que una imagen se mueva por el formulario.
Pero no consigo hacerlo.
¿Algien sabe de donde sacar informacion sobre esto?

La verdad es que me ayudaría mucho.
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

RE:Movimientos en Delphi

Publicado por Alfreny Herrera Arias (63 intervenciones) el 25/07/2004 13:38:13
Saludos Fernando

Primeramente si quieres mover una imagen por el teclado solo tienes que programar el evento onkeydown del form y poenes el siguiente codigo

if key = VK_LEFT then //si la tecla es = a la fecha a la izquierda then
begin
image1.letf := image1.left -1;
end;

y asi si quieres moverla con mas teclas

VK_rigth
vk_up
Vk_down
y asi estan las demas teclas del teclado con el codigo ascii

if key = # 13 then.... //si la tecla = enter entonces...
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: Movimientos en Delphi

Publicado por Fernando (2 intervenciones) el 26/07/2004 06:01:52
Buena la respuesta, aprendí algo nuevo (muy util)

Pero en realidad no es lo que busco, es mi culpa por no expresarme bien.

Lo que quiero saber es como hacer para que una imagen se mueva de un lado al otro del formulario "pero de tal modo que el usuario vea el movimiento"

Intenté con un codigo parecido a este

for x:=1 to 100 do imagen.left:=x;

Pero no consigo ver la imagen moverse.

Incluso intenté:

for x:=1 to 100 do begin
for i:=1 to 10000000 do ;
imagen.left:=x;
end;

Pero lo unico que logro es que el formulario no responda por un rato y luego la imagen aparece en su lugar. Pero no puedo ver el movimiento de la imagen.

Alguna 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