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

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

Что здесь неправильно?


Витамин ©   (2002-03-02 18:25:00) 

wl:=getwindowlong(handler,GWL_STYLE);
if (wl and WS_OVERLAPPED)<>0 then some_proc(handler);

wl объявлена как Longint. По идее в процедуру some_proc должен передаваться хандлер окна со стилем WS_OVERLAPPED, но этого почему-то не происходит. В чем тут дело?


Витамин   (2002-03-03 12:14:00) [1]

У меня есть хук, который перехватывает создание окна (WH_CALLWNDPROCRET, перехват WM_CREATE). ну и по идее должны обрабатываться окна с WS_OVERLAPPED, но не происходит!


Anatoly Podgoretsky   (2002-03-03 00:01:00) [2]

Это как раз пример что не надо резельтат логическиз операций сравнивать с нулем
Правильнее делать следующее if (wl and flag) = flag и не требуется знать значение флага.


Dimaond Cat   (2002-03-02 23:03:00) [3]

вообще-то если внимательно посмотреть то WS_OVERLAPPED сам по себе =0 вот кусок файла windows.pas
const
{ Window Styles }
{$EXTERNALSYM WS_OVERLAPPED}
WS_OVERLAPPED = 0;

соответственно при данной постановке, твой if при любом wl будет пролетать мимо


VuDZ   (2002-03-02 18:32:00) [4]

а что происходит?


Наверх

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