Как поместить в буфер файл с помощью File Mapping

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

Автор: http://forum.vingrad.ru

идея простая открываешь файл .. (или создаешь) создаешь Mapping ... CreateFileMapping отображаешь Mapping в свой процесс MapViewOfFile и всё

var
  SharedHandle: THandle;
  FileView: Pointer;
  MyFile: HFILE;
begin
  MyFile := OpenFile('c:\1.txt', // pointer to filename
    ..., // pointer to buffer for file information
    ... // action and attributes
    );
  SharedHandle := CreateFileMapping(MyFile, nil, PAGE_READWRITE, 0,
    size {размер файла}, PChar('MyFile'));
  FileView := MapViewOfFile(SharedHandle, FILE_MAP_WRITE, 0, 0,
    size {размер файла});
  ...
  ...
  ...
  ...
  // потом
  UnmapViewOfFile(FileView);
end;

Статья рассказывает о способе поместить файл в буфер с помощью File Mapping, описывая шаги от открытия файла до отображения его в процесс с использованием функций CreateFileMapping и MapViewOfFile.

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

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

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