Problem: Inhalt des Memos plötzlich weg

**zappel**

Also ich verstehe die Welt nicht mehr!
Mit einer einfachen Procedure möchte ich Werte aus einer Textdatei auslesen. Der erste Wert wird auch - wie erwartet - ausgelesen. Wenn die Procedure aber jedoch den zweiten Wert auslesen will, ist das Memo, in welches ich die Textdatei geladen habe, plötzlich leer! Ich habe keine Ahnung, wodran das liegen könnte! Bitte um Hilfe...

zusammenfalten · markieren

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 "" ???

  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;

end;

Problem: Inhalt des Memos plötzlich weg

Problem: Inhalt des Memos plötzlich weg

Forumregeln