Um auch mal die Alternative zu zeigen:
Delphi-Quellcode:
procedure MachIrgendwas(InputA, InputB: string; var OutputA, OutputB: string);
begin
[...]
OutputA := 'Balblub';
OutputB := 'Balblub';
end;
Und so kann man das ganze dann aufrufen:
Delphi-Quellcode:
var
s1, s2: String;
begin
[...]
MachIrgendwas('Text1', 'Text2', s1, s2);
ShowMessage(s1); //s1 enthält jetzt sozusagen das erste Ergebnis
ShowMessage(s2); //s2 enthält jetzt sozusagen das zweite Ergebnis
[...]
EDIT:
An sich würden sogar nur die beiden var-Parameter reichen, wenn du dort schon die Sachen übergibst.