Aufruifen von Generic Anonymous methods

[peterbelow]

Zitat von TigerLilly:

Ich habe

Code:

 TBaseForm = class(TForm)
    procedure ShowHourGlass(Proc: TProc);
  ...
 end;

TbaseForm.ShowHourGlass(Proc: TProc);
begin
  Proc;
end;

Das funktioniert gut. Daselbe wollte ich für Methoden mit einem Parameter machen:

Code:

 TBaseForm = class(TForm)
    procedure ShowHourGlass(Proc: TProc<string>);
  ...
 end;

TbaseForm.ShowHourGlass(Proc: TProc<string>);
begin
  Proc(?);
end;

Aber wie rufe ich die Prozedur dann auf? Was übersehe ich?
Danke für jede Erleuchtung!

Du brauchst halt eine String-Variable oder Konstante, die innerhalb von Showhourglass sichtbar ist und die übergibst Du an Proc.