Bug in Menu [Solved]

Re: Bug in Menu

Postby Antonio Linares » Sun Aug 03, 2014 9:19 am

Enrico,

yes, I saw it too, but that couldn't be a recent change.

Anyhow, its solved :-)

many thanks for your feedback
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 35258
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Bug in Menu

Postby Enrico Maria Giordano » Sun Aug 03, 2014 10:15 am

Antonio,

Antonio Linares wrote:Enrico,

yes, I saw it too, but that couldn't be a recent change.


That's why I said "in the far past". :-)

Antonio Linares wrote:Anyhow, its solved :-)

many thanks for your feedback


You're welcome, my friend! :-)

EMG
User avatar
Enrico Maria Giordano
 
Posts: 6655
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: Bug in Menu

Postby George » Mon Aug 04, 2014 2:36 pm

I did report this behavior in May 2008 http://forums.fivetechsupport.com/viewtopic.php?f=6&t=11165&hilit=menu+ancho and, as suggested per Antonio I did some testing, working better changing the value from 100 to 55.
Code: Select all  Expand view

f oItem != nil
         MenuMeasureItem( pMitStruct,;
                          0.9 * GetTextWidth( 0, If( ! Empty( oItem:cPrompt ),;
                          StrTran( oItem:cPrompt, "&", "" ), "" ) ) + ;
                          If( oItem:oMenu:hMenu != If( ::oMenu != nil, ::oMenu:hMenu, 0 ), ;
                             if( ValType( oItem:cPrompt ) == "C", if( chr( 9 )$oItem:cPrompt, 55, 55 ), 0 ), 0 ) ,; // Changed to 55 from 100    
                          Empty( oItem:cPrompt ) )
      else                // + 20 introduced due Error on NT on width calculation 1999/05/19
         if IsMenuItem( pMitStruct )
            MenuMeasureItem( pMitStruct,, IsMISeparator( pMitStruct ) )
         endif
      endif
      return .f.  // default behavior
    endif
 

Regards,

George
George
 
Posts: 702
Joined: Tue Oct 18, 2005 6:49 pm

Re: Bug in Menu

Postby Antonio Linares » Mon Aug 04, 2014 2:39 pm

Time flies :-)

I really forgot about that one :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 35258
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Previous

Return to Bugs report & fixes / Informe de errores y arreglos

Who is online

Users browsing this forum: No registered users and 1 guest