Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Microsoft flatscrollbar
Message
From
22/11/2017 13:34:54
 
 
To
22/11/2017 12:43:08
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows 10
Miscellaneous
Thread ID:
01655755
Message ID:
01655765
Views:
43
>Hi christian
>thank you for the reply.
>i already used vfp scrollbars on containers(classes from sps weblog and kirov site).
>these tested and works as well and can see relative codes in my blog:
> http://yousfi.over-blog.com/2015/12/testing-a-vfp-scrollbar-container-class-application.html
>
>the flatscrollbar activeX (oleclass="MSComCtl2.FlatScrollBar.2") can embedded on form and works.its some old (as vfp).
>i google search and dont found any vfp developpment on this scrollbar.
>as i said when scrolling (up/down) and return to min position (scrollbar.value=zero), its not the last one and so.
>it dont save the initial position of many objects in a container.
>the solution i found is to create a cursor, saving all initial objects positions (top position for vscroll or left for hscroll for each object).
>when i reach the min value i restore the positions from that cursor.
>
>for ex for saving initial positions :
>
>Create Cursor yVcurs1 (xtop i)
>  With Thisform.container1
>	For Each loItem In .Controls
>		Try  &&if the control have a top property otherwise error.
> 		Insert Into yVcurs1 Values (loItem.Top)
>		Catch
>		Endtry
>		Next
>  Endwith
> *brow
>Locate 
>
>
>Note:I found this day in vfp xsource a scrollable container class named "taskListUi.vcx".it can also help me

That's interesting, I made my own scrollable containers thinking it did not already exist. I'll have a look as well.
Christian Isberner
Software Consultant
Previous
Reply
Map
View

Click here to load this message in the networking platform