Dialog Questions - Read-Only and Word Wrap

[redbull2k]

;\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages
str controls = "16 17 18 19 20 21 22 23 24 29 30 31 3"
str e16fs e17fu e18fp e19w e20pu e21pv e22ed e23epu e24epv e29et e30pg sb31 c3Res
if(!ShowDialog("MurFTP_Config_Dlg" &MurFTP_Config_Dlg &controls)) ret
;BEGIN DIALOG
;0 "" 0x90C80A44 0x100 0 0 245 312 "Dialog"
;16 Edit 0x54030084 0x200 56 9 96 14 "fs"
;17 Edit 0x54030084 0x200 56 25 96 14 "fu"
;18 Edit 0x54030084 0x200 56 41 96 14 "fp"
;19 Edit 0x54030084 0x200 56 57 96 14 "w"
;20 Edit 0x54030084 0x200 56 73 96 14 "pu"
;21 Edit 0x54030084 0x200 56 89 96 14 "pv"
;22 Edit 0x54030084 0x200 56 116 96 14 "ed"
;23 Edit 0x54030084 0x200 56 144 178 28 "epu"
;24 Edit 0x54030084 0x200 56 174 178 28 "epv"
;29 Edit 0x54030084 0x200 56 216 176 14 "et"
;30 Edit 0x54030084 0x200 56 242 176 14 "pg"
;1 Button 0x54030001 0x4 136 290 48 15 "OK"
;14 Static 0x54000000 0x0 6 218 50 12 "Event Types"
;2 Button 0x54030000 0x4 186 290 48 15 "Cancel"
;4 Static 0x54000000 0x0 6 10 48 13 "FTP Server"
;5 Static 0x54000000 0x0 6 26 48 13 "FTP User"
;6 Static 0x54000000 0x0 6 42 48 13 "FTP Password"
;8 Static 0x54000000 0x0 6 58 48 13 "Web Address"
;9 Static 0x54000000 0x0 6 74 48 13 "Public Subdir"
;10 Static 0x54000000 0x0 6 90 48 13 "Private Subdir"
;11 Static 0x54000000 0x0 6 118 48 12 "Audio Editor"
;12 Static 0x54000000 0x0 6 148 48 13 "Email List (pub)"
;13 Static 0x54000000 0x0 6 176 48 12 "Email List (priv)"
;15 Static 0x54000000 0x0 6 244 46 13 "Ping URL"
;31 Static 0x5400100E 0x20000 162 6 74 126 ""
;3 Button 0x54012003 0x0 6 284 94 21 "Restore Defaults [](Tick > OK)"
;33 Button 0x54032000 0x0 114 268 48 14 "Enable"
;32 Button 0x54020007 0x0 2 276 102 30 ""
;28 Button 0x54020007 0x0 2 236 236 24 ""
;27 Button 0x54020007 0x0 2 210 236 24 ""
;26 Button 0x54020007 0x0 2 138 236 68 ""
;25 Button 0x54020007 0x0 2 110 154 24 ""
;7 Button 0x54020007 0x0 2 2 154 104 ""
;END DIALOG
;DIALOG EDITOR: "" 0x2030002 "" "" ""

ret
;messages
sel message
,case WM_INITDIALOG
,EnableWindow(id(16 hDlg) 0)
,EnableWindow(id(17 hDlg) 0)
,EnableWindow(id(18 hDlg) 0)
,EnableWindow(id(19 hDlg) 0)
,EnableWindow(id(20 hDlg) 0)
,EnableWindow(id(21 hDlg) 0)
,EnableWindow(id(22 hDlg) 0)
,EnableWindow(id(23 hDlg) 0)
,EnableWindow(id(24 hDlg) 0)
,EnableWindow(id(29 hDlg) 0)
,EnableWindow(id(30 hDlg) 0)
,case WM_DESTROY
,case WM_COMMAND goto messages2
ret
;messages2
sel wParam
,case 33
,str Disable Enable
,_s.getwintext(id(33 hDlg))
,if _s = "Disable"
,,Enable = "Enable"
,,Enable.setwintext(id(33 hDlg))
,,EnableWindow(id(16 hDlg) 0)
,,EnableWindow(id(17 hDlg) 0)
,,EnableWindow(id(18 hDlg) 0)
,,EnableWindow(id(19 hDlg) 0)
,,EnableWindow(id(20 hDlg) 0)
,,EnableWindow(id(21 hDlg) 0)
,,EnableWindow(id(22 hDlg) 0)
,,EnableWindow(id(23 hDlg) 0)
,,EnableWindow(id(24 hDlg) 0)
,,EnableWindow(id(29 hDlg) 0)
,,EnableWindow(id(30 hDlg) 0)
,else
,,Disable = "Disable"
,,Disable.setwintext(id(33 hDlg))
,,EnableWindow(id(16 hDlg) 1)
,,EnableWindow(id(17 hDlg) 1)
,,EnableWindow(id(18 hDlg) 1)
,,EnableWindow(id(19 hDlg) 1)
,,EnableWindow(id(20 hDlg) 1)
,,EnableWindow(id(21 hDlg) 1)
,,EnableWindow(id(22 hDlg) 1)
,,EnableWindow(id(23 hDlg) 1)
,,EnableWindow(id(24 hDlg) 1)
,,EnableWindow(id(29 hDlg) 1)
,,EnableWindow(id(30 hDlg) 1)

,case IDOK
,case IDCANCEL
ret 1

i have made the edit boxes multiline, u may need to make edit boxes thicker to display multi line i havent played much with them b4.
started the edit boxes disabled
there is button there to enable them and vice verser.

not sure about ini files,


and also for ur outputs ive made it proberly a bit reader friendly

out "NEW OUTPUT INI DATA"
out "%s -- editor" editor
out "%s -- fserver" fserver
out "%s -- uname" uname
out "%s -- pword" pword
out "%s -- pubdir" pubdir
out "%s -- privdir" privdir
out "%s -- website" website
out "%s -- pub_mailto" pub_mailto
out "%s --priv_mailto" priv_mailto

out "%s -- pingurl" pingurl
out "%s -- etypelist" etypelist
out ""