Delphi. Трюки и эффекты - читать бесплатно онлайн полную версию книги автора Валерий Викторович Борисок (ч. 362)

...

Листинг 8.10.
Уничтожение формы приложения
procedure TMappingFile.FormClose(Sender: TObject; var Action:
TCloseAction);
begin
//Отключим файл от адресного пространства
UnMapViewOfFile(lpBaseAddress);
//Освобождаем объект файла
CloseHandle(hFileMapObj);
//Закрываем форму
Action := caFree;
end;

Здесь рассмотрен простой пример работы с проекцией файла в рамках одного приложения. Более же интересный и реальный пример вы увидите в разд. 10.2 при рассмотрении программы «Оконный шпион»: там проекция файла в память используется для передачи данных из функции DLL, работающей в памяти другого процесса.