How to call multiple dialogs simultaneously.

[TheVig]

Make sure you put that particular code in the dialog for B...otherwise I don't think it will work.

Function Dialog_1_TheVig

Code:

Copy      Help

;\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages
str controls = "3 4"


str e4
sel message
,case 0 ;;on WM_INITDIALOG of the parent dialog
,ret ShowDialog("" &Dialog_1_TheVig &controls wParam 1 WS_CHILD 0 0 0 200)
,case 1 ;;on OK of the parent dialog
,;hDlg=lParam
,;DT_GetControls hDlg &controls
,;out e4

;BEGIN DIALOG
;4 "" 0x10040644 0x0 0 0 100 100 "Dialog B"
;3 Static 0x54000000 0x0 2 2 48 12 "B"
;4 Button 0x54012003 0x0 2 16 48 12 "Attatched"
;END DIALOG
;DIALOG EDITOR: "" 0x2030001 "" "" ""

ret
;messages
sel message
,case WM_INITDIALOG
,str c4Att=1
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case 4
,int h1=child("Dialog B" "#32770" win("Dialog" "#32770") 0x1)
,Acc a=acc("Attatched" "CHECKBUTTON" win("Dialog" "#32770") "Button" "" 0x1001)
,int state=a.State()
,out state
,if state=1048580
,,SetWinStyle h1 WS_CAPTION|WS_BORDER|WS_THICKFRAME 1|8
,if state=1048596
,,SetWinStyle h1 WS_CAPTION|WS_BORDER|WS_THICKFRAME 2|8

ret 1