function mit zwei Rückgabewerten?

[H4ndy]

Zitat von Hansi:

Nur wird diese 2x durchlaufen.
Wie kann ich das verhindern?

Zitat von 3_of_8:

Delphi-Quellcode:

with test(Edit1.Text) do
begin
  s := test_String;
  i := test_Integer;
end;

Also with ... do finde ich nicht soo toll, da kann man fix mal durcheinander kommen
Besser wäre (vorallem wenn noch mehr mit dem Ergebnis gearbeitet wird):

Delphi-Quellcode:

var Ergebnis: TTest;
...
Ergebnis := test(Edit1.Text);
s := Ergebnis.test_String;
i := Ergebnis.test_Integer;