[résolu] sous-menus dynamique et evennement onClick

sous-menus dynamique et evennement onClick [résolu] - Delphi/Pascal - Programmation

Marsh Posté le 04-11-2004 à 08:53:20    

Salut,
 
   Je suis en train de me faire des sous-menus dynamiques (du style les derniers fichiers ouverts) j'ai cherché un peu partout une solution pour leur rajouter du code dans leur evennement onClick mais là je sèche alors en même temps, est-ce qu'il est possible de le faire ?


Message édité par bill_clinton le 25-03-2006 à 02:16:38
Reply

Marsh Posté le 04-11-2004 à 08:53:20   

Reply

Marsh Posté le 04-11-2004 à 13:17:20    

Tu dois créer une méthode quelconque à la form ("OnClickGlobal" par exemple) ou autre objet, recevant un paramètre Sender de type TObject.
Ensuite quand tu crées tes items, tu assignes cette méthode :
nouvelItem.OnClick := OnClicGlobal;
Et dans OnClickGlobal tu mets ce qu'il faut faire quand un item est choisi :
 
if Sender = item1 then
 ...
else
if Sender = item2 then
 ...
etc.
 
Tu peux aussi mettre une valeur spéciale dans leur tag :
 
if Sender is TMenuItem then
  case TMenuItem(Sender).Tag of  
    1:  l'item qui a le tag 1
    2:  etc.
  end;
 
ou encore mettre dans le tag le pointeur vers l'objet qui gèras l'item, en faisant un cast bien bourrin.


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 06-11-2004 à 11:01:48    

salut, merci ca marche nickel

Reply

Marsh Posté le 02-11-2012 à 11:59:23    

bill_clinton a écrit :

salut, merci ca marche nickel


Reply

Marsh Posté le 02-11-2012 à 11:59:49    

Excellent, ça m'a bien aidé aussi !

Reply

Sujets relatifs:

Leave a Replay

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