Hi
The following will scroll automatically the form up or down if the object with focus is in non-visible area.
But it needs to be in every base class (for me this means a subclass of VFP bas class) When or GotFocus code
IF this.Tag = 'isfirst'
thisform.ViewPortTop = 0
return
ENDIF
IF OBJTOCLIENT(this,1) < thisform.ViewPortTop
thisform.SetViewPort(0,OBJTOCLIENT(this,1)- 8 )
ENDIF
IF OBJTOCLIENT(this,1)+this.Height > thisform.ViewPortTop + thisform.ViewPortHeight
thisform.SetViewPort(0,OBJTOCLIENT(this,1)+this.Height + 8 -thisform.ViewPortHeight)
ENDIF
>Hi,
>
>It's there anybody who use a form with scrollbars????? How works????
>
>Thank you for your advice & sorry for my english
>
>Edmundo Ríos Miranda