Exe/Dialog with browser

[_pi]

i have this one.
need to understand how to have open it maximized.

Code:

Copy      Help

\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages

Web browser control is defined in SHDocWv type library, which is already declared, so we don't have to declare it again.

if(!ShowDialog("Dialog_with_web_browser" &Dialog_with_web_browser 0 _hwndqm)) ret

BEGIN DIALOG
0 "" 0x10CF0A44 0x100 0 0 1200 697 "Form"
3 ActiveX 0x54000000 0x4 0 16 1100 600 "SHDocVw.WebBrowser"
4 Button 0x54032001 0x4 0 0 48 14 "Back"
5 Button 0x54032000 0x4 48 0 48 14 "Forward"
6 Button 0x54032000 0x0 96 0 48 14 "Stop"
7 Button 0x54032000 0x0 144 0 48 14 "Refresh"
8 Button 0x54032000 0x0 192 0 48 14 "Home"
END DIALOG
DIALOG EDITOR: "" 0x2040500 "" "" "" ""


ret
messages
sel message
    case WM_INITDIALOG
    DT_Init(hDlg lParam)
    
    SHDocVw.WebBrowser we3._getcontrol(id(3 hDlg))
    we3._setevents("we3_DWebBrowserEvents2")
    we3.Navigate("http://tickets.stageled.com")
    
    ret 1
    
    case WM_SIZE
    RECT r; GetClientRect(hDlg &r)
     MoveWindow id(3 hDlg) 0 30 r.right r.bottom-30 1
    
    case WM_DESTROY
    DT_DeleteData(hDlg)
    
    case WM_COMMAND goto messages2
ret
messages2
sel wParam
    case [4,5,6,7,8]
    err-
    we3._getcontrol(id(3 hDlg))
    sel wParam
        case 4 we3.GoBack
        case 5 we3.GoForward
        case 6 we3.Stop
        case 7 we3.Refresh
        case 8 we3.GoHome
    err+
    
    case IDOK DT_Ok hDlg
    case IDCANCEL DT_Cancel hDlg
ret 1