FiveTech Software tech support forums

... aBitmaps, lPixel, lDesign, aPrompts, nFolderHeight, ;
aHelps, nRound, bAction, bClrTabs, bClrText, aAlign, ;
lAdjust, nSeparator, nOption, bPopUp, lStretch, ;
cLayOut, bBmpAction, nBright, lAnimate, nSpeed, oFontDefault, ;
lTransparent, aDialogs, lBorder, nClrPane, cVarName )
so
ON PAINT ...

Thank you Mr. Rao,

I is ok now.

In the present implementation, oBrw:bPopUp is designed to refer to an active cell, i.e., active row and selected column. So this does not work when there are no rows.

If you want a PopUP menu that does not refer to any specific row, then you may implement by displaying a popup with oBrw:bRClicked.

any solution??

Hi,

I use oBrw:bPopup to declare popup screen in xbrowse. If the browse is not empty there is not any problem. Popup shows.

But I have an empty xbrowse and want to show popup for "Paste" option.

How can I do it?

... T.
oBrw:lAllowColSwapping := .T.
oBrw:nFreeze := 2
oBrw:lFastEdit := .T.

AEval( oBrw:aCols, { |o| o:nHeadStrAlign := AL_CENTER } )
oBrw:bPopUp := { |o| ColMenu( o ) }
AEval( oBrw:aCols, { |o| o:cToolTip := { o:cHeader, 'ToolTip' } } )

oBrw:bRClicked := { | r,c,f,tBrw | xBrowse( tBrw ...

... LINES CELL


AEval( oBrw:aCols, { |o| o:cToolTip := { 'Column :' + CRLF + o:cHeader, 'ToolTip' }, ;
o:nEditType := EDIT_GET } )

WITH OBJECT oBrw
:bPopUp := { |o| ColMenu( o ) }
:MakeTotals()
:CreateFromCode()
END
oWnd:oClient := oBrw
oWnd:bPostEnd := { || oRs:Close() }

BtnBar( oBrw )

... to refresh other columns datas

oCol:bOnPostEdit := {|o, v, n|if( n != VK_ESCAPE ,obrow2:oTreeItem:cPrompt := padr(v,nacidlen," ") ,)}
ocol:bpopup:={||acc0501(,,obrow2)}
// right click call popu menu
// insert sub grade tree item, insert new tree item, delete tree item

ocol:bLDClickData ...

... 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.
- New DATA: lProfiler INIT .f.
If set to .t., times taken for refresh, sort, maketotals are recorded in logfile ...

oCol:bPopup should work. Is it not working or are you looking for something else?

try with
oApp():oFolder:bPopup := { | o | MenuTabs( oApp():oFolder ) }

... oBrw), oBrw:refresh()) ) }
:bClrSel := {|| { CLR_BLACK, nRGB( 192,192,192 )}}
:bClrSelFocus := {|| { CLR_WHITE, nRGB( 128,128,255 )}}
END
oBrw:bPopUp := { |o| ColMenu( o, oBrw, cEmpMG, cEmpMC, cRutDel ) }


Willy, gracias con TwBrowse si funciona, relativamente normal, por eso mi consulta si ...

... f.

:aCols[1]:cSortOrder := "ARCODIG"
:aCols[2]:cSortOrder := "ARDESCR"
//:bSeek := {|c| (alias_articu)->(DbSeek( Upper( c ) )) }

:bPopUp := { |o| ShowPopupBrw( o, oTaskPanel ) }
:CreateFromCode()

END


http://s2.subirimagenes.com/imagen/previo/thump_9515100xbrowse2 ...

Please do not use bRClicked at all.

Recommended:
This is how XBrowse implements popups.

oBrw:bPopUp := { |oCol| MyPopUp( oCol ) } // applies to the entire browse

oCol:bPopup := { |oCol| MyPopUp( oCol ) } // Popup is shown when right clicked on this column only.

Sample popup function:

function ...