Discussion :

[Yyukk]

Bonjour,
J'ai fait quelques recherches pour pouvoir changer une Timage lorsque l'on passe la souris sur cette dernière, mais les seules informations que j'ai trouvé sont d'appliquer un évènement OnMouseEnter pour changer l'Image et OnMouseLeave pour remettre l'ancienne.

Le soucis est que je ne connais pas du tout la façon de procéder... faut-il faire un code du genre TImage.Showmodal comme pour afficher une autre form lorsque l'on clique sur un bouton ?
Faut-il mettre les 2 TImage sur la même form ?

[Charly910]

Bonjour,

Si l'image est sous forme de fichier sur le disque tu fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

   Image1.Picture.LoadFromFile('C:\Dessin.bmp') ;

Sinon tu peux charger une image dans Image2 (invisible ou dans une autre fenêtre) et faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

     Image1.Picture := Image2.Picture  ;

@+ Charly

[Yyukk]

Bonjour,

Si l'image est sous forme de fichier sur le disque tu fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

   Image1.Picture.LoadFromFile('C:\Dessin.bmp') ;

J'ai essayé la première méthode en créant un évènement OnMouseEnter comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
procedure TForm1.Image6MouseEnter(Sender: TObject);
begin
Image1.Picture.LoadFromFile('C:\...');
end;

Le soucis est que l'image reprend pas les dimensions de la première alors que c'est exactement la même et s'affiche sur tout l'écran... le second, sur l'évènement OnMouseLeave que dois-je mettre pour revenir à l'ancienne image ?

Sinon tu peux charger une image dans Image2 (invisible ou dans une autre fenêtre) et faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

     Image1.Picture := Image2.Picture  ;

@+ Charly

J'ai créé une 2eme image, que j'ai placé sur la première, j'ai mis visible à false et dans l'évènement OnMouseEnter j'ai mis le bout de code écrit au dessus. Mais rien ne se passe.
J'ai peut-être mal interprété les choses... enfin c'est surement le cas

[pepi22]

aut-il faire un code du genre TImage.Showmodal comme pour afficher une autre form lorsque l'on clique sur un bouton ?

Hein?

Faut-il mettre les 2 TImage sur la même form ?

Déjà répondu.

Le soucis est que je ne connais pas du tout la façon de procéder

Messages Windows
Voici un lien qui fera l'affaire :http://delphi.about.com/od/adptips20...entersound.htm