Thank you very much
>>Hi all,
>>
>>I have dropped the web on themed control (available at codeplex) it's all good stuff. However the vertical scrollbar is missing when it should be there. Any ideas how I can force it to show please.
>
>
>Public oForm
>Local lcHTML
>oForm = Newobject('HTMLViewerForm')
>oForm.Show
>With oForm.htmlviewer
> .navigate2("about:blank")
>
> TEXT TO lcHTML noshow
><html>
><body scroll="no">
>Remove <font color=#FF0000>scroll="no"</font> from body element<br><br>
><input
> type="button"
> value="Click here to toggle scroll bar"
> OnClick='return body.scroll=(body.scroll=="yes"?"no":"yes")'/>
></body>
></html>
> ENDTEXT
>
> .Document.Write(m.lcHTML)
>Endwith
>
>Define Class HTMLViewerForm As Form
> Height = 500
> Width = 800
> Add Object htmlviewer As OleControl With ;
> height = 500, Width = 800, Anchor=15, ;
> oleclass = 'Shell.Explorer'
>
> Procedure htmlviewer.Refresh
> Nodefault
> Endproc
>Enddefine
>Cetin
Mathias Banda
Time is longer than a rope.
