ParamStr(1) & Leerzeichen

[xZise]

Ich habe folgenden Code:

Delphi-Quellcode:

GameDatei := ExtractFilePath(ParamStr(0)) + 'TestMaps\TestDatei_A_' + IntToStr(TestDateiNummer) + '.FGame';[..]
if YesNoBox('Soll Freggels gestartet werden?') = 6 then
    ShellExecute(Application.Handle, nil, 'freggels.exe', PAnsiChar(GameDatei), PAnsiChar(ExtractFilePath(ParamStr(0))), SW_SHOWNORMAL);

Delphi-Quellcode:

if ParamStr(1) <> '' then
  LoadGame(ParamStr(1));

Da ich ja einen PAnsiChar brauche habe ich GamDatei passend konvertiert, aber leider meckert er beim Laden rum.
Der Pfad ist dann nur noch "C:\Dokumente" ... Kann es an den ersten oder an den 2. Code liegen? Und wie verbessere ich es?