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;