FiveTech Software tech support forums

... TAPPLICATION:ACTIVATE( 407 )   Called from: source\main.prg => MAIN( 77 ) on Change_Plan there is oApp:aBmps[nY,nX]:baction:= {|Self|::ShowPopUp( { |oBtn| BtnPopMenu( oBtn ) } )}

Better remove DATA bAction contents and don't disable it

... these background tasks the following functions are designed (example of usage see in the harbour/tests/testidle.prg): nHandle := hb_IdleAdd( bAction ) Codeblock bAction is added to the list of background tasks for execition during idle state. The function returns nHandle, which can be used ...

... oBtnPrint PROMPT "Stampa" ; RESOURCE cImage2 SIZE 90,30 PIXEL OF oDlg FLAT NOBORDER ; COLOR nClrText, nClrBack WITH OBJECT oBtnPrint :bAction := dummy() :nClrBorder := nClrBorder :bColorMap := { | o | o:lBorder := o:lMOver, nCBorder } :oFontBold := oBold :lRound := .F. END SomeOne ...

... the center of btnbmp ? or please, you have another solution ? I tried also in this mode But it make error (I saw a post of Nages) aBtn[nElemento ]:bAction := { |oBtn| aBtn[nElemento ]:oPopup := { |oBtn| BtnPopMenu( oBtn ) }, ; aBtn[nElemento ]:ShowPopUp(), ; aBtn[nElemento]:oPopup := nil }

... oCF:GoLeft() ) DEFINE BUTTON RESOURCE "RIGHT" OF oBar GROUP ACTION ( oCF:GoRight() ) oWnd:Center() oCF = TCoverFlow():New( 30, 30 ) oCF:bAction = { | o, nCover, nOld | msginfo( "Seleted: " + str( nCover, 2 ) + CRLF + "From: " + str( nold ) ) } oCF:nMaxCover = 5 oCF:lAnimated= ...

In method createbutton() is this line ::oBtn:bAction := {|| Eval( oThis:bAction, oThis ),oThis:SetFocus() } It respects not the present data ::lKeepFocus!! Should be: ::oBtn:bAction := {||  ( Eval( oThis:bAction, ...

Antonio, I test with msginfo() and this are executed twice!
Another thing is, that with ENTER no evaluation of bAction proceeds. In the case of using this button outside from ribbon all functions of a normal button should possible!

... COLORBOX oDp:nMenuBoxClrText ; HEIGHT oDp:nMenuHeight; LOGOCOLOR oDp:nMenuMainClrText ELSE MENU ENDIF LOOP ENDIF oItem:bWhen :=aMenu[11,I] oItem:bAction :=aMenu[03,I] IF lMenuXp oItem:bAuxAction :=aMenu[03,I] ENDIF NEXT I FOR I=1 TO nIni IF lMenuXp C5ENDMENU ELSE ENDMENU ENDIF NEXT // C5ENDMENU ...

with baction I not see the menupopup with :bRClicked I Have this error Application===========   Path and name: C:\Work\Errori\image_su_btnbmp\test.Exe (32 bits)   Size: 3,655,168 bytes   Compiler version: Harbour 3.2.0dev ...

I wish Open a PopupMenu on Btnbmp I tried with :bRClicked := { | nRow, nCol, oBtn | ShowActions( nRow, nCol,n, oBtn ) } and :bAction := { | nRow, nCol, oBtn | ShowActions( nRow, nCol,n, oBtn ) } But it make error   for n := 1 to 70      @ nRow, nCol BTNBMP aBtn[ ...

In this sample

viewtopic.php?f=3&t=35666&p=212416&hilit=%3Acargo#p212422

save in baction your :cargo in other variable or add this :cargo to a array

I have add on list of btnbmp this command :bAction := { |oBtn| oBtn:Toggle() }

sample :




How I can make to have the list of array with wich button is pressed ?
I wish the number of btnbmp pressed

... ComboSelector ::oUrlLink := TUrlLink():Redefine( ::idLink, ::oDialog, , , , , ::nColorUrlLink, ::nColorUrlLink, ::nColorUrlLink, .t. ) ::oUrlLink:bAction := {|| ::ActionLink() } RETURN ( Self ) Pero el control no se pinta transparente. Gracias.

... (nSecs) is specified, the message is diaplayed for the specified duration and closed. - Enhancement: Tree Browse: In case a oTreeItem has DATA bAction, double-click evaluates bAction with oTreeItem and oCol as parameters - Symbol bitmaps are shown in text color. - Col:bPopup now overrides oBrw:bPopup. ...