Все, ответ нашел во внешке. Оказывается процедуру
while GetMessage(Msg, 0, 0, 0) do begin TranslateMessage(Msg); DispatchMessage(Msg); end; надо заменить на
while GetMessage(Msg, 0, 0, 0) do begin if not(IsDialogMessage(Handle,Msg)) then begin TranslateMessage(Msg); DispatchMessage(Msg); end; end;
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы можете добавлять вложения
