Procedure mit Variablen als Parameter

[sirius]

Klar geht das. Wie bei den API-funktionen eben nicht "var" nehmen sondern einen Zeiger auf deine Variable, hier PDouble:

Delphi-Quellcode:

procedure TMeinObject.EineKomplexeBerechnung(aWert1:Pdouble; aWert2:Pdouble; aWert3:Pdouble; aWert4:Pdouble;  aWert5:Pdouble);  //hier würde ja auch ein array of PDouble gehen
begin 

end;

Procedure TMeinObject.EineBerechnung; 
var 
  lWert4:double; 
  lWert5:double;
begin
  EineKomplexeBerechnung(nil,nil,nil,@lWert4,@lWert5); 
  ...
end;

Edit: Fehler (var) entfernt