Discussion :

[Poisson Rouge]

bonjour, j'aimerais savoir si pour éviter d'avoir a ce répéter s'il etait possible de reprendre une procedure dans une autre ?

Merci davance

[antp]

quelque part dans le code du bouton1 tu mets :

Button2Click(Sender);

par exemple

(button2Click étant la procédure du code de bouton2)

[Smortex]

Moi je ferai plutôt :

Code :

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

1
2
3
4
5
6
 
procedure Button2OnClick(Sender: TObject);
begin 
  Bouton1.Click;
  // Code du bonton 2 ici
end;

Il est aussi possible de faire des fonction à part, et de les appeler ensuite :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
procedure Button1OnClick(Sender: TObject);
begin
  Fonction1(Param);
end;
 
procedure Button2OnClick(Sender: TObject);
begin
  Fonction1(Param);
  Fonction2(Param);
end;

Bon développement !

[Poisson Rouge]

Merci pour votre aide

C'est donc

Code :

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

Button2Click(Sender);

que j'ai utilisé et ca foctionne parfaitement