Text parsen und auswerten

[emsländer]

Zitat von Sharky:

Hai emsländer,

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

ja. immer nach dem Doppelpunkt beginnt der Wert, welcher durchaus aus mehreren Worten bestehen kann. Ein weiteres Problem ergibt sich bei "Kinder:", denn dieser Bezeichner steht ja in der gleichen Zeile, wie der Wert des vorherigen Bezeichners.

Zitat:

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;

Gruss

EL