10-03-2008, 06:07 PM
After if(t = 2) insert
Function My_Dialog87
Or place the buttons in a separate page, and with DT_Page use special string that shows two pages simultaneously.
Function My_Dialog87
Function My_Dialog87
Or place the buttons in a separate page, and with DT_Page use special string that shows two pages simultaneously.
Function My_Dialog87
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages
str controls = "1208"
str e1208
if(!ShowDialog("My_Dialog87" &My_Dialog87 &controls)) ret
;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 265 163 "Dialog"
;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 "?"
;2005 Button 0x54033004 0x4 68 146 56 14 "< Previous"
;2006 Button 0x54003004 0x4 128 146 56 14 "Next >"
;1208 Edit 0x54030080 0x200 16 64 96 14 ""
;1209 Static 0x54000000 0x0 24 88 48 12 "Text"
;END DIALOG
;DIALOG EDITOR: "" 0x2030001 "" "0" ""
ret
;messages
lpstr pagemap="(0 10) (1 10) 2"
sel message
,case WM_INITDIALOG
,DT_Page(hDlg 0 pagemap)
,EnableWindow(id(5 hDlg)0)
,int-- t; t = 0
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case 2006 ;;Next
,EnableWindow(id(5 hDlg)1)
,t+1
,if(t = 2)
,,EnableWindow(id(6 hDlg)0)
,DT_Page(hDlg t pagemap)
,
,case 2005 ;;Previous
,EnableWindow(id(6 hDlg)1)
,t-1
,if(t = 0)
,,EnableWindow(id(5 hDlg)0)
,DT_Page(hDlg t pagemap)
,case IDOK
,case IDCANCEL
ret 1