Bonjours,

Je me suis crée une ListBox Dynamiquement qui fonctionne correctement..,
mais dans ma procedure je ne sais pas comment déclarer l'evénement .OnDblClick.

example:


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
type
  TFrameBt1Confugurator = class(TFrame)
    ..
    procedure ListBoxQJobDblClick(Sender: TObject);
    ..
 
implementation
..
Procedure CreeWizardListBox;
Begin
  ..
  ListBoxQJob            := TListBox.Create(ToFrame1.TFramePanel2);
  ListBoxQJob.Parent      := ToFrame1.TFramePanel2;
  ..
  ListBoxQjob.OnDblClick  := ListBoxQJobDblClick;
 
end;
 
procedure TFrameBt1Confugurator.ListBoxQJobDblClick(Sender: TObject);
begin
    Showmessage('.. test');
end;

L'erreur est que le compilateur dit: ListBoxQJobDblClick n'est pas déclaré, comment la faire déclarer correctement dans ma procedure.


Grand Merci pour vôtre aide.
Salutations
Ardely