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

И снова Api. Суперклассинг.   Найти похожие ветки 

← →
Nick Denry ©   (2004-02-23 00:27) [0]

Следующий вопрос, который мучает меня на протяжении тех почти 2-х месяцев, которых я не был в нете - это суперклассинг и диалоговые окна...

Суперклассинг провожу обчным методом :

Это истинный кусок кода  - MASM
.const
szStaticClass equ "STATIC", 0
szOurClass    equ "mysatticclass",0

.code
..........
SuperClassLabel proc
LOCAL lWndClEx : WNDCLASSEX
mov lWndClEx.cbSize,sizeof WNDCLASSEX
invoke GetClassInfoEx,NULL,addr szStaticClass,addr lWndClEx
push lWndClEx.lpfnWndproc
pop OldWndproc
mov lWndClEx.lpfnWndproc, OFFSET StaticWndproc
push hInstance
pop lWndClEx.hInstance
mov lWndClEx.lpszClassName,OFFSET szOurClass
invoke RegisterClassEx, addr lWndClEx
ret
SuperClassLabel endp

скажем так.

Перевожу на всякий случай:
procedure SuperClassLabel;
lWndClEx : TWNDCLASSEX;
var
begin
lWndClEx.cbSize := sizeof(WNDCLASSEX);
GetClassInfoEx(nil,PChar("STATIC"),@lWndClEx);
OldWndproc:=lWndClEx.lpfnWndproc;
lWndClEx.lpfnWndproc:=@StaticWndproc;
lWndClEx.hInstance := hInstance;
wc.lpszClassName := PCHar(szOurClass);
RegisterClassEx(@lWndClEx);
end;

Регистрация класса в общем проходит гладко, не смотря на возможные тут опеопечатки...

Соответственно в ресурсе у меня есть диалог со статико описаннного класса (выдержка из ресторатора):

ABOUT DIALOGEX 0, 0, 217, 110, 0
STYLE DS_SETFONT | DS_MODALFRAME | DS_3DLOOK | DS_CENTER | DS_NOFAILCREATE | WS_POPUPWINDOW | WS_VISIBLE | WS_DLGFRAME
EXSTYLE = WS_EX_DLGMODALFRAME | WS_EX_WINDOWEDGE
CAPTION "somecaption"
FONT 8, "MS Shell Dlg", 0, TRUE
{
CONTROL  "sometext1 : ", 6003,"mysatticclass",SS_NOTIFY,  4, 28, 123, 10
CONTROL  "sometex21 : ", 6004,"mysatticclass",SS_NOTIFY,  4, 48, 98, 10
LTEXT "ыщьуеуче3 : ", 6010, 4, 68, 39, 10
}

Регистрация класса производится до создания диалога.
И тут основная проблема: если диалог не имеет стиля DS_NOFAILCREATE , то он не создается \ отображается вообще , а если имеет, то не создаются данные контролы.

С процедурой  StaticWndproc все в порядке.

Могу так же заметить(тест в delphi, asm), что если  не использовать диалог, и создать клавное окно, произвести суперклассин по приведеннойй выше схеме (MSDN), а затем создать окно зарегистрированного класса - то оно создается!

Заранее спасибо.
С уважением, Nick Denry.

end;


← →
Nick Denry ©   (2004-02-23 12:17) [1]

Удалено модератором
Примечание: Создание пустых сообщений.


← →
Nick Denry ©   (2004-02-24 17:38) [2]

Без АСМа  -

;Суперклассирование

procedure SuperClassLabel;
lWndClEx : TWNDCLASSEX;
var
begin
 lWndClEx.cbSize := sizeof(WNDCLASSEX);
 GetClassInfoEx(nil,PChar("STATIC"),@lWndClEx);
 OldWndproc:=lWndClEx.lpfnWndproc;
 lWndClEx.lpfnWndproc:=@StaticWndproc;
  lWndClEx.hInstance := hInstance;
 wc.lpszClassName := PCHar(szOurClass);
  RegisterClassEx(@lWndClEx);
end;
Регистрация класса в общем проходит гладко, не смотря на возможные тут опеопечатки...

Соответственно в ресурсе у меня есть диалог со статико описаннного класса (выдержка из ресторатора):
;Диалог

ABOUT DIALOGEX 0, 0, 217, 110, 0
STYLE DS_SETFONT | DS_MODALFRAME | DS_3DLOOK | DS_CENTER | DS_NOFAILCREATE | WS_POPUPWINDOW | WS_VISIBLE | WS_DLGFRAME
EXSTYLE = WS_EX_DLGMODALFRAME | WS_EX_WINDOWEDGE
CAPTION "somecaption"
FONT 8, "MS Shell Dlg", 0, TRUE
{
CONTROL  "sometext1 : ", 6003,"mysatticclass",SS_NOTIFY,  4, 28, 123, 10
CONTROL  "sometex21 : ", 6004,"mysatticclass",SS_NOTIFY,  4, 48, 98, 10
LTEXT "ыщьуеуче3 : ", 6010, 4, 68, 39, 10
}

Регистрация класса производится до создания диалога.
И тут основная проблема: если диалог не имеет стиля DS_NOFAILCREATE , то он не создается \ отображается вообще , а если имеет, то не создаются данные контролы.

С процедурой  StaticWndproc все в порядке.

Могу так же заметить(тест в delphi, asm), что если  не использовать диалог, и создать клавное окно, произвести суперклассин по приведеннойй выше схеме (MSDN), а затем создать окно зарегистрированного класса - то оно создается!

Заранее спасибо.
С уважением, Nick Denry.

end;



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

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



Память: 0.46 MB
Время: 0.02 c
3-1080798595
-+= Evgeney =+-
2004-04-01 09:49
2004.04.25
Запрос SQL


7-1077457486
HydraMarat
2004-02-22 16:44
2004.04.25
Распознавание текста


7-1078108920
Ultr
2004-03-01 05:42
2004.04.25
как определить тип носителя (жесткий, cd-rom, съмный)


1-1081589386
KEBZ
2004-04-10 13:29
2004.04.25
ProgressBar1


4-1077304401
KADAN
2004-02-20 22:13
2004.04.25
Работа со звуком




   Наверх