Wilson WindowWare Tech Support

WinBatch WinBatch+Compiler WebBatch
Home | Tech Database | Tech BBS | White Papers | Purchase


Alternative to HTML Dialogs

Keywords: 	 Alternative to HTML Dialogs

Question:

I see that the HTML Dialog Extender is no longer supported.

I need to display a big text block. How can I do that now? I believe that the standard dialog can only display up to 256 characters of a variable.

With the HTML Dialog extender, I would of used a "TEXTAREA" html command. What can I use now? Or is there a way to get the latest HTML extender that was available?

Answer:

In the new dialogs the multi-line edit box can support *lots* of text:
;Find the WinBatch list of fixes and improvements
wbsystemdir=DirHome()
DirChange(DirHome())
DirChange("..")  ; go up one level
thefile="The list of fixes and improvements.txt"
bbsize=FileSize(thefile)
bb=BinaryAlloc(bbsize)
BinaryRead(bb,thefile)
TheData=BinaryPeekStr(bb,0,bbsize)
BinaryFree(bb)


;Display it
MyDialogFormat=`WWWDLGED,6.1`

MyDialogCaption=`Demo`
MyDialogX=002
MyDialogY=030
MyDialogWidth=331
MyDialogHeight=240
MyDialogNumControls=003
MyDialogProcedure=`DEFAULT`
MyDialogFont=`DEFAULT`
MyDialogTextColor=`DEFAULT`
MyDialogBackground=`DEFAULT,128|255|255`
MyDialogConfig=1

MyDialog001=`058,202,034,011,PUSHBUTTON,DEFAULT,"OK",1,1,32,"Microsoft Sans Serif|5325|70|34","255|255|0","0|64|128"`
MyDialog002=`225,202,033,011,PUSHBUTTON,DEFAULT,"Cancel",0,2,DEFAULT,"Microsoft Sans Serif|5325|70|34","255|255|0","0|64|128"`
MyDialog003=`017,018,284,174,MULTILINEBOX,TheData,"Multiline edit 1",DEFAULT,3,DEFAULT,"Microsoft Sans Serif|6144|70|34","0|0|0","255|255|128"`

MyDialogButtonPushed=Dialog("MyDialog")