try this if this doesn't work may have to disable windows theme on the dialog possible may not work as well.
I cannot test on win7 today will try tomorrow
Function dialog_full_screen3a
I cannot test on win7 today will try tomorrow
Function dialog_full_screen3a
str dd=
;BEGIN DIALOG
;0 "" 0x90CF0AC8 0x0 0 0 224 136 "Dialog"
;3 ActiveX 0x54030000 0x0 0 0 224 136 "SHDocVw.WebBrowser {8856F961-340A-11D0-A96B-00C04FD705A2}"
;END DIALOG
;DIALOG EDITOR: "" 0x2040700 "*" "" "" ""
WebBrowserControlDisableIE7Emulation
str controls = "3"
str ax3SHD=
;<html>
;<head><script type="text/javascript">document.location.href="http://static.flipbuilder.com/demo/sysco-seafood/index.html#p=1";</script></head>
;<body style="border: 0px; margin: 0px; overflow: hidden;">
;</body>
;</html>
if(!ShowDialog(dd &sub.DlgProc &controls)) ret
#sub DlgProc
function# hDlg message wParam lParam
sel message
,case WM_INITDIALOG
,DT_SetAutoSizeControls hDlg "3s"
,int- t_hdlg t_kh
,t_hdlg=hDlg
,t_kh=SetWindowsHookEx(WH_KEYBOARD_LL &DAKH_HookProc _hinst 0)
,SetWinStyle hDlg WS_CAPTION 2
,SetWinStyle hDlg WS_BORDER 2
,int bco= id(3 hDlg)
,SetWinStyle bco WS_BORDER 2
,max hDlg
,case WM_APP+10
,FormatKeyString lParam 0 &_s
,if _s = "F11"
,,if max(hDlg)
,,,SetWinStyle hDlg WS_CAPTION 1
,,,SetWinStyle hDlg WS_BORDER 1
,,,res hDlg
,,else
,,,SetWinStyle hDlg WS_CAPTION 2
,,,SetWinStyle hDlg WS_BORDER 2
,,,max hDlg
,case WM_DESTROY
,,UnhookWindowsHookEx t_kh
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case IDOK
,case IDCANCEL
ret 1