Hi Viktor,
Now the event handler is executed.
For example with the program t.prg .-
< --- t.prg --- >
Procedure Main()
Local cArg := hb_CmdLine()
REQUEST HB_GT_WVG
REQUEST HB_GT_WIN
REQUEST HB_GT_NUL_DEFAULT
if !Empty(cArg) .and. (Val(cArg) == 1) .and. !('//GTWIN' $ cArg)
hb_gtReload( 'WVG' )
else
hb_gtReload( 'WIN' )
endif
? "Click [X] to close windows console "
while( LastKey() != 27 )
Inkey( 1 )
enddo
Wait
return
< ---------- >
We will have the same compartment for calls .-
t
and
t //GTWIN
--
Xavi
El 17/12/2009 20:43, Viktor Szakáts escribió:
Hi Xavi,
No problem, can you describe what does it fix
exactly? Symptoms? I'd like to include it ChangeLog.
Brgds,
Viktor
On 2009 Dec 17, at 20:37, Xavi wrote:
As subject. If no objection, please Viktor, could you update the repository.
Thanks.
--
Xavi
<gtwin.zip>
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour