StringList -> StringReplace "verschluckt" letztes Zeichen

[incognito]

Hallo Leute,

zum Einlesen einer csv-Datei in meine Datenbank benutze ich zwei Stringlisten:

Delphi-Quellcode:

....

var
  masterslist : TStringList;
  detailslist : TStringList;
  index         : Integer; 
begin
  masterslist := TStringList.Create; 
  detailslist := TStringList.Create; 
  try
    detailslist.Delimiter := ';';   
    masterslist.LoadFromFile(Edit_DATEI.Text);
    for index := 1 to Pred (masterslist.Count) do
    begin
      detailslist.Clear;
      detailslist.DelimitedText := '"' + StringReplace(masterslist.Strings[index],';','";"',[rfReplaceAll]);
     //ShowMessage(masterslist.Strings[index]);
     //ShowMessage(detailslist.Strings[3]);

....

Wenn ich mir die Strings der Masterlist ansehe (showMessage) dann stimmt noch alles, sehe ich mir den letzten String in der Detailslist an, dann fehlt der letzte Buchstabe des String. Wenn hinter dem letzten Buchstaben, also vor dem Zeilenende, ein Leerzeichen steht, dann fehlt der letzte Buchstabe nicht. Ich hab keine Ahnung, woran das liegen kann?!? Ich hoffe ihr könnt mir da weiterhelfen und habt evtl. einen Tip, wie ich das Problem lösen kann?!?!

Danke schonmal!

Jana