Valid with Ribbon-Button

[StefanHaupt]

Hi all,

I´m trying to implement a mdi management in my app. I have a ribbon group with buttons to cascade, etc the opened mdi windows.

The buttons are coded like this

Code: Select all  Expand view

@ 15, 3 ADD BUTTON  oBtn1_3_1 PROMPT "Kaskadieren" ;
            BITMAP "WinCascade" ;
            GROUP oGr3_1 ;
            WHEN Len( oAppWnd:oWndClient:aWnd ) > 1 ;
            ACTION oAppWnd:Cascade() SIZE 105, 21 MOSTLEFT

The button should be activated when more than one mdi window is open. But if I open a second mdi window, the button stays inactive and is not automatically activated.

In a normal menu it is working fine.

Any solution ?

[Antonio Linares]

Stefan,

You may need to issue a call to Method AEvalWhen() of the buttons container, each time you open or close an MDI window.

I have implemented it in a similar way in samples\FiveDBU.prg

[StefanHaupt]

Antonio,

that´s it Thanks

One more question, can I access the group from the windows containerobject ? (something like this: oWnd:oRibbon:aGroups[n] ) ?

[Antonio Linares]

Stefan,

This way you access the groups of the tab page of the ribbon:

oWnd:aControls[ 1 ]:aDialogs[ 1 ]:aControls

aControls[ 1 ] is the Ribbon

aDialogs[ 1 ] is the first tab page

aControls[ n ] is a group

[StefanHaupt]

Ok, thanks