DelphiCode - МЕНЮ ДОКУМЕНТОВ КНОПКИ ПУСК (ДОБАВЛЕНИЕ И ОЧИСТКА)


	РАБОЧИЙ СТОЛ
	МЕНЮ ДОКУМЕНТОВ КНОПКИ ПУСК (ДОБАВЛЕНИЕ И ОЧИСТКА)

	В Uses необходимо указать модуль ShlOBJ.

	Для того, чтобы добавить какой-либо документ в меню Документы, используйте слудующий код:

	procedure TForm1.Button1Click(Sender: TObject); var path: string; begin {Путь к файлу} path := 'C:\example.xls'; SHAddToRecentDocs(SHARD_PATH, pChar(path)); end;

	Для очистки меню Документы:

	procedure TForm1.Button1Click(Sender: TObject); begin SHAddToRecentDocs(SHARD_PATH, nil); end;