Double-Pointer als Int-Parameter übergeben und zurück

[adk]

Theoretisch ist alles nun korrekt bei mir, aber genanntes Problem der 'Rückkonvertierung' (Zahl mit vielen Nachkommstellen) bleibt bestehen. Mein jetziger Stand:

Delphi-Quellcode:

procedure ProcedureA(Gewicht : double)
begin
ProcedureB(Integer(@Gewicht))
end;


procedure ProcedureB(intWert: integer)
var
  Gewicht: double
begin
  Gewicht := PDouble(intWert)^;
end;

Inzwischen habe ich das auch selbst (wieder) verstanden (ich komme aus der C++ Welt, dann C#, jetzt Delphi), in der Theorie bzw. vom Verständnis her macht das sinn und sollte funktionieren. Bei der Rückkonvertierung wird der IntWert wieder in einen Double-Zeiger konvertiert und anschliessend der Wert ausgelesen. Habe ich vielleicht noch etwas vergessen? Initialisierungen? New-Operator?