FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour COMBOMETRO
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
COMBOMETRO
Posted: Mon Nov 30, 2015 06:35 PM
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 (fw): Select all Collapse
@ 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 )
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: COMBOMETRO
Posted: Tue Dec 01, 2015 08:59 AM

Otto,

Class TComboMetro uses a CLASS TX8 inherited from TXBrowse

Surely Rao is able to provide us some guidance on this

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: COMBOMETRO
Posted: Tue Dec 01, 2015 09:41 AM

I am looking into this

Regards



G. N. Rao.

Hyderabad, India
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: COMBOMETRO
Posted: Wed Dec 02, 2015 10:34 AM
This is the fix:

Please locate this code in the method new() of tx8 class (line 392):
Code (fw): Select all Collapse
   for n := 2 to nLen
      if Upper( oCbx:aItems[ n ] ) < c
         lSorted  := .f.
         EXIT
      endif
   next


Please insert
Code (fw): Select all Collapse
      c  := Upper( oCbx:aItems[ n ] )

between "endif" and "next"

This fix is available in next version.
Regards



G. N. Rao.

Hyderabad, India

Continue the discussion