methodenvariable "funktioniert" nicht wie erwartet"

[arturx]

Eine Methodenvariable lässt sich zuweisen, aber nicht erwartungsgemäß ausführen:

Code: Alles auswählen

type tintfunc = function : integer of object;
 // ......................
procedure TForm1.testit;
      var fi    : tintfunc;
          itest : integer;
   begin
       itest := getsomething;  // klappt natürlich
 
       fi    := @getsomething;
       itest := fi;   // <--- Diese Zuweisung bemängelt der Compiler 
    end;
//...........................
function TForm1.getsomething: integer;
   begin  result := 5;
    end;

Wo liegt der Denkfehler bzw. Wie gehts ?

[mse]

Vermutlich

Code: Alles auswählen

itest := fi();

[corpsman]

lol mse war schneller

Code: Alles auswählen

itest := fi();

du musst die Klammern machen damit der Compiler weis, dass du den Aufruf meinst, und nicht die Adresse.

Unter Delphi hättest du das nicht gemusst, ich hab auch ein Weilchen gebraucht bis ich mir das angewöhnt hatte.

[arturx]

W OW ...was seid Ihr schnell !!
Genau das ist die Lösung !
Vielen Dank

[mschnell]

Im Gegensatz zu Delphi folgt die Verwendung der von prozeduralen Variablen mit FPC stringenten logischen Regeln. Daher ist der Vode zwischen Delphi und Lazarus nicht kompatibel. Man braucht zusätzliche "@"s und "()"s.

-Michael

[lrlr]

auch unter delphi (5) muss man die klammer () manchmal machen .

ich weiß aber nicht mehr genau wann, ich glaub wenn es ein property ist und keine variable...

(oder so..)