Wie weist man einer Object Procedure eine Variable zu

[arnof]

Delphi-Quellcode:

type

 TUIPrintInteractionControllerCompletionHandler = procedure(printInteractionController: Pointer;
    completed: Pointer; error: Pointer) of object;

var 
 print:TUIPrintInteractionControllerCompletionHandler;


...

wie füllt man nun die Variable print mit leben ?

[Dejan Vu]

Hast Du es mal mit 'myProcvar := @MyProc' Versucht?

[himitsu]

In Delphi ist das @ bei Prozedur./Methodenzuweisungen optional.

Drum kann man auch Edit1.OnChange := MyProc; schreiben und muß nicht Edit1.OnChange := @MyProc; .
Bzw. es ist eigentlich andersrum, denn bei Mehthodenzeigern wird immer automatisch dereferenziert und man kann optional auch das @ benutzen.

Es gibt nur bestimmte Sonderfälle, wo man unbedingt das @ hinschreiben muß.

[Sir Rufo]

Delphi-Quellcode:

TFoo = class
  procedure Bar(printInteractionController: Pointer; completed: Pointer; error: Pointer);
end;

procedure FooBar;
var
  LFoo : TFoo;
  print : TUIPrintInteractionControllerCompletionHandler;
begin
  LFoo := TFoo.Create;
  print := LFoo.Bar;
end;

[arnof]

Vielen Dank, wieder was gelernt.

In meiner Not hatte ich dann eine Komponente erzeugt und ein property mit der Variable.