after pressing on many btnbmp and displaying the popup menu I had this error
He doesn't always do it every 20/30 times
- Code: Select all Expand view
- Application
===========
Path and name: C:\Work\Errori\image_su_btnbmp\test.Exe (32 bits)
Size: 3,959,296 bytes
Compiler version: Harbour 3.2.0dev (r1703231115)
FiveWin version: FWH 19.03
C compiler version: Borland/Embarcadero C++ 7.0 (32-bit)
Windows version: 6.2, Build 9200
Time from start: 0 hours 0 mins 33 secs
Error occurred at: 24-04-2019, 11:40:46
Error description: Error BASE/1004 Metodo non disponibile: END
Args:
[ 1] = U
Stack Calls
===========
Called from: => END( 0 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:SHOWPOPUP( 2046 )
Called from: test.prg => (b)SHOW_BEACH( 375 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 697 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 983 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1791 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 2006 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3546 )
Called from: => DIALOGBOXINDIRECT( 0 )
I call the popup
- Code: Select all Expand view
- aBtn [n]: baction: = {| Self | :: ShowPopUp ({| oBtn | BtnPopMenu (oBtn, aBtn, n)})}
or I also tried directly from the BTNBMP command
- Code: Select all Expand view
- @ ny*numero, nx*numero-20 BTNBMP aBtn[ n ] RESOURCE GiveBmp(nStatus) ;
SIZE OMB_H,OMB_W PIXEL OF oDlg ;
FLAT TOP COLOR CLR_WHITE,CLR_GREEN NOBORDER
ACTION ::ShowPopUp( { |oBtn| BtnPopMenu( oBtn,aBtn,n ) } )
BUT MAKE THE SAME ERROR