Probleme avec mon menu ....

Probleme avec mon menu .... - Delphi/Pascal - Programmation

Marsh Posté le 02-01-2003 à 15:56:02    

Voila
 
 
j'ai un menu avec un sous menu  
 
 
comment faire pour que ce sous menu renvoi a la meme procedure qu'un bouton dont le name est ajouter
 
jai essaye de donner la meme proprieté name a mon sous menu mais ca ne marche pas ...
 
 
Merci

Reply

Marsh Posté le 02-01-2003 à 15:56:02   

Reply

Marsh Posté le 02-01-2003 à 18:14:36    

c'est tout simple il te suffit de brancher l'évenement onClick de ton menu sur la procedure de ton bouton

Reply

Marsh Posté le 02-01-2003 à 18:56:25    

Ca ne marche pas ...  
le prog ne se compile pas .
jai pas le message devant les yeux mais c un truc du genre :
ca ne marche pas car la procedure appartient a un bouton ...
 
 

Reply

Marsh Posté le 02-01-2003 à 19:21:58    

en fait je metais planté
 
 
donc jai un bouton de name "ajouter"
une procedure ajouterClick
 
 
un menu de name "menu_ajouter"
une procedure menu_ajouterclick
 
je veux que ma procedure menu_ajouterclick
lance la procedure ajouterclick
 
jai essayé :  
 
procedure TForm1.Menu_AjouterClick(Sender: TObject);
begin
ajouterClick;
end;
 
 
mais ca marche pas il me dit quil manque des parametre  
 
 
 

Reply

Marsh Posté le 02-01-2003 à 20:11:43    

tu es sur que tu as fais ce que j'ai dit ? moi non...
 
sélectionne ton menu, affiche l'inspecteur d'objet, va dans l'onglet evenement puis dans l'evenement OnCLick tu vas retrouver obligatoirement AjouterClick...
 
sinon pour appeler AjouterClick "manuellement" dans ton exemple tu dois faire AjouterClick(Sender);

Reply

Marsh Posté le 02-01-2003 à 22:00:21    

La première solution est évidemment beaucoup plus propre (faire le raccord via l'éditeur de propriétés/événements plutôt que d'appeler l'autre truc via du code)


Message édité par antp le 02-01-2003 à 22:00:27

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

Marsh Posté le 02-01-2003 à 22:20:16    

Merci

Reply

Sujets relatifs:

Leave a Replay

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