Sorry i cannot compare i have only Harbour on Ubuntu 32 bits i don't have
any Windows or Dos here...

The only reference i have follow was
http://www.itlnet.net/Programming/Program/Reference/c53g01c/ngb388e.html

I'm testing the Mario H. Sabado code here
http://thread.gmane.org/gmane.comp.lang.harbour.devel/28546

Thank you.

BTW the code below is working good, but i was testing the previous sent code
sample with listbox and valid, is this a clipper behavior or something
else...? :

#include "inkey.ch"

function main
local getlist    := {}
local r, c
local msele      := " "

do while .t.
        clear screen

        @ 1, 1 say "Press ESC to exit..."
        @ 2, 1 say "Please insert a not empty one char value  " get mSele
 valid !empty(mSele)

        read

        if lastkey()==27
           clear screen
           return
        endif

        @ 10, 1 say "User choose :" + mSele
        inkey(2)
enddo

return nil
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to