Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 10.12.2009, 11:03
l0k1 l0k1 вне форума
Прохожий
 
Регистрация: 10.12.2009
Сообщения: 1
Репутация: 10
По умолчанию WinApi, бездействие программы

Начал писать программу, без vcl. Столкнулся с траблой - программа должна висеть в ожидании определенных действий со стороны системы, либо пользователя, т.е. вырубаться только с команды. Какой используется код для создания "простоя".
пробовал:
Код:
  while GetMessage( Msg, HInstance, 0, 0) do
  begin
    TranslateMessage(msg);
    DispatchMessage(msg);
  end;
дает максимальную загрузку первого ядра процессора. Тормозов конечно нет, но такое положение не вариант.

Последний раз редактировалось Admin, 10.12.2009 в 14:57.
Ответить с цитированием
  #2  
Старый 10.12.2009, 13:12
Phedor Phedor вне форума
Начинающий
 
Регистрация: 28.02.2008
Сообщения: 118
Репутация: 21
По умолчанию

Значит в самом коде что-то не то написали. Это стандартный код для главной процедуры (begin ... end.). Обработчик ожидания.
Скорее всего у Вы зацикливаете где-то код в другом месте, поэтому и нагрузка на проц.
Такую ситуацию наблюдал в циклах с использованием sleep-а, и просто пустого зацикливания что-то типа: while true do ;
Память - 0, проц - до 100%
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 15:18.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter