@...GET LISTBOX Problem

Mario H. Sabado

unread,

Mar 26, 2010, 4:50:39 AM3/26/10

to

Hi,

From below test, I can't pass through VALID statement evaluation.
Thanks for any help.

Mario

******************************************
function listboxtest
local level_list:={"A","B","C"}
local user_level:=space(1)
local getlist:={}

@ 1 ,1,6,5 get user_level listbox level_list dropdown valid
!empty(user_level)

read

inkey(0)

return nil
**************************************

dlzc

unread,

Mar 26, 2010, 10:57:46 AM3/26/10

to

Dear Mario H. Sabado:

You might:
- initialize user_level to a member of the contents of level_list
- change your valid test to:
user_level $ level_list

Did you make a selection in the list, other than the space you
initially pushed in? Saying "I can't pass through VALID statement
evaluation" isn't quite enough information.

Failing that, you might try the black magic of reversing the order of
the valid and dropdown arguments, then not declaring user_level as
LOCAL when calling indirectly to yet a second system function.

David A. Smith

Mario H. Sabado

unread,

Mar 26, 2010, 11:14:50 AM3/26/10

to

Yes David, I tried to select a value from the dropdown list.

Thanks,
Mario

dlzc

unread,

Mar 26, 2010, 2:13:08 PM3/26/10

to

Dear Mario H. Sabado:

> Yes David, I tried to select a value from the
> dropdown list.

And none of the other suggestions worked either? I always want just a
little bit more...

Yes or no here is fine.

David A. Smith

Mario H. Sabado

unread,

Mar 26, 2010, 8:00:36 PM3/26/10

to

Selecting from the listbox and pressing Enter doesn't do anything. The
level_list is an array so the $ function didn't work.

Thanks,
Mario

dlzc

unread,

Mar 26, 2010, 8:49:30 PM3/26/10

to

On Mar 26, 1:50 am, "Mario H. Sabado" <mhsab...@gmail.com> wrote:

I confirm, with November 2009 xHarbour.

Presetting user_level to "A" exits on second <Enter> with 100 or so
empty lines dumped to the screen before "inkey(0)" is executed.
Cursor is switched off

Setting the valid to acan( level_list, user_level) > 0, has no
improvement.

Reversing the order of dropdown and valid has no effect.

Better make a bug report.

David A. Smith

Mario H. Sabado

unread,

Mar 26, 2010, 11:00:30 PM3/26/10

to

Thanks David. Already added to the bugreport.

Best regards,
Mario

modalsist

unread,

Mar 30, 2010, 9:22:44 AM3/30/10

to

On 27 mar, 00:00, "Mario H. Sabado" <mhsab...@gmail.com> wrote:
> On 3/27/2010 8:49 AM, dlzc wrote:
>
>
>
> > On Mar 26, 1:50 am, "Mario H. Sabado"<mhsab...@gmail.com> wrote:
> >> Hi,
>
> >> From below test, I can't pass through VALID statement evaluation.
> >> Thanks for any help.
>
> >> Mario
>
> >> ******************************************
> >> function listboxtest
> >> local level_list:={"A","B","C"}
> >> local user_level:=space(1)
> >> local getlist:={}
>
> >> @ 1 ,1,6,5 get user_level listbox level_list dropdown valid
> >> !empty(user_level)
>
> >> read
>
> >> inkey(0)
>
> >> return nil
> >> **************************************
>
> > I confirm, with November 2009 xHarbour.
>
> > Presetting user_level to "A" exits on second<Enter> with 100 or so
> > empty lines dumped to the screen before "inkey(0)" is executed.
> > Cursor is switched off

Mario,

Fixed after Changelog 1.6695

regards,
Eduardo

Mario H. Sabado

unread,

Mar 31, 2010, 4:28:35 AM3/31/10

to

Many thanks Eduardo for your attention. The VALID condition is now
being evaluated successfully but I observed that number of rows of the
dropdown box when I press space bar is limited to 2?

Thanks and best regards,
Mario

modalsist

unread,

Mar 31, 2010, 8:40:09 AM3/31/10

to

Here is ok (3 rows).

Eduardo

Mario H. Sabado

unread,

Apr 5, 2010, 11:09:24 AM4/5/10

to

Gracias Eduardo! It's working fine now.

Best regards,
Mario