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 :
- procedure TForm1.JvListBox1Click(Sender: TObject);
- Var Num_Elem_Pointe : integer;
- begin
- Num_Elem_Pointe := Form1.JvListBox1.ItemIndex;
- Form1.JvListBox1.Selected[Num_Elem_Pointe] := True;
- Form1.JvListBox1.SetFocus;
- end;
|
Là, il répond, mais ne modifie pas l'ItemIndex (du coup, ça vient sans doute d'une grosse faute de moi) :
Code :
- procedure TForm1.JvListBox1MouseDown(Sender: TObject; Button: TMouseButton;
- Shift: TShiftState; X, Y: Integer);
- Var Num_Elem_Pointe : integer;
- begin
- Num_Elem_Pointe := Form1.JvListBox1.ItemIndex;
- Form1.JvListBox1.Selected[Num_Elem_Pointe] := True;
- Form1.JvListBox1.SetFocus;
- Traiter_Touche;
- end;
|
Ce n'est pas le comportement habituel du TListBox de Delphi. Un truc m'échappe 
Merci 
