View previous topic :: View next topic |
Author |
Message |
IanLambley
Joined: 17 Dec 2006 Posts: 490 Location: Sunderland
|
Posted: Tue Feb 13, 2007 10:03 am Post subject: %ms - Multi selection box |
|
|
If the last item in the list has only one character, then it is not displayed. See attached code and try the alternative, or adding another character to the '3', or put a space before the '3'. It works perfectly for the $ls format code, see second example.
Code: |
winapp
include <windows.ins>,nolist
character*80 text_data(100000)
integer*4 isel_text(100000)
max_text = 100000
c
c clear selections
isel_text = 0
c
c just flag the first one
isel_text(1) = 1
text_data = ' '
c
c multi character version
c text_data(1) = 'one'
c text_data(2) = 'two'
c text_data(3) = 'three'
c
c single character version
text_data(1) = '1'
text_data(2) = '2'
text_data(3) = '3'
ibut=winio@('%ca[Column filter]&')
ibut=winio@('%bg[btnface]&')
ibut=winio@('%`bg[white]&')
ibut=winio@('%40.10`ms&', text_data, max_text, isel_text)
ibut=winio@('%ff%`tt[&OK]')
end
c
|
Code: |
winapp
include <windows.ins>,nolist
character*80 text_data(100000)
max_text = 100000
text_data = ' '
isel = 1
c
c multi character version
c text_data(1) = 'one'
c text_data(2) = 'two'
c text_data(3) = 'three'
c
c single character version
text_data(1) = '1'
text_data(2) = '2'
text_data(3) = '3'
ibut=winio@('%ca[Column filter]&')
ibut=winio@('%bg[btnface]&')
ibut=winio@('%`bg[white]&')
ibut=winio@('%40.10`ls&', text_data, max_text, isel)
ibut=winio@('%ff%`tt[&OK]')
end
c
|
|
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7924 Location: Salford, UK
|
Posted: Thu Feb 15, 2007 5:48 pm Post subject: |
|
|
I will add this to the list of things to investigate. |
|
Back to top |
|
|
IanLambley
Joined: 17 Dec 2006 Posts: 490 Location: Sunderland
|
Posted: Sat Jul 21, 2007 11:37 am Post subject: MS control |
|
|
Paul,
How is this one doing in your investigations?
Regards
Ian |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7924 Location: Salford, UK
|
Posted: Mon Jul 23, 2007 7:56 am Post subject: |
|
|
Ian
This bug has now been fixed.
Thanks
Paul |
|
Back to top |
|
|
|