INIT PROCEDURE MainInit()
LOCAL cTitle := "FiveWin TGrid Listview Demo " + cVersion
LOCAL hWndDlg := FindWindowEx(,,, cTitle )
IF !( hWndDlg == 0 )
SetForegroundWindow( hWndDlg )
BringWindowToTop( hWndDlg )
ShowWindow( hWndDlg, 1 )
UpdateWindow( hWndDlg )
QUIT // It is a second instance. Bye Bye
ENDIF
RETURN
PROCEDURE Main()
Enrico Maria Giordano wrote:Thank you, but this is not what I'm asking for.
Enrico Maria Giordano wrote:I have many PRGs and a function MAIN() inside one of those (not the first linked).
How can I force the function MAIN() to be executed as the first function?
hbmk2 -hhh
...
-main=<mainfunc> sustituye el nombre de la función o procedimento inicial
...
Antonio Linares wrote:It should work fine, please try it
It is just one more stack call
carlos vargas wrote:usinghbmk2 -hhh
open the help file of hbmk2 with parameters in notepad...
-main=<mainfunc> sustituye el nombre de la función o procedimento inicial
...
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 48 guests