Array Rückgabewert Funktion

[Kuehter]

Vielen Danke für die Schnelle hilfe :thumb::-D

[himitsu]

In den Projektoptionen kann man auch einstellen, daß Results immer zugewiesen werden müssen (ist das Standardverhalten von ur-ur-uralten Delphiversionen). Dann gibt der Compiler eine Fehlermeldung aus, wenn man das Result nicht verwendet/zuweist.
Nur da Viele gern alle möglichen Results einfach so ignorieren, werden viele Codes nicht mehr kompilieren. :stupid:

[add]

Zitat:

habe nur bei dem hier immer einen stack overflow

Erstmal hättest du hier einen Haltepunkt auf die Fehlerzeile

Delphi-Quellcode:

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

machen sollen und dort mit dem Debugger nachschauen was im

Delphi-Quellcode:

rec

drin steckt.

Alternativ kann man in den Projektoptionen auch einfach mal die Bereichsprüfung aktivieren.
Diese baut dann Prüfcode in alle Array-Zugriffe und prüft, ob man auf gültige/existierende Indize zugreift.

[Jumpy]

Delphi-Quellcode:

  Result[4] := Result[0]+Result[2]; //engergebnis
  if (Result[4] = Result[0] + Result[2]) and (Result[4] = Result[1] + Result[3]) then
        Result[4] := Result[1]+Result[3]
  else
        ShowMessage('Die Zahlen stimmen nicht ');

Läßt sich der Part nicht "kürzen" zu:

Delphi-Quellcode:

  Result[4] := Result[0]+Result[2]; //engergebnis
  if (Result[4] <> Result[1] + Result[3]) then
    ShowMessage('Die Zahlen stimmen nicht ');