Von C nach Delphi: Benötige Hilfe

[himitsu]

GetMem ist eine Prozedur

Delphi-Quellcode:

FUNCTION Rootptr: PTreeNode;
VAR t : PTreeNode;
BEGIN
  GetMem(t, SizeOf(^t)); 
  t.key   := -1;
  t.op    := '?';
  t.left  := NIL;
  t.right := NIL;
  Result  := t;
END;

in Delphi beendet Result nicht die Prozedur, also braucht man keine TempVariable

Delphi-Quellcode:

FUNCTION Rootptr: PTreeNode;
BEGIN
  New(Result); 
  Result.key   := -1;
  Result.op    := '?';
  Result.left  := NIL;
  Result.right := NIL;
END;