COMBOMETRO

[Otto]

Dear Antonio,
please try in touch.prg of the FW-samples to use following prompts:

PROMPTS { " ", "Europe", "asia", "Africa", "America", "Oceania" , "NEU KATEGORIE" } ;

If there is an empty item you get wrong values.

Best regards,
Otto

Code: Select all  Expand view

@ nRow, 20 SAY "Area:" OF oPanel FONT oFontMed SIZE 85, 35 PIXEL TRANSPARENT
     @ nRow,120 ;
  COMBOMETRO cCountry ;
     PROMPTS { "  ",  "Europe", "asia", "Africa", "America", "Oceania" , "NEU KATEGORIE"      } ;
          OF oPanel ;
        SIZE 200, 40 ;
       PIXEL ;
        FONT oFontMed ;
       COLOR CLR_WHITE, RGB( 0x33, 0x66, 0xCC )
 

[Antonio Linares]

Otto,

Class TComboMetro uses a CLASS TX8 inherited from TXBrowse

Surely Rao is able to provide us some guidance on this

[nageswaragunupudi]

I am looking into this

[nageswaragunupudi]

This is the fix:

Please locate this code in the method new() of tx8 class (line 392):

Code: Select all  Expand view

  for n := 2 to nLen
      if Upper( oCbx:aItems[ n ] ) < c
         lSorted  := .f.
         EXIT
      endif
   next
 

Please insert

Code: Select all  Expand view

     c  := Upper( oCbx:aItems[ n ] )
 

between "endif" and "next"

This fix is available in next version.