Einfacher Login

[N30N]

Hi!

Ich hab eben ein Programm geschrieben mit einen einfachen Login.

Hier erstellt man einen Account:

Delphi-Quellcode:

procedure TForm1.AbspeichernClick(Sender: TObject);
begin
  memo1.lines.add  (edit6.text);
  memo1.lines.add  (edit7.text);
  memo1.lines.add  (edit8.text);
  begin
    if FileExists(edit6.text) then
      begin
        DeleteFile(edit6.text);
        showmessage ('Altes Profil wurde gelöscht.')
      end;
    Memo1.Lines.SaveToFile(ExtractFilePath(ParamStr(0)) + edit6.text);
  end;
end;

Und hier logge ich mich ein:

Delphi-Quellcode:

procedure TForm1.LoginClick(Sender: TObject);
begin
label9.caption := ('');
memo1.clear;
  if FileExists(ExtractFilePath(ParamStr(0)) + edit5.text) then
    begin
      Memo1.Lines.LoadFromFile(ExtractFilePath(ParamStr(0)) + edit5.text);
      Name := Memo1.Lines.Strings[0];
      Handycap := Memo1.Lines.Strings[1];
      Platzvorgabe := Memo1.Lines.Strings[2];
      label9.caption := ('Profil wurde geladen.')
    end
  else
  begin
    MessageBox(0,'Profil wurde nicht gefunden!','Fehler',MB_OK or MB_ICONERROR);
    label9.caption := ('Profil nicht vorhanden.')
  end;
end;

Problem ist jetzt folgendes:

Wenn ich das Profil abspeichere, wird eine Datei in den Ordner geschrieben, mit dem richtigen Dateinamen und dem richtigen Inhalt. Ich kann hier auch "Hallo Welt" oder "HalloWelt" eingeben, es funktioniert sowohl mit als auch ohne Leerzeichen.Also ist bis hierhin alles super.

Wenn ich versuche zu laden, kann ich allerdings nur Profile laden, welche ohne Leerzeichen sind. Sobald ich Profile mit nem Leerzeichen lade, kommt folgendes:

http://slave1.imagebeaver.com/files/...lphifehler.jpg

"uda puda" ist in dem Fall nur ein sinnloser Username der mir grade in den Kopf gekommen ist.

Ansonsten seh ich im Codefenster, so nenn ich es mal, keine weiteren Fehlerbeschreibungen. Allerdings springt ein grüner Pfeil auf folgende Zeile in der "Laden" Syntax:

Handycap := Memo1.Lines.Strings[1];


Name, Handycap und Platzvorgabe sind übrigens globale Variablen des Typs "string"

Delphi-Quellcode:

var
  Form1: TForm1;
  Name,Handycap,Platzvorgabe : string;

Sieht jemand meinen Fehler oder hat ne Lösung?

Danke!