04-19-2009, 07:04 AM
The code below works in a list box. But it does not have a scroll bar to move down past the last one u can see.
sel(list("Rental House Income Jan 09[]Rental House Income Feb 09[]Rental House Income Mar 09[]Gas Charges Jan 09[]Gas Charges Feb 09[]Gas Charges Mar 09[]funds for year 2009 home[]funds for year 2009 office[]reports for sales of 2009[]reports for sale of 2008" "My Books" "Books"))
case 1 run "$desktop$\New Folder\New Text Document.txt"
case 2 run "$desktop$\New Folder\New Text Document (4).txt"
case 3 run "$desktop$\New Folder\t.txt"
case 4 run "$desktop$\New Folder\t1.txt"
case 5 run "$desktop$\New Folder\t54.txt"
case 6 run "$desktop$\New Folder\t7.txt"
case 7 run "$desktop$\New Folder\45t.txt"
case 8 run "$desktop$\New Folder\t55.txt"
case 9 run "$desktop$\New Folder\555t.txt"
case 10 run "$desktop$\New Folder\5555t.txt"
case else ret
What i am trying to do is get the info about to show up in the drop down scroll box in this type of dialog
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages
str controls = "3"
str cb3
if(!ShowDialog("Dialog5" &Dialog5 &controls)) ret
BEGIN DIALOG
0 "" 0x90C80A44 0x100 0 0 223 50 "Dialog"
1 Button 0x54030001 0x4 120 116 48 14 "OK"
2 Button 0x54030000 0x4 170 116 48 14 "Cancel"
3 ComboBox 0x54230243 0x0 2 24 96 213 ""
END DIALOG
DIALOG EDITOR: "" 0x2020105 "" "" ""
ret
messages
sel message
case WM_INITDIALOG
case WM_DESTROY
case WM_COMMAND goto messages2
ret
messages2
sel wParam
case CBN_SELENDOK<<16|3
_i=CB_SelectedItem(lParam)
case IDOK
case IDCANCEL
ret 1
sel(list("Rental House Income Jan 09[]Rental House Income Feb 09[]Rental House Income Mar 09[]Gas Charges Jan 09[]Gas Charges Feb 09[]Gas Charges Mar 09[]funds for year 2009 home[]funds for year 2009 office[]reports for sales of 2009[]reports for sale of 2008" "My Books" "Books"))
case 1 run "$desktop$\New Folder\New Text Document.txt"
case 2 run "$desktop$\New Folder\New Text Document (4).txt"
case 3 run "$desktop$\New Folder\t.txt"
case 4 run "$desktop$\New Folder\t1.txt"
case 5 run "$desktop$\New Folder\t54.txt"
case 6 run "$desktop$\New Folder\t7.txt"
case 7 run "$desktop$\New Folder\45t.txt"
case 8 run "$desktop$\New Folder\t55.txt"
case 9 run "$desktop$\New Folder\555t.txt"
case 10 run "$desktop$\New Folder\5555t.txt"
case else ret
What i am trying to do is get the info about to show up in the drop down scroll box in this type of dialog
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages
str controls = "3"
str cb3
if(!ShowDialog("Dialog5" &Dialog5 &controls)) ret
BEGIN DIALOG
0 "" 0x90C80A44 0x100 0 0 223 50 "Dialog"
1 Button 0x54030001 0x4 120 116 48 14 "OK"
2 Button 0x54030000 0x4 170 116 48 14 "Cancel"
3 ComboBox 0x54230243 0x0 2 24 96 213 ""
END DIALOG
DIALOG EDITOR: "" 0x2020105 "" "" ""
ret
messages
sel message
case WM_INITDIALOG
case WM_DESTROY
case WM_COMMAND goto messages2
ret
messages2
sel wParam
case CBN_SELENDOK<<16|3
_i=CB_SelectedItem(lParam)
case IDOK
case IDCANCEL
ret 1
