ListView und Textdatei

[marabu]

Allerdings - tut mir leid.

Musst du denn das Semikolon verwenden? Wenn du auf Komma umsteigst, dann kannst du so arbeiten:

Delphi-Quellcode:

function TForm_Kundenhinzufuegen.NeueZeile: string;
var
  sl: TStringList;
begin
  sl := TStringList.Create;
  sl.Add(E_Firma.Text);
  ...
  Result := sl.CommaText;
  sl.Free;
end;

Ich würde dir das empfehlen, da es eigentlich ein Standard ist, den auch andere Programme sehr gut verarbeiten können.

Andernfalls kannst du dir vielleicht erstmal so helfen:

Delphi-Quellcode:

function TForm_Kundenhinzufuegen.NeueZeile: string;
var
  sl: TStringList;
begin
  sl := TStringList.Create;
  sl.Add(E_Firma.Text);
  ...
  Result := StringReplace(sl.CommaText, ',', ';', [rfReplaceAll]);
  sl.Free;
end;

Grüße vom marabu