Вниз
Скачать: CL | DM;

Стили окна   Найти похожие ветки 

 
DelphiLexx   (2004-09-22 17:38) [0]

Var
  Style:Integer;
  ExStyle:Integer;
  WND:HWND;
begin
...
WND:=...{Значение хэндла окна}
STYLE:=GetWindowLong(WND, GWL_STYLE); {стиль окна}
ExSTYLE:=GetWindowLong(AboutWindow.WND, GWL_EXSTYLE); {расширенный стиль}
...
end;

STYLE и ExStyle возвращают обычные и расширенные стили окна в значении
типа Integer. Вопрос: как переменные STYLE и ExSTYLE можно разбить на
константы из которых они складываются (через Case очень большой код и
не надежно)?
Пример: Пусть Style = A8100000, тогда мы должны получить:

{В системе HEX}

WS_POPUP = 80000000
WS_MINIMIZE=20000000
WS_DISABLED=8000000
WS_HSCROLL=100000
-------------------
Итг:A8100000
Spy++ (средства Visual C++) как-то удалось это сделать.


 
Sandman25 ©   (2004-09-22 17:47) [1]

Пробежаться по константам и сделать And


 
Defunct ©   (2004-09-22 17:51) [2]

WS_POPUP and STYLE
WS_MINIMIZE and Style
и т.д.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.02 c
14-1095919272
gn
2004-09-23 10:01
2004.10.10
Читайте назночение программ некоторые фразы меня впечатлили :-)


6-1091083739
MakNik
2004-07-29 10:48
2004.10.10
Workstation ID


3-1094990342
Snip
2004-09-12 15:59
2004.10.10
IB и Boolean (TDBCheckBox)


4-1094711149
UNIVERSAL
2004-09-09 10:25
2004.10.10
Окно поверх всех окон - проблема(+)


14-1095501470
Максим
2004-09-18 13:57
2004.10.10
Есть ли русскоязычный HELP на Delphi 7.0?




   Наверх