Problem: Inhalt des Memos plötzlich weg

[Dax]

Ich habe deinen Code ausprobiert und kann dein Problem nicht nachvollziehen, bei mir funktioniert alles.

Aber warum das Memo AM ENDE leer ist, lässt sich erklären:

Delphi-Quellcode:

procedure TKForm.LoadConfig;
begin
  Memo.Clear;
  Memo.Lines.LoadFromFile(ConfigFile);
  showmessage(Memo.Lines[Memo.Lines.IndexOf('[Einstellungen]')+1]);  // ergibt "0"
  if Memo.Lines[Memo.Lines.IndexOf('[Einstellungen]')+1]='0' then begin
    RBMonth.Checked:=true;
    EinstForm.RadioButton1.Checked:=true;
  end else begin
    RBAll.Checked:=true;
    EinstForm.RadioButton2.Checked:=true;
  end;
  //Memo.Lines.SaveToFile('C:\Windows\Desktop\test.txt');  //ich erhalte eine leere Datei
  showmessage(Memo.Lines[Memo.Lines.IndexOf('[Einstellungen]')+1]);  // ergibt auch "0"
  if Memo.Lines[Memo.Lines.IndexOf('[Einstellungen]')+2]='0' then
    EinstForm.CBColor.Checked:=false
  else
    EinstForm.CBColor.Checked:=true;
  { noch ein paar Zeilen...}
  Memo.Clear; //HIER DER FEHLER, LEERT MEMO AM ENDE
end;