also error End on Btnbmp

Silvio.Falconi · Post by **Silvio.Falconi** » Mon Mar 10, 2025 8:12 am

Today is go out another error End() from Btnbmp

First of all I created a small class From Xbrowse where I inserted some btnbmp buttons located at the end of the xbrowse on the right side and I called them aBtnBrow

I use this trick because in all the procedures when I create the xbrowse I have to insert the buttons which are generally only three in other situations they are 5 and to avoid always having to rewrite them and consequently set them in the resize function of the dialog I thought of making a small class that does nothing but insert the buttons

so in the procedure I use I only have to load the action of the buttons for example

Code: Select all | Expand

oBrw:aBtnBrow[3]:baction:= { || oBrw:aBtnBrow[3]:ShowPopUp( { | oBtn | Contextual_Menu(oBtn,oBrw,oDbf,cIniUser,cSection,oDlg,oBrw:aBtnBrow[4],.t.,.t.,@lmore)  } ) }
oBrw:aBtnBrow[5]:baction:= { || oBrw:aBtnBrow[5]:ShowPopUp( { | oBtn | ColonneMenu( oBtn,oBrw,oDbf,oDlg,cSection,cIniUser ) } ) }

Where is the error i.e. why the End() error? It comes out sometimes and not always?