topic-26782

Posts: 1516

Joined: Thu May 27, 2010 02:06 PM

posible mejora en xbrowse .
Posted: Fri Jul 12, 2013 02:48 PM

para los que tengan funcionando el Estilo 2010 en el menu principal queda feo el estilo 2007 en los pop menus del xbrowse .
A mi me funciona bien asi.

Code (fw): Select all Collapse

METHOD SetColumns( nRow, nCol, nFlags ) CLASS MyBrowse
    ...
   MENU oMenu POPUP

      oMenu:l2010  := WndMain():oMenu:l2010
      IF !oMenu:l2010
          oMenu:l2007  := ::l2007
      endif

      for nFor := 1 to nLen

      ...
 
return nil

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: posible mejora en xbrowse .
Posted: Fri Jul 12, 2013 03:47 PM

Thanks for pointing out.
Implemented in 13.07 release.

Code (fw): Select all Collapse

   MENU oMenu POPUP
      if ::l2007
         if WndMain() != nil .and. WndMain():oMenu != nil .and. WndMain():oMenu:l2010
            oMenu:l2010    := .t.
         else
            oMenu:l2007    := .t.
         endif
      endif

Regards

G. N. Rao.

Hyderabad, India

FiveTech Support Forums

Continue the discussion