Scrolling an htmlView control after browser dimensions change

1

Simple app: form (frmMain) that has a header, a dropdown below it, and a bunch of overlapping htmlView controls (contIt_Infections, contIt_Cardio, etc) that I show and hide as needed. The htmlView controls need to scroll. Works great in the app version. For the browser version, when I reduce the vertical height of the browser window too much it doesn’t scroll to the bottom of the view. Trying to fix that by setting htmlView to same height and width as the form:

Function frmMain_onresize()
    ' adjusts for 70 pixel offset due to header and dropdown
    Dim actualHeight = frmMain.height
    Dim actualWidth = frmMain.width 
    MsgBox CStr(actualHeight)
    frmMain.height = actualHeight
    frmMain.width = actualWidth
    contIt_Infections.height = actualHeight - 70
    contIt_Infections.top = 70
    contIt_Infections.width = actualWidth
    contIt_Infections.refresh()
  End Function

This doesn’t seem to do anything. My form’s height and width are set to auto. Position is absolute. And the Msgbox shows “undefined” as the value for actualHeight. Any advice appreciated.

2

I had a situation like this recently with a grid control, it wouldn’t scroll after displaying another form. Refreshing the control or form didn’t work. I fixed it by resetting the schrolHeight property:

grdShop.scrollHeight = maxGrid 'this is needed to make the grdShop continue scrolling.

where maxGrid was previously set as the height of the control. The htmlView control has a schrollHeight property as well.

John