Альтернативы Windows Messages: Коллбэки в мультиплатформенных приложениях на Delphi и Pascal

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

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

Коллбэки в мультиплатформенных приложениях

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

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

Для демонстрации использования коллбэков приведем пример кода на Object Pascal, который может быть использован в библиотеке DLL для уведомления основного приложения о событиях.

type
  THandle = LongWord;
  {$IF SizeOf(THandle) < SizeOf(Pointer)}
  {$MESSAGE Error 'Invalid handle type'}
  {$ENDIF}
  TCallback = procedure(const aHandle: THandle); cdecl;

var
  gCallback: record
    Routine: TCallback;
    Obj: TObject;
    Info: string
  end;

function Object2Handle(const aObj: TObject): THandle;
begin
  Result:= THandle(Pointer(aObj));
end;

function Handle2Object(const aHandle: THandle; out aObj: TObject): Boolean;
begin
  // ...
end;

procedure DoCallback();
begin
  if Assigned(gCallback.Routine) then
    gCallback.Routine(Object2Handle(gCallback.Obj));
end;

procedure SetupCallback(const aCallback: TCallback); cdecl;
begin
  gCallback.Routine:= aCallback;
end;

procedure DoSomething(const aHandle: THandle; out aInfo: string); cdecl;
begin
  // ...
end;

exports
  SetupCallback,
  DoSomething;

В основном приложении можно использовать следующий код для установки коллбэка:

procedure Cb(const aHandle: THandle); cdecl;
begin
  // ...
end;

begin
  SetupCallback(@Cb);
  // ...
end.

Поддержка объектных коллбэков

В portable code common practice — use of handles (notify calling convention). Объекты методов не должны использоваться в коллбэках. Вместо этого применяется передача указателей, которые могут быть интерпретированы в контексте вызывающей стороны.

Альтернативные технологии

Кроме коллбэков, существуют и другие технологии для обмена сообщениями между компонентами приложения, такие как сокеты или системы обмена сообщениями, например, 0MQ.

Заключение

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

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

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

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

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

:: Главная :: DLL и PlugIns ::