Das ist nur über ein Array oder einen Record möglich.
Oder aber über var.
Delphi-Quellcode:
procedure Bla(var a, b: Integer; c: Integer);
begin
a:=c-1;
b:=c+1;
end;
var bedeutet nichts anderes, als dass die Variable, die du übergibst, direkt verändert wird.