|
#1
|
|||
|
|||
Win Api
Пишу DLL расширение на Win Api для стороннего приложения немогу разобратся как командами Api обновить созданное окно, если использовать application.ProcessMessages() тогда всё работает, но здесь проблема размер библиотеки увеличивается многократно.
Может существует аналого данной функции. |
#2
|
||||
|
||||
Аналог ProcessMessages?
Код:
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; Помогаю за Спасибо |
#3
|
|||
|
|||
Большое спасибо, всё отлично заработало!
|