FiveTech Software tech support forums

Otto,

very nice!

Mr Antonio

Thank you very much. Everything is working wonderful. Also glad you gave the sample illustration of typical Office2007 menu screen shot for the benefit of those like me. Now our menus exactly look like that.

Now what in my view is still remaining is that the List of windows under MDI Windows menu do not have the left vertical bar. I think MRU also look like the same. Here is the example:




Is it the intended behaviour? Or will you make this change also so that the numbers appear in the left vertical bar?

Mr Antonio

A few more points. The checkbox in our menus still do not appear in Orange boxes like in the sample of Office2007 menu.

Are you planning to provide for graying of bitmaps also for the disabled menu items?

> Or will you make this change also so that the numbers appear in the left vertical bar?

We are working to find a way to implement it

> A few more points. The checkbox in our menus still do not appear in Orange boxes like in the sample of Office2007 menu.

Yes, we are aware of it. Its planned.

> Are you planning to provide for graying of bitmaps also for the disabled menu items?

We want to see first how Office 2007 does it

Checked items are ready

Thats very nice.
Can you please provide me the updated lib pls?

Me too!

EMG

The following sample GPFs when you right click on the listbox:

Code: Select all  Expand view

#include "Fivewin.ch"


FUNCTION MAIN()

    LOCAL oDlg, oLbx, nItem

    DEFINE DIALOG oDlg

    @ 0, 0 LISTBOX oLbx VAR nItem

    oLbx:bRClicked = { || MyPopup( oLbx ) }

    ACTIVATE DIALOG oDlg;
             CENTER

    RETURN NIL


STATIC FUNCTION MYPOPUP( oLbx )

    LOCAL oMenu

    MENU oMenu POPUP
        MENUITEM "Test"
    ENDMENU

    ACTIVATE MENU oMenu OF oLbx

    RETURN NIL

EMG

It is not possible to set preview buttonbar and statusbar to 2007 look.

EMG

Sometimes I get the disabled menu items longer than the enabled ones (ie. they break the blue bar of the new menu style) but I'm not able to build a sample of the problem yet.

EMG

Enrico,

> The following sample GPFs when you right click on the listbox:

Thats a listbox bug. This is the fix:

Code: Select all  Expand view

METHOD DrawItem( nIdCtl, nPStruct ) CLASS TListBox

return If( ::lOwnerDraw,;
           LbxDrawItem( nPStruct, ::aBitmaps, ::aItems, ::nBmpWidth, ::bDrawItem ),;
           Super:DrawItem( nIdCtl, nPStruct ) )


Many thanks for your feedback

Enrico,

> It is not possible to set preview buttonbar and statusbar to 2007 look.

From rpreview.prg we could check if the main bar is ::l2007 and then build a buttonbar 2007 instead of a toolbar.

Is that fine ?

Antonio Linares wrote:Thats a listbox bug. This is the fix:

Code: Select all  Expand view

METHOD DrawItem( nIdCtl, nPStruct ) CLASS TListBox

return If( ::lOwnerDraw,;
           LbxDrawItem( nPStruct, ::aBitmaps, ::aItems, ::nBmpWidth, ::bDrawItem ),;
           Super:DrawItem( nIdCtl, nPStruct ) )


Many thanks for your feedback

Thank you!

EMG

Antonio Linares wrote:Enrico,

> It is not possible to set preview buttonbar and statusbar to 2007 look.

From rpreview.prg we could check if the main bar is ::l2007 and then build a buttonbar 2007 instead of a toolbar.

Is that fine ?

Perfect!

EMG

Enrico,

getting closer