Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Programmically scroll on form.
Message
From
23/07/2001 00:22:36
 
 
To
22/07/2001 20:07:30
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00533630
Message ID:
00533764
Views:
12
>>I have a form with about 10 containers but only 7 are visible. As I tab through the containers, I want to programmically scroll the form. So when the cursor is in a container that is outside of the viewable area of the form, I want the form to be refreshed with the container visible.
>>
>>Ideas?
>
>in each container.focus()
>
>local loControl, lnMove
>
>do case
>case THIS.TOP<0
>lnMove = THIS.TOP
>case THIS.TOP+THIS.HEIGHT>THISFORM.HEIGHT
>lnMove = THIS.TOP+THIS.HEIGHT - THISFORM.HEIGHT
>otherwise
>lnMove = 0
>endcase
>
>if lnMove<>0
>THISFORM.LOCKSCREEN = .T.
>for each loControl in THISFORM.CONTROLS
>loControl.TOP = loControl.TOP - lnMove
>endfor
>THISFORM.LOCKSCREEN = .F.
>endif

I guess I was looking too deep. Your suggestion makes perfect sense.

Thanx.
Fred Lauckner

You know, it works on my computer. I don't know what your problem is.

.Net aint so bad.
Previous
Reply
Map
View

Click here to load this message in the networking platform