Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Splash screen before entering a form
Message
General information
Forum:
Visual FoxPro
Category:
The Mere Mortals Framework
Miscellaneous
Thread ID:
00389079
Message ID:
00389089
Views:
25
>I need to display a splash screen in the background while a form is loading. The form has a complicated SQL Server query that can take some time to get results back. Is there something in the framework to handle this?

You don't really need a framework peice, just create a form with out a title bar:
oSplash = createobject('splasher')
oSplash.Show()
wait window "run the form" timeout 5
oSplash.Hide()
DEFINE CLASS splasher AS form


	Top = 0
	Left = 0
	Height = 172
	Width = 377
	DoCreate = .T.
	Caption = "Form5"
	TitleBar = 0
	Name = "splasher"
	AutoCenter = .T.

	ADD OBJECT label1 AS label WITH ;
		FontBold = .T., ;
		FontSize = 40, ;
		FontUnderline = .T., ;
		WordWrap = .T., ;
		Alignment = 2, ;
		Caption = "Big Flashy Splash!", ;
		Height = 144, ;
		Left = 10, ;
		Top = 16, ;
		Width = 349, ;
		ForeColor = RGB(0,0,128), ;
		Name = "Label1"
ENDDEFINE
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform