On Tue, 05 Jan 2010, Marco Boeri wrote:

Hi,

> I supposed I was being a little confusing. I apologize.
> I missed a step:
> in the get field you need to press F2 Key 
> In Clipper the result is 
> tasti():lastkey()-> 13
> tasti():xkey-> -1
> ------
> main():lastkey()->13
> main():nkey-> -1
> as expected.
> While in Hb
> tasti():lastkey()-> 13
> tasti():xkey-> -1;                <---- ; but it's not relevant now
> ------
> main():lastkey()->13
> main():nkey-> -1
> nb: tasti() has to be read like processkey() function (tasti() is the
> original fuction)
> The more significant difference is that after the F2 keypress, in HB
> I need to press ENTER to go on (is the ACCEPT command that needs that),
> while Clipper doesn't need it.
> Hope to being more clear.

Yes, it's clear now. Just simply the example is too complicated.
It's not GET or ACCEPT problem but missing ";" => Chr( 13 ) translation
in __KEYBOARD() function.
Here is reduced example which illustrate the problem:

   proc main()
      __keyboard( ";" )
      ? inkey(0)
   return nil

I'll fix it in a while. Thank you for the information.

best regards,
Przemek
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to