Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
PageFrame Height & Pageheight
Message
 
À
17/09/2002 09:05:56
Lutz Scheffler (En ligne)
Lutz Scheffler Software Ingenieurbüro
Dresden, Allemagne
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00701189
Message ID:
00701262
Vues:
20
Hi,

ok - I understand what you mean now. I thought of resizing a form and a contained pageframe that needs to be resized when the form is being resized. For this task I'm always resizing the pageframe with a ratio calculated with PageHeight/PageWidth and making sure that these properties are not less than zero. Trying to make a pageframe smaller in height than the tabs' height results in an error.

Hmmm ... I think doing ...
thisform.pageframe1.Height - thisform.pageframe1.PageHeight
worked for me some time ago. Yes, just made a test (VFP7SP1). Works well. Another idea, if the above code doesn't work for you:
LOCAL lnHeightTabs

lnHeightTabs = thisform.pageframe1.PageHeight

thisform.pageframe1.tabs = .f.
lnHeightTabs =  thisform.pageframe1.PageHeight - lnHeightTabs
thisform.pageframe1.tabs = .t.

MESSAGEBOX( lnHeightTabs )
The first code returns 30 in my test, the second 26. It seems that you should add some extra pixels for the borders.

HTH,
Armin

>My problem is to change the height of the pageframe from within resize. If something is larger than pagheight I need to change Height.
>
>.PAGEHEIGHT = lnValue
>
>is impossible, since Pageheight is readonly.
>
>The idea was to let the pagefame act like a form, where you can do:
>
>thisform.minheight = 100
>thisform.height    = 50
>?thisform.height &&100
>
>>how about only working with PageHeight? If you specify the minimum pageheight everything should work ok. Or do you have a special need to specify the minimum height of the pageframe itself?

Armin Neudert
Regional Director (Stuttgart) of German FoxPro User Group dFPUG

MCP for Visual FoxPro

Expert/Editor of the VFP section in the German Codezone community portal
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform