Файловое отображение в Windows для идентификации и взаимодействия окон в приложениях на Delphi

Delphi , ОС и Железо , Windows

В контексте разработки приложений на Delphi и Pascal, иногда возникает необходимость идентификации и взаимодействия между окнами различных приложений. Одним из способов достижения этой цели является использование файловых отображений в Windows.

Проблема идентификации окон

В Windows для хранения информации в общем месте часто используют общую память, что в терминах Windows представляет собой объект файловых отображений. Создание такого объекта осуществляется с помощью функции CreateFileMapping. Это ядро-ориентированные объекты, и они могут быть названы в пространстве имен ядра.

Работа с файловыми отображениями может быть не такой уж увлекательной, поэтому разработчики могут искать более простые решения. Например, можно присвоить главной форме приложения уникальное имя класса, например TMyCompanyNameMyProductNameMainForm, и затем использовать функцию FindWindow для поиска существующего окна приложения, передавая имя класса.

Альтернативные способы идентификации

Если нет возможности заставить другого разработчика использовать определенное имя класса, но можно попросить сохранить дескриптор окна, использование CreateFileMapping может быть лучшим решением. Однако, если возможно, стоит избегать файловых отображений. Можно использовать имя класса окна и его заголовок (caption), который, как правило, включает название программы.

Автоматическое уничтожение файловых отображений

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

Хранение данных между приложениями

Файловые отображения могут использоваться не только для идентификации окон, но и для хранения данных, общих для нескольких приложений. Это может быть более предпочтительным решением, поскольку позволяет хранить кросс-приложенные данные.

Пример кода на Object Pascal (Delphi)

program FileMappingExample;

{$APPTYPE CONSOLE}

uses
  System.SysUtils,
  System.Memory;

// Создание файловых отображений
function CreateFileMappingHandle( FileName, FileSize: TFileSize; const Name: string; out Handle: THandle ): Boolean;
var
  hFile: THandle;
  hFileMap: THandle;
begin
  Result := False;
  hFile := CreateFile(PChar(FileName), GENERIC_READ or GENERIC_WRITE, 0, nil, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, 0);
  if hFile = INVALID_HANDLE_VALUE then
    Exit;

  hFileMap := CreateFileMapping(hFile, nil, SEC_COMMIT, High( FileSize div SizeOf(Cardinal)), Low( FileSize div SizeOf(Cardinal)), PChar(Name));
  if hFileMap = 0 then
    Exit;

  try
    Handle := hFileMap;
    Result := True;
  except
    CloseHandle(hFileMap);
    raise;
  end;
end;

// Использование кода выше в контексте вашего приложения Delphi
var
  FileMappingHandle: THandle;
  FileName: string = 'C:\temp\MyFileMappingFile.dat';
  FileSize: TFileSize = SizeOf(Cardinal) * 1024 * 1024; // 1MB
  Name: string = 'Global\MyFileMappingObjectName';

begin
  if CreateFileMappingHandle(FileName, FileSize, Name, FileMappingHandle) then
  try
    // Здесь можно работать с файловым отображением
  finally
    CloseHandle(FileMappingHandle);
  end;
end.

Использование файловых отображений позволяет разработчикам на Delphi эффективно идентифицировать и взаимодействовать с окнами других приложений, а также хранить данные, доступные для обмена между разными процессами.

Создано по материалам из источника по ссылке.

Файловые отображения в Windows используются для идентификации и взаимодействия окон в приложениях на Delphi, а также для хранения данных, доступных между разными процессами.

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

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

:: Главная :: Windows ::