function mit zwei Rückgabewerten?

[Neutral General]

Zitat von Helmi:

Hallo

oder du verwendest "out"

Delphi-Quellcode:

procedure Test(out i: Integer; out S: String);
begin
  i := 123;
  S := DP;
end;

[edit]Delphi-Tags vergessen! Sorry! [/edit]

OT: Aber das muss sein: "Undefinierter Bezeichner 'DP'."

Also es gibt wie gesagt nur die 2-3 drei Möglichkeiten die ich grad nochmal zusammenfasse damit ich nicht nur OT geschrieben hab

1. Function gibt ein Record zurück

Delphi-Quellcode:

ABC = record
 A: String
 B: Integer;
 C: Boolean;
end;

function GetaABC: ABC;
begin
 ABC.A := 'Hallo';
 ABC.B := 22;
 ABC.C := true;
end;

2. Proceduren mit Out-Parametern

Delphi-Quellcode:

procedure GiveMeAnA(out AA: String);
begin
 AA:= 'A';
end;

3. Das gleiche mit Var-Parametern.

Gruß
Neutral General