Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Double Title Bar On Dialog?
#1
How do i make a double title bar on dialog.. instead of how it is by default a single line make it double?
#2
Like in Internet Explorer on Vista?
#3
yes like on vista
#4
Function dlg_extend_caption
Code:
Copy      Help
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages

if(!ShowDialog("dlg_extend_caption" &dlg_extend_caption 0)) ret

;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 223 143 "Dialog"
;1 Button 0x54030001 0x4 120 116 48 14 "OK"
;2 Button 0x54030000 0x4 170 116 48 14 "Cancel"
;END DIALOG
;DIALOG EDITOR: "" 0x2030006 "*" "" ""

ret
;messages

type MARGINS cxLeftWidth cxRightWidth cyTopHeight cyBottomHeight
dll- dwmapi #DwmExtendFrameIntoClientArea hWnd MARGINS*pMarInset
dll- dwmapi #DwmIsCompositionEnabled *pfEnabled
def WM_DWMCOMPOSITIONCHANGED 0x031E

sel message
,case WM_INITDIALOG
,;g1
,if(_winnt>=6 and !DwmIsCompositionEnabled(&_i) and _i)
,,MARGINS m.cyTopHeight=50
,,DwmExtendFrameIntoClientArea hDlg &m
,
,case WM_ERASEBKGND
,if(_winnt>=6 and !DwmIsCompositionEnabled(&_i) and _i)
,,RECT r; GetClientRect hDlg &r
,,FillRect wParam &r COLOR_BTNFACE+1
,,r.bottom=50
,,FillRect wParam &r GetStockObject(BLACK_BRUSH)
,,ret DT_Ret(hDlg 1)
,
,case WM_DWMCOMPOSITIONCHANGED goto g1
,
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case IDOK
,case IDCANCEL
ret 1

This is for Vista and later.
#5
tyvm bro
#6
What am I missing? I am using Win XP and when I run this macro all it does is show a normal dialog. Does this need Vista or can I use XP? Can you tell me what is Double Title Bar?
#7
The title bar is twice the height. It works on one of my computers but not the other...?
#8
This is for Vista and later, where title bar of all windows is partially transparent. Part or all client area also can be transparent like title bar. Like in IE and folders.


Forum Jump:


Users browsing this thread: 1 Guest(s)