Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Приём сообщений


Зм1й ©   (2007-03-03 09:23:00) 

Объясните, пожалуйста, чем отличается

while not Close_Program do
begin
if PeekMessage (Msg, 0, 0, 0, PM_NOREMOVE) then
begin
  if GetMessage (Msg, 0, 0, 0) = True then
  begin
   TranslateMessage (Msg);
   DispatchMessage (Msg)
  end
end else DoSomething;
end;


от

while not Close_Program do
begin
if PeekMessage (Msg, 0, 0, 0, PM_REMOVE) then
begin
  TranslateMessage (Msg);
  DispatchMessage (Msg)
end else DoSomething;
end;


.


Зм1й   (2007-03-04 16:55:00) [1]

Спасибо.


Игорь Шевченко   (2007-03-04 16:49:00) [2]


> А нет таких сообщений, которые принимает только GetMessage,
>  а PeekMessage нет?


нет


Зм1й   (2007-03-04 16:46:00) [3]

А нет таких сообщений, которые принимает только GetMessage, а PeekMessage нет?


Leonid Troyanovsky   (2007-03-03 21:53:00) [4]


> Зм1й ©   (03.03.07 21:51) [4]

> А есть вариант лучше?

А что требуется-то?

--
Regards, LVT.


Зм1й   (2007-03-03 21:51:00) [5]


> На мой взгляд, оба варианта небезгрешны

А есть вариант лучше?


Leonid Troyanovsky   (2007-03-03 21:23:00) [6]


> Зм1й ©   (03.03.07 20:31) [2]
> Меня интересует, есть ли воообще различия, кроме того, что
> второй код быстрее? :)

На мой взгляд, оба варианта небезгрешны.
Если, конечно, они претендуют на звание message pump.
Ну, а "быстрее" в данном контексте, во-ще, непонятно.

--
Regards, LVT.


Зм1й   (2007-03-03 20:31:00) [7]

Меня интересует, есть ли воообще различия, кроме того, что второй код быстрее? :) То есть, для чего может понадобиться использовать первый код?


Leonid Troyanovsky   (2007-03-03 20:09:00) [8]


> Зм1й ©   (03.03.07 09:23)  
> Объясните, пожалуйста, чем отличается

Что конкретно тебя интересует?

--
Regards, LVT.


Наверх

Титульная страница Поиск, карта сайта Написать письмо