Как писать Win32API приложения на Delphi

Как писать Win32API приложения на Delphi - Цикл сбора сообщений

Содержание материала

Страница 4 из 4

Шаг 4. Цикл сбора сообщений

 

Цикл сбора сообщений следует изменить следующим образом, как при использовании немодальных диалоговых окон. Можно, правда, оставить все как есть, но тогда вы не сможете использовать клавиатуру для перемещения между дочерними окнами, использования кнопок "по умолчанию" и т.д.

 

Code:

while GetMessage(Mesg, 0, 0, 0) do

begin

if mainWnd<>0 then

   if IsDialogMessage(mainWnd,Mesg) then

     continue;

TranslateMessage(Mesg);

DispatchMessage(Mesg);

end;

 

После нажатия кнопки "ОК" появляется еще одно окно. Если в нем ввести текст и нажать "ОК", этот текст будет добавлен в Listbox.

 

Новые статьи

Ранние статьи

Случайные статьи

Популярные статьи

Подробности
Родительская категория: Windows
Категория: Программирование без VCL, работа с WinAPI

Добавить комментарий

Не использовать не нормативную лексику.

Просьба писать ваши замечания, наблюдения и все остальное,
что поможет улучшить предоставляемую информацию на этом сайте.

ВСЕ КОММЕНТАРИИ МОДЕРИРУЮТСЯ ВРУЧНУЮ, ТАК ЧТО СПАМИТЬ БЕСПОЛЕЗНО!

Защитный код
Обновить