Hi Fellows,
I need to create something like a Floating ToolBar and as far as I
found in the NG thos could be an adecuate aproach:
hWnd := CreateWindowEx(WS_EX_TOOLWINDOW,;
PSZ(_CAST,"#32770"),; // "#32770" the Windows class name for a VO
DialogWindow
PSZ(_CAST,"ToolWin"),;
DWORD(_CAST, _OR(WS_POPUP, WS_VISIBLE ) ),;
CW_USEDEFAULT,; // just to see what are the default values
CW_USEDEFAULT,;
CW_USEDEFAULT,;
CW_USEDEFAULT,;
hParent,; // is a SplitWindow
NULL_PTR,;
hInst,;
NULL_PTR)
IF hWnd != NULL_PTR
// I get a not null ptr, so far so good !
oWin := GetObjectByHandle(hWnd)
oWin is a NULL_OBJECT
ENDIF
How would be the correct way to get oWin visible and working ?
If I use a GUI DialogWindow with
PostInit >> SetWindowLong(SELF:Handle(), GWL_EXSTYLE,
WS_EX_TOOLWINDOW)
Would it be the same ?
Is there anything special using CreateWindowEx() ?
TIA
Ernesto
|
