Узнать, есть или нет

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Naked
Бывалый
Бывалый
Аватара пользователя
 
Сообщения: 207
Зарегистрирован: 27.10.2004 (Ср) 3:16
Откуда: Дальнегорск столица мира

Узнать, есть или нет

Сообщение Naked » 06.10.2005 (Чт) 3:24

как узнать из GWL = GetWindowLong(Hwnd, GWL_STYLE), есть там WS_MAXIMIZE или нет?

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 06.10.2005 (Чт) 5:10

Код: Выделить всё
If gwl = (gwl Or WS_MAXIMIZE) then
'ws_maximize flagged
else
'ws_maximize not flagged
end if


Код: Выделить всё
MsgBox "Maximized: " & (gwl = (gwl Or WS_MAXIMIZE))

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 06.10.2005 (Чт) 5:29

Amed, :shock: :shock:
Это намеренное желание сделать не как все :?:

Обычно делают так:
Код: Выделить всё
If gwl And WS_MAXIMIZE then
'ws_maximize flagged
else
'ws_maximize not flagged
end if


Код: Выделить всё
MsgBox "Maximized: " & CBool(gwl And WS_MAXIMIZE)
Изображение

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 06.10.2005 (Чт) 5:42

:lol:
Доброе утро! :)

tyomitch
Пользователь #1352
Пользователь #1352
Аватара пользователя
 
Сообщения: 12822
Зарегистрирован: 20.10.2002 (Вс) 17:02
Откуда: חיפה

Сообщение tyomitch » 06.10.2005 (Чт) 18:52

Amed писал(а)::lol:
Доброе утро! :)


Ну тогда можно и так:
Код: Выделить всё
If gwl > (gwl Xor WS_MAXIMIZE) then
'ws_maximize flagged
else
'ws_maximize not flagged
end if


Код: Выделить всё
MsgBox "Maximized: " & (gwl > (gwl Xor WS_MAXIMIZE))


Конкурс на самый кривой код?
Изображение


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 83

    TopList