Dialog Help

[QM Assistant]

Like this?


Macro ( Macro22 )

Code:

Copy      Help

str controls = "3 4 8"
str e3 e4 e8
if(!ShowDialog("Dialog4" &Dialog4 &controls)) ret

Function ( Dialog4 )

Code:

Copy      Help

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

;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 209 55 "Number Dialog"
;2 Button 0x54030000 0x4 150 12 56 32 "CLOSE"
;3 Edit 0x54032000 0x200 56 20 32 14 ""
;4 Edit 0x54032000 0x200 56 36 32 14 ""
;5 Static 0x54000000 0x0 2 22 52 10 "Starting Number"
;6 Static 0x54000000 0x0 4 40 50 8 "Ending Number"
;7 Button 0x54032000 0x0 90 12 56 32 "GRAB"
;8 Edit 0x54030080 0x200 30 4 58 14 ""
;9 Static 0x54000000 0x0 8 8 18 8 "Root"
;END DIALOG
;DIALOG EDITOR: "" 0x202000B "" ""

ret
;messages
if(message=WM_INITDIALOG) DT_Init(hDlg lParam)
;int param=DT_GetParam(hDlg)

sel message
,case WM_INITDIALOG
,ret 1
,case WM_DESTROY DT_DeleteData(hDlg)
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case 7 ;;Grab
,int i a b c; str s d
,s.getwintext(id(3 hDlg)); a=val(s)
,s.getwintext(id(4 hDlg)); b=val(s)
,d.getwintext(id(8 hDlg))
,for i a b+1
,,out "%s %i" d i


,case IDOK DT_Ok hDlg
,case IDCANCEL DT_Cancel hDlg
ret 1