[Harbour] Mouse not work with ACHOICE()

[Guillermo Varona Silupú]

This Code work fine in clipper with the mouse:

#include "inkey.ch"    // Key definitions
FUNCTION MAIN
  LOCAL aOpc := {"Opc. 1","Opc. 2","Opc. 3"}, nOpc
  SET( _SET_EVENTMASK, INKEY_ALL )
  cls
  nOpc := ACHOICE(1,1,10,20,aOpc)
  ? nOpc
  RETURN NIL

In harbour not work the mouse.

Best Regards.
GVS
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour