Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Main Screen and Forms too high and not visible
Message
 
À
06/02/2002 09:21:00
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00615981
Message ID:
00615987
Vues:
16
>Hi all, I have the following code in my main.prg which works in most instances. However, on some systems (doesn't matter the screen resolution or the OS) for some reason autocenter does not work and neither does setting the top of the form. The form and main screen will appear so high on the screen that the menu is not visible. I have not been able to isolate this problem and determine what is causing it. To fix it, we have been allowing the user to move the window down to where it is visible. However, the same monitor on a different system will show the window exactly where it should be. If there is not a resolution for what is causing this, then I would like to save the new location (.top=4 on some systems) to a registry key and restore it everytime that system starts the vfp app again. Any ideas anyone?
>
>Here is the code in main.prg:
>
>
>	With _Screen
>		 .LockScreen=.T.		&& Disable screen redraw
>		 .fontname="foxfont"
>		 .fontsize=10
>		 .fontbold=.f.
>*		 .BorderStyle=1			&& 0=no border, 3=sizeable, 1=fixed single, 2=dialog
>		 .BorderStyle=1			&& 0=no border, 3=sizeable, 1=fixed single, 2=dialog
>		 .WindowState=0			&& 2=maximized,1=minimized,0=normal
>		 .Closable=.F.			&& Can only quit by typing 99
>		 .ControlBox=.T.
>		 .MaxButton=.F.
>		 .MinButton=.T.
>*		 .Width = 640
>		 .Width = 640
>*		 .Height = 320
>		 .Height = 380
>*		 .MaxWidth = 670
>*		 .MaxHeight = 320
>		 .MinWidth = 640
>		 .MinHeight = 380
>		 .Caption="Policy Profiler 32"	&& Necessary for checking if app is already running
>		 .autocenter=.T.
>		 .LockScreen=.F.		&& Enable screen redraw
>		 .visible=.T.
>	Endwith
>
I'm sure this is a silly question but what is your ScaleMode set to?
Caroline
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform