Стили окна

← →
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

WS_POPUP and STYLE
WS_MINIMIZE and Style
и т.д.

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