forums.silverfrost.com

[Anupriya]

hi,
i am making use of %^el[extended] so that i will be able to call the call back function every time i select a item from the editable list box.

the problem is once the item is selected it does the draw commands in call back function but the list box is open and i close it all the time with done button i created.

is there a way to close the list box automatically once the item is selected.i tried giving the call back function a -ve return value but it shows run time error.

any help is much appreciated.

[PaulLaidler]

It always helps if you can give us a short program to work on.

[Anupriya]

here is the program,

PROGRAM
EXTERNAL CLOSEWIN, LSFUNCTION
..
..
CHARACTER A(2)*5
DATA(A(I),I=1,2)/'A','B'/
CHARACTER K
K="A"
I=WINIO@('%CA[......]&')
...
....
....
I= WINIO@('%2nl select:^7.3el[extended]&',angle,2L,k,lsfunction)
I=WINIO@('%2nl%^bt[DONE],CLOSEWIN)
END

INTEGER FUNCTION LSFUNCTION()
INTEGER ITEM
ITEM=CLEARWIN_INFO@['EDITABLE_LISTBOX_INDEX']
IF (ITEM.EQ.1) THEN
..
..(DRAW THIS)
END IF
IF (ITEM.EQ.2) THEN
..
..(DRAW THIS)
END IF
LSFUNCTION=1
END

THE PROGRAM WORKS FINE,BUT EVERY TIME WHEN I SELECT THE ITEM IT DOES THE DRAWING BUT I CLOSE THE BOX WITH THE DONE BUTTON.
I WAS WONDERING IF THERE IS A WAY TO CLOSE THE LIST BOX AUTOMATICALLY ONCE THE ITEM IS SELECTED.

[PaulLaidler]

This works OK...