Einzelnen Beitrag anzeigen

Kuehter

Registriert seit: 14. Okt 2014
59 Beiträge
 
Delphi 7 Professional
 
#6

AW: Array Rückgabewert Funktion

  Alt 14. Okt 2014, 09:03
Ich hätte mal ne frage Wie kann ich ein Array result wieder auslesen?

Delphi-Quellcode:
type
Tintegerarray = array of integer;

function bedingung: Tintegerarray;

SetLength(result,6);
Result[0] := Generierer[0] + Generierer[1]; //A2 + A1 = C1
Result[1] := Generierer[2] + Generierer[0]; //B1 + A1 = C2
Result[2] := Generierer[1] + Generierer[3]; //A2 + B2 = D1
Result[3] := Generierer[2] + Generierer[3]; //B1 + B2 = D2
Result[4] := Result[0]+Result[2]; //engergebnis
und jetzt möchte ich gerne die werte wieder auslesen die ich in der Result bekomme

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
__________________________________________________________________________________________________________________
var
rec: Integerarray;

begin

Edit1.Text := InttoStr(rec[1]);

end;
habe nur bei dem hier immer einen stack overflow
nicht nur Delphi sondern auch Java und C# formen die Welt

Geändert von mkinzler (14. Okt 2014 um 11:08 Uhr) Grund: Delphi-Tags eingefügt
  Mit Zitat antworten Zitat