Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
1. Mär 2006
Ach ja, bei
Erwachsene := Trim(Copy(S, 19, i - 19));
Kinder := Trim(Copy(S, i + 7, MaxInt));
mußt'e mal sehn, ob ich die Werte richtig geschätzt hab und wenn bei den Suchwörtern die Groß-/Kleinschreibung immer stimmt, dann kannst'e natürlich auch die ganzen AnsiLowerCase weglassen, mußt dann natürlich in den Abfragen ebenfalls die Groß-/Kleinschreibung beachten (ansonsten halt alles klein)
Forum: Sonstige Fragen zu Delphi
Delphi
by himitsu,
1. Mär 2006
Du kannst ja auch jede Zeile einzeln abarbeiten und nach den Wörtern suchen ... in S steht der Zeileninhalt.
S := Trim(S);
i := Pos(':', S);
S2 := AnsiLowwerCase(Copy(S, 1, i));
S := Trim(Copy(S, i + 1, MaxInt);
If S2 = 'ort:' Then Ort := S
Else If S2 = 'haus:' Then Haus := S
...
Else If S2 = 'anzahl erwachsene:' Then Begin