Discussion :

[mickael.be]

Hello,

J'ai beau chercher, je ne trouves pas.

J'ai une procédure existante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 
... mon code ...
 
end;

Jusque là, tout est normal.

Mais j'ai un Timer, et dans ce Timer je voudrais simuler un Click sur le BitBtn1

J'ai essayé TForm1.BitBtn1Click();

Mais ca va pas ...

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

Si quelqu'un sais..
Merci!

[Selve]

salut

comme ca

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
   form1.BitBtn1.Click();
end;

[mickael.be]

Bizzare... ca semble pas trop dans la logique.. mais ca marche ! Merci !

[jmjmjm]

sinon tu fais

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
BitBtn1Click(Self);

Sa marche aussi c'est ce que j'utilise