Thanks a lot.
Guillermo Varona Silupú wrote: > > AbeB escribió: > >> >> Hi All, >> > How can I make my app mouseable? in gtwin. >> clicking on a get to make it the active get, double clicking to put the >> cursor on that position within that get? > > #include "Inkey.ch" > PROCEDURE MAIN > LOCAL cVar1 := cVar2 := cVar3 := SPAC(10) > SET(_SET_EVENTMASK, INKEY_ALL) > MSETCURSOR(.T.) > @ 10, 20 SAY "Var 1:" GET cVar1 > @ 11, 20 SAY "Var 2:" GET cVar2 > @ 12, 20 SAY "Var 3:" GET cVar3 > READ > RETURN > > Best Regards > GVS > --------------------------------------------------------------- > EC Red Internet g...@tis > Inscríbete en www.ec-red.com > _______________________________________________ > Harbour mailing list > Harbour@harbour-project.org > http://lists.harbour-project.org/mailman/listinfo/harbour > > -- View this message in context: http://n2.nabble.com/does-the-get-system-support-a-mouse-tp3593190p3594105.html Sent from the harbour-devel mailing list archive at Nabble.com. _______________________________________________ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
