Discussion :

[LaurentC33]

Bonjour,

Petite question spéciale, il me semble avoir vu cette syntaxe une fois, mais impossible de la reproduire.

Ex

J'ai un form principal avec juste un bouton. La déclaration :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
type
  TCallback = procedure;
 
  TMainForm = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
    callBack : TCallback;
  end;
 
var
  MainForm: TMainForm;

Il me semble qu'il était possible d'écrire quelque chose comme ça:

Code :

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

1
2
3
4
5
6
7
8
9
10
 
procedure Init;
begin
 
  MainForm.callBack := procedure
  begin
    ShowMessage('hello world');
  end;
 
end;

C'est à dire, ne pas être obligé de déclarer la méthode que je vais assigner a "callback" du form, juste y mettre son contenu.

Je me trompe ?

[Linkin]

Ce que tu cherches s'appelle une méthode anonyme:
http://docwiki.embarcadero.com/RADSt...es_dans_Delphi

Par contre, je n'ai pas eu l'occasion d'essayer;

[LaurentC33]

Wouaw rapide !!
Merci beaucoup, c'est exactement cela !