Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Start method of the application object
Message
From
17/05/2021 12:26:32
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Start method of the application object
Miscellaneous
Thread ID:
01680506
Message ID:
01680506
Views:
47
Hi,

I am looked at the error log and the images that the error routine creates when an error occurs. And everywhere where the application cannot find the file password.fxp, the screen image shows that the application was not loaded yet (not tool bar or menu appear). Sometimes just the application main windows without any toolbar or menu. The error log ends (as far as Stack Level) with the call to APPLICATION_SETUP.START (before it goes to the ERROR_MANAGER.ERRORHANDLER). And the main PRG does have a code
oApp.start()
The code in application class START method is as follows:
PROCEDURE Start
	do while .T. 
		read events
              *-- method .cleanup() closes all open forms.
		if this.cleanup()
			on shutdown
                     *-- Method cleanup2() does basically nothing. Just two lines:
                     *-- POP MENU _MSYSMENU TO MASTER
	              *-- SET SYSMENU TO DEFAULT
			this.cleanup2()
			if type('oPassword') = 'O' .and. !ISNULL( oPassword )
				oPassword.Close_user_login_file()
				oPassword.destroy()  
				oPassword = .NULL.
				release oPassword
			endif
			exit
		endif

	enddo
My understanding that on the Start of the application the code does not go below the line READ EVENTS above. So, the Cleanup() and cleanup2() should not really affect the start.

Anybody see what could be wrong in the code above? Or what IS wrong in the code above?

TIA
"The creative process is nothing but a series of crises." Isaac Bashevis Singer
"My experience is that as soon as people are old enough to know better, they don't know anything at all." Oscar Wilde
"If a nation values anything more than freedom, it will lose its freedom; and the irony of it is that if it is comfort or money that it values more, it will lose that too." W.Somerset Maugham
Next
Reply
Map
View

Click here to load this message in the networking platform