Controlling a multipage dialog

[redbull2k]

Function Dialog84

Code:

Copy      Help

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

str controls = "3 7 8"
str lb3 o7Pre o8Nex
lb3="Page0[]Page1[]&Page2"
if(!ShowDialog("Dialog84" &Dialog84 &controls)) ret

;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 265 163 "Dialog"
;3 ListBox 0x54230101 0x204 4 4 96 80 ""
;1001 Static 0x54020000 0x4 106 4 48 13 "Page0"
;1101 Static 0x44020000 0x4 106 4 48 13 "Page1"
;1201 Static 0x44020000 0x4 106 4 48 13 "Page2"
;1 Button 0x54030001 0x4 12 144 48 14 "OK"
;2 Button 0x54030000 0x4 192 146 48 14 "Cancel"
;4 Button 0x54032000 0x4 242 146 18 14 "?"
;5 Static 0x54000010 0x20004 4 138 256 1 ""
;7 Button 0x54033009 0x4 68 146 56 14 "< Previous"
;8 Button 0x54003009 0x4 128 146 56 14 "Next >"
;END DIALOG
;DIALOG EDITOR: "" 0x2030001 "" "0" ""

ret
;messages
sel message
,case WM_INITDIALOG
,goto selectpage
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case 7
,int tt = LB_SelectedItem(id(3 hDlg))
,tt-1
,LB_SelectItem id(3 hDlg) tt
,DT_Page hDlg tt
,case 8
,int t = LB_SelectedItem(id(3 hDlg))
,t+1
,LB_SelectItem id(3 hDlg) t
,DT_Page hDlg t
,case IDOK
,case IDCANCEL
,case LBN_SELCHANGE<<16|3
,;selectpage
,_i=LB_SelectedItem(id(3 hDlg))
,DT_Page hDlg 0 _i
ret 1

something like this?