Производительность вызовов Windows API в Delphi: прямые вызовы или промежуточные обёртки?

Delphi , Синтаксис , Справочник по API-функциям

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

Исходная проблема

Программист, имеющий опыт работы с Win32 API в C++, столкнулся с аналогичными функциями в Delphi. Он заметил, что подписи функций в Delphi идентичны C-подписям, предоставленным Microsoft, и это вызвало у него вопрос о производительности. Есть ли разница в производительности между прямым вызовом Windows API и вызовом через возможную обёртку в Delphi?

Подтверждённый ответ

Изучение исходного кода показывает, что вызов функции CreateWindowEx в Delphi является прямым вызовом функции CreateWindowExW из User32.DLL. Это подтверждается определением функции в модуле Windows.pas:

function CreateWindowEx(dwExStyle: DWORD; lpClassName: LPCWSTR;
  lpWindowName: LPCWSTR; dwStyle: DWORD; X, Y, nWidth, nHeight: Integer;
  hWndParent: HWND; hMenu: HMENU; hInstance: HINST; lpParam: Pointer): HWND;
  stdcall; external user32 name 'CreateWindowExW';

Таким образом, нет никакого промежуточного слоя обёртки, и вызов Windows API в Delphi выполняется напрямую, что исключает дополнительные затраты времени на выполнение.

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

Альтернативный ответ утверждает, что вызов функции в Delphi сначала выполняется внутри Delphi-функции, которая затем вызывает Windows API. Однако это не так. Пример с функцией CloseHandle показывает, что сначала выполняется вызов Windows.CloseHandle, который затем переходит к kernel32.CloseHandle через JMP. Это можно интерпретировать как использование "трамплина", но на практике это не приводит к заметной потере производительности.

Заключение

Вызов Windows API в Delphi выполняется напрямую, без промежуточных обёрток, что исключает дополнительные затраты времени на выполнение и делает производительность аналогичной вызовам из C/C++.

Примеры кода

// Пример вызова функции CreateWindowEx из Delphi
var
  WindowHandle: HWND;
begin
  WindowHandle := CreateWindowEx(WS_EX_CLIENTEDGE, 'EDIT', 'Экземпляр', ES_AUTOHSCROLL OR ES_WANTRETURN,
    0, 0, 200, 140, nil, nil, hInstance, nil);
  ShowWindow(WindowHandle, SW_SHOW);
end;

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

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

Разработчики, использующие Delphi для работы с Windows API, рассматривают эффективность прямых вызовов по сравнению с возможными обёртками, на основе анализа кода и практики использования функций, таких как `CreateWindowEx` и `CloseHandle`.

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

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

:: Главная :: Справочник по API-функциям ::