Discussion :

[m14w]

Voila, plus bas j'ai posé une question pour savoir comment faire pour inserer une icone dans une listbox, cependant, je suis obligé de rafraichir les icones car celles ci s'effacent.
Donc je peux resoudre ce probleme de 2 manières.
Soit je rends l'affichage des icones relatif à une reference.
Soit je mets à jour cet affichage.
J'ai choisi la dernière option mais si vous savez comment faire pour rendre l'affichage des icones deroulant je prends aussi.

Pour faire simple j'ai besoin de savoir comment faire pour faire executer quelque chose au programme apres que j'ai fini de bouger les scrollbars.
genre je les bouges et quand j'ai fini il fait un truc.

[m14w]

resolu:

Code :

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

1
2
3
4
5
6
7
8
9
 
procedure TForm1.JvListBox2VerticalScroll(Sender: TObject;
  const Msg: TWMScroll; var DontScroll: Boolean);
 
 
begin
while( GetAsyncKeyState(VK_LBUTTON)=0 )
do  showmessage('truc');
end;

quand la touche de souris est lachée (plus de scroll) on affiche un showmessage, meme principe si on utilise les touhces du clavier.