![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#4
|
||||
|
||||
![]() Если это все еще нужно, то зациклить процесс можно так:
var Msg: TMsg; --- while GetMessage(Msg, HInstance, 0, 0) do begin TranslateMessage(Msg); DispatchMessage(Msg); end; |