Вниз
Скачать: 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.026 c
1-1096025332
SergeyM
2004-09-24 15:28
2004.10.10
Текст в формате HTML


9-1086951394
Bizon's
2004-06-11 14:56
2004.10.10
Помогите ламеру с DelphiX


1-1096311431
Kolan
2004-09-27 22:57
2004.10.10
сделать калонку stringgrid не доступной


9-1086292372
MrAngel
2004-06-03 23:52
2004.10.10
Смена разрешения на лету.


1-1096275024
Aleksandr.
2004-09-27 12:50
2004.10.10
Можно ли как-то оптимизировать этот код (для скорострельности)?




   Наверх