Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Scroll bars and custom statusbar
Message
From
07/04/2004 08:32:34
 
 
To
07/04/2004 07:46:36
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00892853
Message ID:
00892869
Views:
17
Thank you, Fabio. :)

>
>...
>I could move it if I'd know the height of the visible part of the form. However, I was unable to find such propriety. Does anyone knows how to find that info?
>

>
>Use this W API:
>
>* Add this method to the form root class and call by reference
>PROCEDURE GetClientRect
>LPARAMETERS l,t,r,b
>IF m.this.ShowWindow=SHOWWINDOW_AS_TOP
>    GetWindowRect(m.this.HWnd_client,@m.l,@m.t,@m.r,@m.b)
>ELSE
>    STORE m.this.Left+GetSizingBorderWidth			TO l
>    STORE m.this.Top+GetWindowTitleHeight+GetSizingBorderHeight	TO t
>    STORE m.l+m.this.Width-GetSizingBorderWidth			TO r
>    STORE m.this.Top+m.this.Height-GetSizingBorderHeight	TO b
>ENDIF
>
>GetSizingBorderWidth,... are re #define of SYSMETRIC(...)
Grigore Dolghin
Class Software.
Previous
Reply
Map
View

Click here to load this message in the networking platform