Es gibt auch Prozeduren, die dir etwas zurückgeben: (HIERBEI SIND MEHRERE OUT-/VAR-PARAMETER MÖGLICH)
Delphi-Quellcode:
procedure blah(x: integer; out y: integer);
begin
y := y + x;
end;
procedure blah2;
var
a, b: inetger;
begin
a := 1
b := 2;
balh(a, b);
//b = 3!
end;
Nach dem Aufrufen von blah(a, b) nimmt b den neuen Wert (y + x; also b + a) an.
möglich ist auch:
Delphi-Quellcode:
procedure blah(out a, b, c: integer; out x: extended {...});
//Edit: Schreibfehler
