two get and explorebar

[Silvio.Falconi]

I must insert two gets control into a explorebar as you can see here




But I wish the gets have the width until the end of the explorer and when I resize the spliter the gets must change their width


I build the explorer with

oExBar = TExplorerBar():New(0,0, nSplit,oApp():oDlg:nBottom, oApp():oDlg)

and then

oApp():oSplit:bChange :={ |oSplit | oExBar:refresh() }

to build the gets

Code: Select all  Expand view

@ 42,10 say "Cognome :" of oPanel1 transparent SIZE 50,20 PIXEL
    @ 70,10 say "Nome   :" of oPanel1 transparent SIZE 40,20 PIXEL

    @ 40,75  Get aget[1] VAR cCognome  SIZE oPanel1:nRight-100,20 PIXEL   of oPanel1 UPDATE
    @ 68,75  Get aget[2] VAR cnome  SIZE oPanel1:nRight-100,20 PIXEL  of oPanel1  UPDATE

I think I must refresh the controls are into first panel of oExbar

I tried also with

oApp():oSplit:bChange :={ |oSplit | oExBar:aPanels[1]:refresh() }

any solution ?

[Silvio.Falconi]

resolved
I insert aGetsearch as static and then

Code: Select all  Expand view

oApp():oSplit:bChange :={ |oSplit | oExBar:aPanels[1]:refresh(),;
                                          aGetSearch[1]:nWidth:=oExBar:aPanels[1]:nright-100,;
                                          aGetSearch[2]:nWidth:=oExBar:aPanels[1]:nright-100,;
                                          aGetSearch[1]:refresh(),;
                                          aGetSearch[2]:refresh()}