Paramètre de fonction

Bonjour a tous.

J'ai une petite question assez béte mais qui me pourrit la vie.

je veux utiliser la procédure suivante :

Code:

---

procedure Button1Click(Sender: TObject)

---

J'ai donc mit dans mon code :

Code:

---

Button1Click();

---

Mais que dois-je mettre en parametres, car à la compilation
j'ai le message suivant :

Citation:

---

[Erreur] Unit1.pas(351): Pas assez de paramètres originaux

---

"

Merci !

Reynald.

Essaye avec

Code:

---

1 2	TreeView1Click(Sender);

---

La definition d'un evenement de type Click est :

Citation:

---

Procedure (Sender : TObject) of Object;

---

Donc le parametre est l'objet qui a declanché l'evenement (ie : Appelé la methode)

Donc la plupart des cas c'est "Sender" car on l'appele depuis un autre evenement (donc on l'objet qui declanche manuelement le clic est le meme que celui qui a declanché l'evenement en cours).

Sinon on met Self, c'est a dire d'objet qui execute la methodedans laquelel on appele l'evenement Click.

Enfin, si on l'appelle depuis une procedure "libre" (non methode d'objet) ou bien que l'on souhaite simuler une action sur un objet, on met "nil" (si on a pas besoin de connaitre l'objet declancheur) ou une variable derivant de TObject (si on souhaite faire croire que l'objet qui a declanché l'evenement et cet objet.)

C'est déjà trés bien expliqué peut être que je vais faire de trop, mais c'est pour mieu t'orienter.
Tu peux mettre aussi en argument le nom de ton boutton bouton1

Code:

---

Button1Click(Button1);

---

car si tu aurais l'idée d'affecter ce même événement à plusieurs objet et que tu auras a tester sur l'objet ayant effectué l'évenement tu testera surement sur sender Comme :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

procedure Button1Click(Sender: TObject); begin if sender = Button1 then begin {.......} end else if sender = TreeView1 then begin {.......} end {... et ainsi de suite} end;

---

Tout ce qui a été dit plus haut est vrai, cependant là je crois qu'on t'embrouille plus qu'on ne te donne de solution.
:fleche: A moins que tu ne te serves du paramètre Sender dans la proc que tu appelles, passe nil comme argument :

Code:

---

Button1Click(nil);

---

Merci Beaucoup

ça marche

Reynald.

Citation:

---

A moins que tu ne te serves du paramètre Sender dans la proc que tu appelles, passe nil comme argument :

---

En effet .... mais personnelement je prefere qu'on passe plus de temps a trouver la solution mais en ayant compris pourquoi on met "ca" et pas "ca" ... plutot que mettre en place une solution "miracle" qui marche sans vraiement avoir compris pourquoi ;p