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

Previous Top Next

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

Code:

uses ShlOBJ;

procedure TForm1.Button1Click(Sender: TObject);

begin

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

end;

©Drkb::01803

Автор советов: Даниил Карапетян

e-mail: delphi4all@narod.ru

Автор справки: Алексей Денисов

e-mail: aleksey@sch103.krasnoyarsk.su