Bonjour.
Comment faire pour passer une procédure en parametre d'une méthode et l'executer dans cette méthode ?
Du genre ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 procedure MaProd; ... procedure TraiterProc(AProcEnParam: ...); begin // Executer AProcEnParam ... ShowMessage('Procedure terminée'); end; procedure TFormMain.actActionExecute(Sender: TObject); begin TraiterProc(MaProd); end;
Partager