Text parsen und auswerten

[Sharky]

Hai emsländer,

ist das richtig das in der Zeile mit "Anzahl Erwachsene: Kinder:". Ein Doppelpunkt nach Erwachsene steht?

EDIT
Wenn es ein versehen mit dem Doppelpunkt ist könntest Du auch einfach mit den Values einer TStringList arbeiten.
Das könnte zum Beispiel so aussehen:

Delphi-Quellcode:

procedure TDemoForm.Button1Click(Sender: TObject);
var
  sl: TStringList;
  filename: String;
begin
  filename := 'c:\demo.txt';
  sl := TStringList.Create;
  try
    sl.LoadFromFile(filename);
    sl.NameValueSeparator := ':';
    ListBox1.Items.Add(Trim(sl.Values['Kinder']));
    ListBox1.Items.Add(Trim(sl.Values['eMail']));
  finally
    sl.Free;
  end;
end;