function mit 2 ausgabewerten

[Phoenix]

Du musst den Record doch erst vorher noch definieren.

Delphi-Quellcode:

var Adresse: record
  name: string;
  plz: integer;
  ort: string;
end;

function AdresseFinden(a, b:string): Adresse;
begin
  Result.Name := 'String 1';
  Result.Plz := 'String 2';
  Result.Ort := 'String 3';
end;