Главная страница
    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.45 MB
Время: 0.092 c
1-1152639434
MikProg
2006-07-11 21:37
2006.08.27
Сенсация! Код initialization может не выполнятся!


8-1140756973
Xandr
2006-02-24 07:56
2006.08.27
уровень звука


1-1153111816
Степан
2006-07-17 08:50
2006.08.27
Цвет фона в ListView


4-1146641959
RDS
2006-05-03 11:39
2006.08.27
Использование FormatMessage


4-1146806660
__DATA__
2006-05-05 09:24
2006.08.27
Сообщение, отвечающее за изменение списка открытых окон в системе





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский