Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Scrolling Forms
Message
 
To
15/06/1998 17:25:46
Raymond Humphrys
Michigan Department of Community Health
Bath, Michigan, United States
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00086569
Message ID:
00108423
Views:
86
>>>I named the vertical scrollbar - VertScroll
>>>
>>>In the CHANGE event I put the lines:
>>>
>>>SCROLLFACTOR = ;
>>> 32767 / (THISFORM.pageframe1.height - thisform.height- 20)
>>>
>>>THISFORM.pageframe1.Top = 0 - This.value / ScrollFactor)
>>>
>>>ThisForm.pageframe1.refresh
>>>
>>>What I don't see is where this.value comes from?
>>>
>>>ray
>>
>>VALUE does not appear on my property list for the scroll bars, but the property is still functional. Did you test the presence of VALUE using either the debugger or [WAIT WINDOW STR(THIS.Value)] after the CHANGE event is triggered?
>>
>>Michael
>
>I put the WAIT window command in the Change Event and I received the same error as before. I must not have this stuff laid out correctly. Did I have to create any special PEMS for any of these objects? When I queried for the contents of VALUE the debugger told me that it could not be evaluated. When I look at the object hierarchy I have a FORM, a PageFrame and 2 scrollbars VERTSCROLL and HORIZSCROLL. Am I missing anything?
>
>ray

Well, well, well... I just discovered what could be going on here. Apparently, you are using VFP5 and my code was written in VFP3. I just tested the code on VFP5 and am getting the errors you describe. The code still works fine in VFP3. We seem to have a backward compatibility issue here, and I am unsure of what is causing it at the moment. Unfortunately, I don't have much time to figure out the problem. If you have access to VFP3, I suggest you try it there and see if you can uncover what is happening. As time permits, I will check it out too.

Sorry about how this has gone. I'm sure it must be frustrating to be told that the code works and still have trouble with it. Good luck with your efforts. I will let you know if I find anything.

Michael Reynolds
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform