[NCD]

У меня небольшой вопрос по созданию ярлыков:
нашёл в FAQ:

Код:

procedure CreateLink(const PathObj, PathLink, Desc, Param: string);
var
  IObject: IUnknown;
  SLink: IShellLink;
  PFile: IPersistFile;
begin
  IObject := CreateComObject(CLSID_ShellLink);
  SLink := IObject as IShellLink;
  PFile := IObject as IPersistFile;
  with SLink do
  begin
    SetArguments(PChar(Param));
    SetDescription(PChar(Desc));
    SetPath(PChar(PathObj));
  end;
  PFile.Save(PWChar(WideString(PathLink)), FALSE);
end;

Не могу понять: что здесь писать? :

Код:

CreateLink('PathObj', 'PathLink', 'Desc', 'Param');

[NCD]

Люди, неужели это такой сложный вопрос? Какие данные нужно вводить в переменные PathObj, PathLink, Desc, Param: string ?

[s0Creator]

Вот здесь помоему подробно описано
http://rustud.ru/informatika/gl4/Glava31/Index4.html

[NCD]

Спасибо разобрался!