Карта сайта Kansoftware
НОВОСТИУСЛУГИРЕШЕНИЯКОНТАКТЫ
Разработка программного обеспечения
KANSoftWare

Добавляем файлы в Recent Documents list

Delphi , Файловая система , Файлы

Добавляем файлы в Recent Documents list

Предположим Вам захотелось, чтобы Ваше программа сама умела добавлять файлы "recent documents list" (для тех, кто в танке - это такая менюшка, которая появляется при нажатии на кнопку Пуск(Start) и наведении мышкой на "Документы" (Documents). Сама функция API-шная, так что применять её можно в любом компиляторе.

Добавляем следующий код в интерфейсную часть формы:


const 
SHARD_PIDL = 1;
SHARD_PATH = 2;

procedure SHAddToRecentDocs(Flags: Word; pfname: Pointer); stdcall; external 'shell32.dll' name'SHAddToRecentDocs';

А так выглядит вызов этой функции:


SHAddTorecentDocs(SHARD_PATH,pchar('C:\mydir\myprogram.exe')); 

файл 'myprogram.exe' будет добавлен в recent documents list

Программа добавляет файл в список "Было recently opened" в Windows, используя функцию SHAddToRecentDocs из библиотеки Shell32.dll.

Вот шаг за шагом, что происходит:

  1. Определены два константы: SHARD_ PIDL и SHARD_ PATH. SHARD_ PIDL - это Persistent Item ID List (PIDL) элемента, который нужно добавить, а SHARD_ PATH - это путь к файлу.
  2. Определен вызов функции SHAddToRecentDocs с параметрами:
    • Flags: слово, которое указывает, как должна работать функция. В этом случае оно установлено в SHARD_ PATH, что tells the function to add a file path to the recent documents list.
    • pfname: указатель на null-terminated строку, содержащую путь к файлу, который нужно добавить.
  3. Функция SHAddToRecentDocs вызывается с аргументами:
    • Flags установлено в SHARD_ PATH, что specifies that we want to add a file path.
    • pchar('C:\mydir\myprogram.exe'): указатель на null-terminated строку, содержащую путь к файлу, который нужно добавить. В этом случае это 'C:\mydir\myprogram.exe'.

Когда вы вызываете SHAddToRecentDocs с этими аргументами, она добавит указанный путь к файлу в список "Было recently opened" в Windows.

Вот пример использования кода:

program AddFileToRecentDocs;
uses
  ShellApi;

procedure TForm1.Button1Click(Sender: TObject);
begin
  SHAddToRecentDocs(SHARD_PATH, PChar('C:\mydir\myprogram.exe'));
end;

В этом примере мы определили обработчик события нажатия кнопки, который вызывает функцию SHAddToRecentDocs для добавления пути к файлу 'C:\mydir\myprogram.exe' в список "Было recently opened".

Обратите внимание, что вам нужно убедиться, что библиотека Shell32.dll доступна в системе PATH или включена в зависимости вашего проекта, чтобы код работал.

Добавляем файлы в Recent Documents список, используя функцию SHAddToRecentDocs из библиотеки shell32.dll.


Комментарии и вопросы


Ваше мнение или вопрос к статье в виде простого текста (Tag <a href=... Disabled). Все комментарии модерируются, модератор оставляет за собой право удалить непонравившейся ему комментарий.

заголовок

e-mail

Ваше имя

Сообщение

Введите код




Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.



:: Главная :: Файлы ::


реклама



©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007
Top.Mail.Ru

Время компиляции файла: 2024-06-02 10:20:12
2024-07-23 20:10:42/0.0036020278930664/0