type Func = function(X: Integer): Integer;
var
F: Func; P: Pointer; N: Integer;
F := Func(P); { Assign procedural value in P to F } Func(P) := F; { Assign procedural value in F to P }
@F := P; { Assign pointer value in P to F }
P := @F; { Assign pointer value in F to P }
N := F(N); { Call function via F }
N := Func(P)(N); { Call function via P } 请问最后一句是什么意思
var
F: Func; P: Pointer; N: Integer;
F := Func(P); { Assign procedural value in P to F } Func(P) := F; { Assign procedural value in F to P }
@F := P; { Assign pointer value in P to F }
P := @F; { Assign pointer value in F to P }
N := F(N); { Call function via F }
N := Func(P)(N); { Call function via P } 请问最后一句是什么意思
--->>
N := F(N);