D7. Un ListBox de Jedi ne répond pas au clic.

D7. Un ListBox de Jedi ne répond pas au clic. - Delphi/Pascal - Programmation

Marsh Posté le 17-11-2012 à 16:44:34    

Bonjour à tous
 
Lorsque je clique sur le JvListBox, avec ce code, Delphi ne le traite même pas (en mode pas à pas : je l'ai vu).
 

Code :
  1. procedure TForm1.JvListBox1Click(Sender: TObject);
  2. Var   Num_Elem_Pointe : integer;
  4. begin
  5.         Num_Elem_Pointe := Form1.JvListBox1.ItemIndex;
  6.         Form1.JvListBox1.Selected[Num_Elem_Pointe] := True;
  8.         Form1.JvListBox1.SetFocus;
  10. end;


 
Là, il répond, mais ne modifie pas l'ItemIndex (du coup, ça vient sans doute d'une grosse faute de moi) :
 

Code :
  1. procedure TForm1.JvListBox1MouseDown(Sender: TObject; Button: TMouseButton;
  2.   Shift: TShiftState; X, Y: Integer);
  3. Var   Num_Elem_Pointe : integer;
  5. begin
  6.         Num_Elem_Pointe := Form1.JvListBox1.ItemIndex;
  7.         Form1.JvListBox1.Selected[Num_Elem_Pointe] := True;
  9.         Form1.JvListBox1.SetFocus;
  10.         Traiter_Touche;
  12. end;


 
Ce n'est pas le comportement habituel du TListBox de Delphi. Un truc m'échappe :pt1cable:  
 
Merci  :hello:  

Reply

Marsh Posté le 17-11-2012 à 16:44:34   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed