Delphi-Quellcode:
procedure TForm1.Button1Click(sender: TObject);
var
String1, String2, Text : string;
begin
Text := Button1.Caption; // oder was für ein Text auch immer
Teilen(Text, String1, String2);
ShowMessage(String1); // in string1 liegt nun die Ausgabe von Output1
ShowMessage(String2); // in String2 liegt die Ausgabe von Output2
end;
procedure Teilen(input:string; var output1, output2: string);
begin
...
output1 := 'xyz'; // eine Hälfte von Text
output2 := '123'; // andere Hälfte von Text
end;
Du übergibst also einen festen Werte an die Prozedur zum Teilen, sondern Du reichst variablen weiter, in die dann der neue Wert geschrieben wird. Das sind output1 und output2.