Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How to stop forms cascading inside Main VFP Window?
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00440479
Message ID:
00440564
Views:
15
I have AutoCenter set to .T. for all of my forms. And I checked to make sure that all forms were set to Left 0 and Top 0. It must be some other property that is doing it. I have all of the properties in all of my forms set as follows and all forms are modal:

Always on Top .F.
AutoCenter .T.
BorderStyle 1
Closable .F.
ControlBox .F.
Desktop .F.
Height 390
MaxButton .F.
MinButton .F.
Movable .F.
ShowWindow 0
Width 640
Window State 2

I set my main VFP window with the following settings:
* Local variables to store current settings
Local oldScreenLeft
Local oldScreenTop
Local oldScreenHeight
Local oldScreenWidth
Local oldScreenColor
WITH _SCREEN
	oldScreenLeft=.Left && Save current position and size
	oldScreenTop=.Top
	oldScreenHeight=.Height
	oldScreenWidth=.Width
	oldScreenColor=.Backcolor
	.AutoCenter=.T.
	.LockScreen=.T.	&& Disable screen redraw
	.BackColor=rgb(192,192,192)	&& Change the background to grey
	.BorderStyle=2	&& Change the border to double
	.Closable=.F.	&& Remove the window control buttons
	.ControlBox=.F.
	.MaxButton=.F.
	.MinButton=.F.
	.Movable=.T.
	.Height=440
	.Width=640
	.Caption="MED CONTROL"	&& Set a caption
	.Lockscreen=.F.	&& Enable screen redraw
ENDWITH
Thanks again for the help.
Steve Kramer
Kramer & Kramer Design
"Home of Go Cartoons"
Web Site: www.stephenkramer.com
Would you believe Far Side Lite?
More than 270 original cartoons.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform