Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Scroll bars and custom statusbar
Message
De
07/04/2004 08:32:34
 
 
À
07/04/2004 07:46:36
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00892853
Message ID:
00892869
Vues:
16
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.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform