FiveTech Software tech support forums

... revisa nuevo ejemplo en FWH\samples\fldchanged.prg * Mejora: En el método Update( Pos ) de la clase TExplorerBar, actualiza el nPos del objeto oPanel utilizado desde TExplorerBar después de que el panel haya sido modificado. Clase TTaskPanel el método ChangeHeight( nHeight ) cambia la altura ...

... nMinutes, nSeconds } Please review new example FWH\samples\fldchanged.prg * Enhancement: Class TExplorerBar Method Update( nPos ) updates the nPos oPanel used from the TExplorerBar after the panel has been modified. Class TTaskPanel Method ChangeHeight( nHeight ) changes the height of the panel. ...

... local bClick:= {|| aImg[5 ] } @ nRow, nCol BTNBMP oItem PROMPT aImg[ 1 ] ; FILE aImg[2 ] ; SIZE 72,96 PIXEL OF oPanel ; NOBORDER FLAT oItem:oCursor:= oCursorBtn oItem:baction:= (bClick) not eval the action

function DeleteControl( oPanel, nItem )   local nTop, nLeft      for n := Len( oPanel:aControls ) to nItem + 1 STEP -1      oPanel:aControls[ n ]:nTop := oPanel:aControls[ n - 1 ]:nTop      oPanel:aControls[ ...

Nages oPanel:aControls[ nItem ]:End() HB_ADel( oPanel:aControls[ nItem ], nItem, .t. ) ASize( oPanel:aControls, Len( oPanel:aControls ) ) oPanel:SetRange() oPanel:refresh() I saw on oPanel:aControls there are also the records ...

To delete nth control of a Panel/dialog/window oPanel:aControls[ n ]:End()HB_ADel( oPanel:aControls[ n ], n, .t. ) To delete current row in XBrowse ( applies to arrays, dbf, ado or any data source) oBrw:Delete()oBrw:Refresh() ...

... how I can resolve ? I Tried with ( but run bad) FOR i := 1 TO LEN(oBrw:aCols) oCol := oBrw:aCols[ i ] oCol:bLDClickData := { || Erase_Items(oBrw,oPanel) } NEXT Function Erase_Items(oBrw,oPanel) local nItem:= oBrw:aArrayData[ oBrw:nArrayAt ][2] aDel(oBrw:aArraydata,nItem-1) // xbrowser oBrw:aArraydata ...

Antonio Linares wrote:Try this:

ACTIVATE POPUP oMenu WINDOW oPanel AT 0, 0

yes now I see it on the left of the oPanel

Try this:

ACTIVATE POPUP oMenu WINDOW oPanel AT 0, 0

Antonio Linares wrote:Have you tried this ?

ACTIVATE POPUP oMenu WINDOW oPanel AT aPoint[1], aPoint[2]

Yes of course
Probabile i made an error because before i saw a menu on down, far from panel but then It Is not showed anywhere

Have you tried this ?

ACTIVATE POPUP oMenu WINDOW oPanel AT aPoint[1], aPoint[2]

... bottom of a UrlLnk control? I tried but it showed the menu far from url lnk On TexplorerBar I insert a link local bClick := { | o | addMenu() } oPanel4:AddLink( "testlink", bClick, ".\bitmaps\mail.bmp",oFontSmall,CLR_BLACK,CLR_WHITE ) tried with Function AddMenu() local aPoint ...

I found a function CalcTextHeight(cText, oFont, nWidth,oPanel) but it not run ok because the other panels are not refreshed https://i.postimg.cc/wvPFgmWd/test.gif #include "FiveWin.ch"//#include "ribbon.ch"//----------------------------------------------------------------------------//static ...

If I made IF oDlgBacheca:nresult == IDOK aDim = GetLabelDim( oPanel2:hWnd, cMessage , oFont:hFont ) oPanel:setsize(aDim[ 1 ] + 60, aDim[ 2 ] + 50) oPanel:SetColor( "N/W*" ) oPanel:bPainted = { | hDC | DrawTextTransparent( hDC, cMessage , { 10, ...

... "ribbon.ch"//----------------------------------------------------------------------------//function Main()   local oWnd, oExBar, oPanel1, oPanel2, oPanel3, oPanel4   local bClick := { | o | MsgInfo( o:GetText() ) }   local uVar, oBrw, oPanel, aDim, oFont  ...