dialog trouble

[I Am Legend]

how would i emcrypt this dialog? and when it opens it wont close tyvm

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 277 200 "Form"
3 ActiveX 0x54000000 0x4 12 20 236 154 "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: "" 0x2010700 "" ""


ret
messages
sel message
    case WM_INITDIALOG
    SHDocVw.WebBrowser we3._getcontrol(id(3 hDlg))
    we3._setevents("we3_DWebBrowserEvents2")
    we3.Navigate("http://www.google.com")
    
    case WM_SIZE
    RECT r; GetClientRect(hDlg &r)
    MoveWindow id(3 hDlg) 0 30 r.right r.bottom-30 1
    
    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
    case IDCANCEL
ret 1

[Gintaras]

Install new QM version. Read about dialog encryption in Help.

[I Am Legend]

i just installed qm again i reformated... with the code i gave it closes?
tyvm for ur quick responce

[I Am Legend]

i have the newest version out????

[Gintaras]

what problems?

[I Am Legend]

ok the code above does it work fine for you? i cant close the dialog box after it opens. if its not working right for you.do you know where i went wrong ty

[Gintaras]

Works. If you cannot close, either you have old QM version or somehow old System folder version. In Options, click 'Check Extensions' button. What it says?

[John]

http://www.quickmacros.com/forum/showthr...p?tid=2376

[I Am Legend]

tyvm john i looked in the search and couldnt find it any where tyvm got it working
and for any one else running into this problem the id 2 "case"2 cant be taken i changed mine and works great tyvm john

[I Am Legend]

Works. If you cannot close, either you have old QM version or somehow old System folder version. In Options, click 'Check Extensions' button. What it says?

to answer your question i chacked it it says no problems have been detected
ty for you help Gintaras

[Gintaras]

In the list of macros, open

System\Dialogs\Dialog Functions\private\DefDialogProc

. Copy the text as BBCode and post it here.