Как добавить файл в меню Пуск/Документы

Эта программа добавляет файл "File.txt" в "Пуск/Документы".

uses ShlOBJ;

procedure TForm1.Button1Click(Sender: TObject);

begin

 SHAddToRecentDocs(SHARD_PATH, PChar('File.txt'));

end;

Автор советов: Даниил Карапетян
e-mail: delphi4all@narod.ru
Автор справки: Алексей Денисов
e-mail: aleksey@sch103.krasnoyarsk.su

Отправить комментарий

Проверка
Антиспам проверка
Image CAPTCHA
...