Enrico Maria Giordano wrote:It seems to work fine. I have to test it thoroughly. Thank you.It should work fine, please try it :-)Ok, I'll try, thank you.
It is just one more stack call
FiveTech Support Forums
FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Set a specific starting function
Page: 1 2 (21 posts)
What do you think about something like this?
IF TYPE( "MAIN()" ) = "UI"
  MAIN()
  QUIT
ENDIF
Sorry, Enrico,
I forgot to answer you.
For 'INIT PROCEDURE' there is good documentation in the xHarbour Language Reference Guide.chm.
Also an example under 'EXIT PROCEDURE'.
Regards, Detlef
I don't understand your message, sorry. I already proposed (in my previous message) the following code at the end the INIT function:
Works fine for me. I would only like to know your thoughts about it. If there is not a public function called MAIN the code behavior is the usual one. Otherwise the function MAIN is run and, at the end, a QUIT allows the program to exit.
IF TYPE( "MAIN()" ) = "UI"
  MAIN()
  QUIT
ENDIF
Dear Enrico,
If it works fine for you then use it and lets wait to see if there are any issues
I'm not going to use it for now but I keep it for the future. Thank you.
Page: 1 2 (21 posts)