Tworzenie skrótu do programu z parametrem

Tworzę skrót do programu z parametrem. Korzystam z kodu działającego na takiej samej zasadzie jak w FAQ: http://4programmers.net/faq.php?id=44. Ale po utworzeniu tego sktrótu, parametr jest wpisany razem w linii poleceń, tzn. "Dysk:\Ścieżka\Program.exe Parametr" zamiast "Dysk:\Ścieżka\Program.exe" Parametr. Windows szuka wtedy programu o nazwie "Program Parametr". Co zrobić, żeby to działało tak, jak trzeba?

Podaj kod, ktory uzywasz

var
  MyObject: IUnknown;
  ShellLink: IShellLink;
  PersistFile: IPersistFile;
  FileName: String;
...
CoInitialize(nil); //Nie wiem, czy dobrze robię, ale jak tego tak nie wpiszę, to wywala mi błąd "Nie wywołano procedury CoInitialize".
MyObject := CreateComObject(CLSID_ShellLink);
ShellLink := MyObject as IShellLink;
PersistFile := MyObject as IPersistFile;
FileName := Application.ExeName;
with ShellLink do
begin
  SetWorkingDirectory(PChar(ExtractFilePath(FileName)));
  SetPath(PChar(FileName));
  SetArguments('AS'); //O ile się nie mylę, tak się ustala parametry
end;
PersistFile.Save(PWChar('JakaśŚcieżka'),True);