Programación General > Delphi

 Imagen Con Onmouseover

(1/1)

Eman:
hola amigos, lo que quiero hacer es que el menu que tengo use imagenes como botones entonces lo que se me ocurrio es que al pasar el mouse la imagen se mueva para darle un toque interactivo, use un simple componente de Image, pero al usar el evento onMouseMove, si logro moverlo pero cada ves que el mouse se mueve por el perimetro de la imagen la mueve y termina perdiendose de la forma, hay algun componente que me ayude a hacer lo que quiero??? o como puedo solucionar esto?, gracias de antemano

Enko:
Puedes usar el componente TImage pero usando una Bandera para saber si la imagen se ya se movio y el raton sigue encima.

--- Código: Text --- TForm1   = class(TForm)...public   MoveFlag: Boolean;  
--- Código: Text --- TForm1.ImageOnMouseMove...begin  If MoveFlag then   begin     MoverImage.....     MoveFlag := not MoveFlag; //o MoveFlag := False;   end;end; TForm1.ImageOnMouseOut...begin     If not MoveFlag then   begin     MoverImage.....     MoveFlag := not MoveFlag; //o MoveFlag := True;   end;en;  

Navegación

[0] Índice de Mensajes