Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.27;
Скачать: CL | DM;

Вниз

Сообщения Windows   Найти похожие ветки 

 
KASioZ   (2006-05-06 02:44) [0]

Здравствуйте уважаемые программисты!
Нуждаюсь в вашей помощи.
В модуле Forms была такая процедура
Application.ProcessMessages;
Которая могла в любой момент выполнения кода обработать накопившиеся системные события.
Из-за сильной экономии конечного размера файла я не могу использовать этот модуль (размер увеличивается на 300кб!)
Подскажите пожалуйста как я могу выполнить это используя чистый WinAPI.
Т.е мне надо в любой момент времени обработать накопившиеся сообщения если они есть и продолжить выполнение программы, а если же их нет то тоже продолжить и не ожидать прихода 1го сообщения как это сделано у меня сейчас:

while GetMessage(Msg, 0, 0, 0) do
       begin
       TranslateMessage(Msg);
       DispatchMessage(Msg);
       end;

Заранее благодарен за любую оказанную мне помощь!


 
GrayFace ©   (2006-05-06 09:00) [1]

Ctrl+клик по слову Application.ProcessMessages


 
Сергей М. ©   (2006-05-06 09:05) [2]

while PeekMessage(Msg, 0, 0, 0, PM_REMOVE) do
 begin
   TranslateMessage(Msg);
   DispatchMessage(Msg);
 end;


 
KASioZ   (2006-05-06 09:22) [3]

>Ctrl+клик по слову Application.ProcessMessages

Я и так уже пытался!
Но если копировать всё что там написано, все доп. процедуры и функции и все прочие объявления то конечный размер опять же получится гигантским


 
KASioZ   (2006-05-06 10:11) [4]

Сергей М.
Огромное спасибо за ваш ответ.
Сработало!



Страницы: 1 вся ветка

Текущий архив: 2006.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.064 c
11-1131195038
igi
2005-11-05 15:50
2006.08.27
свойство flat не работает


6-1133493728
Component TIdNNTP
2005-12-02 06:22
2006.08.27
Indy Как избавиться от зависаний при закачке?


6-1144603398
Izolda
2006-04-09 21:23
2006.08.27
Поисковая система


15-1154242700
Asrin
2006-07-30 10:58
2006.08.27
Помогите!!!!!


15-1154611414
Mike Kouzmine
2006-08-03 17:23
2006.08.27
Мобильная технология AMD Turion™ 64 X2