...

Листинг 8.9.

Считывание данных из проекции файла

procedure TMappingFile.TimerMFTimer(Sender: TObject);

begin

lbVariable.Caption := PChar(lpBaseAddress);

end;

В момент завершения приложения необходимо отключить проецируемый файл от адресного пространства процесса и закрыть объект файла. Эти действия можно выполнять в момент уничтожения формы (листинг 8.10).

Загрузка...