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

Delphi-Quellcode:

@

bei Prozedur./Methodenzuweisungen optional.

Drum kann man auch

Delphi-Quellcode:

Edit1.OnChange := MyProc;

schreiben und muß nicht

Delphi-Quellcode:

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.