[gadmaker]

Пишу DLL расширение на Win Api для стороннего приложения немогу разобратся как командами Api обновить созданное окно, если использовать application.ProcessMessages() тогда всё работает, но здесь проблема размер библиотеки увеличивается многократно.
Может существует аналого данной функции.

[v1s2222]

Аналог ProcessMessages?

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

procedure ProcessMessages; var   Msg: TMsg;   lResult: Boolean; begin   lResult := true;    while lResult do   begin     lResult := False;     if PeekMessage(Msg, 0, 0, 0, PM_REMOVE) then     begin       lResult := True;       if Msg.Message <> WM_QUIT then       begin         TranslateMessage(Msg);         DispatchMessage(Msg);       end;     end;   end; end;

[gadmaker]

Большое спасибо, всё отлично заработало!