Как изменить папку с которой грузится lnk на рабочем столе[quote] на свою, и работать так как и п.Рабочий стол(без перезагрузки(желательно))

Что-то я не понял! У тебя есть lnk (то биш ярлык) на рабочем столе. И ты хочешь изменить папку с каторой должен грузится тот файл чей ярлык. Так? Если да, то удали старый ярлык и создай навый (как это сделать есть в FAQ)

Наверное он имеет ввиду свойство ярлыка "Рабочая папка" или "Объект". Так?

Я хочу чтобы ярлыки на Рабочем столе грузились не с папки с:\виндовс\Рабочий стол, а с моей (с:\иконки)

Цитата(Yanis @ 15.5.2005, 19:56)

Наверное он имеет ввиду свойство ярлыка "Рабочая папка" или "Объект".

Ну если так, то:

Код

uses ShlObj, ComObj, ActiveX;        procedure CreateLink(const PathObj, PathLink, Desc, Param, WorkDir: 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));       SetWorkingDirectory(PChar(WorkDir));      end;      PFile.Save(PWChar(WideString(PathLink)), FALSE);    end;

PathObj - путь к файлу, ярлык каторого мы создаем
PathLink - Путь к файлу ярлыка, каторый мы создаем
Desc - Коментарий к создаваймому ярлыку (в свойствай ярлыка)
Param - Параметр командной строки при запуске ярлыка (зачастую не используется)
WorkDir - Рабочая папка ярлыка

Для того, что бы узнать путь к "Рабочему столу":

Код

function GetPathDESKTOPFolder:string; var   s: PChar;   p: PItemIDList; begin   s := StrAlloc(128);     p := nil;     SHGetSpecialFolderLocation(Form1.Handle,CSIDL_DESKTOP, p);     SHGetPathFromIDList(p, s);     Result:= s; end;

Вроде бы все это есть в DRKB.
Добавлено @ 21:20
Оп, пока писал не заметил.

Цитата(DIMONSOFT @ 15.5.2005, 21:04)

Я хочу чтобы ярлыки на Рабочем столе грузились не с папки с:\виндовс\Рабочий стол, а с моей (с:\иконки)

Так, я не понял. Ярлык - это не программа! Он не может грузится. Ярлык лишь указывает на файл (как ссылка) Поэтому даже если у тебя ярлык на Рабочем столе, то совсем не обязательно, что бы сама программа, на каторую указывает ярлык, была там же.

Цитата(Poseidon @ 15.5.2005, 21:17)

Поэтому даже если у тебя ярлык на Рабочем столе, то совсем не обязательно, что бы сама программа, на каторую указывает ярлык, была там же.

Мы непонимаем друг-друга
1)Ярлыки (те что на Рабочем столе) находятся в папке с:\виндовс\Рабочий стол
2)Я хочу чтобы они грузились(называй как хочешь) не с с:\виндовс\Рабочий стол А с моей папки

Цитата(DIMONSOFT @ 16.5.2005, 21:21)

1)Ярлыки (те что на Рабочем столе) находятся в папке с:\виндовс\Рабочий стол

Неее, это не ярлыки находятся в папке с:\виндовс\Рабочий стол, а Рабочий стол имеет папку с:\виндовс\Рабочий стол. Т.е. все, что находится на Рабочем столе - находится в этой папке и наоборот. Другими словами, ты просишь что бы то, что находится в одной папке на самом деле находилось в другой папке. Это не осуществимо

Цитата(Poseidon @ 16.5.2005, 22:57)

Неее, это не ярлыки находятся в папке с:\виндовс\Рабочий стол, а Рабочий стол имеет папку с:\виндовс\Рабочий стол. Т.е. все, что находится на Рабочем столе - находится в этой папке и наоборот. Другими словами, ты просишь что бы то, что находится в одной папке на самом деле находилось в другой папке. Это не осуществимо

ну не сказал бы что мысля Димона настолько бредова. Ведь можно же изменить расположение виртуальной папки "Мои документы", так почему же нельзя изменить расположение виртуальной папки "Рабочий стол' ?

Ну тогда ещё и папку пользователя из Documents and Settings перенеси.