FiveTech Software tech support forums

... .....} Function Disp_Menu_Comuni(oParent,nRow,nCol,oDbf,oBrw,cSection,oCont) .... ENDMENU ACTIVATE POPUP oMenu OF oParent AT oBrw:nTop+nRow, oBrw:nLeft+nCol RETURN (NIL) and another on action Function MenuContextual(oControl,oBrw,oDbf,cIniUser,cSection,lExport,lColConfig,oParent,oCont ...

... Hide_Ctrls(oBrw,oGet,oSay,lSearchBar,aBtn,oBar) local oBtn,n If lSearchBar oSay[1]:show() oSay[2]:show() oGet:show() oBrw:oSortCbx:show() oBrw:nTop:=32 oBrw:nHeight:= oBar:ntop-40 else oSay[1]:hide() oSay[2]:hide() oGet:hide() oBrw:oSortCbx:hide() oBrw:nTop:=2 oBrw:nHeight:= oBar:ntop-40 Endif ...

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[ n ]:nLeft:= ...

... Silvio, a question yPos := 0 this is no good because the first panel can init from 18 and not from 0 row I not found the exact variable perhaps ::nTop ? as i can say it is 1st Position of "Body" from TExplorerBar() where i oExBar:AddPanel() yes but the first position of First TaskPanelPanel ...

... un objeto con la clase Turllink en lugar de "www". ..." ,solo así podríamos tener el efecto de color over con el mouse oURL:= New( nTop, nLeft, oWnd, lPixel, lDesign, oFont, cMsg, cURL, cToolTip, nClrInit, nClrOver, nClrVisit, lTransp )

hi Silvio,

Silvio.Falconi wrote:a question

yPos := 0

this is no good because the first panel can init from 18 and not from 0 row

I not found the exact variable perhaps ::nTop ?

as i can say it is 1st Position of "Body" from TExplorerBar() where i oExBar:AddPanel()

... ]; [ OF | WINDOW | DIALOG <oWnd> ]; [ COLOR <cClrFore> [, <nClrBack> ] ]; [ FONT <oFont> ]; [ TRANSPARENT ] <nTop> , <nLeft> To specify the top and left coordinates. <oGroup> The variable to containt the object. <nRight>, <nBottom> ...

a question

yPos := 0

this is no good because the first panel can init from 18 and not from 0 row

I not found the exact variable perhaps ::nTop ?

... bClick, ".\bitmaps\mail.bmp",oFontSmall,CLR_BLACK,CLR_WHITE ) tried with Function AddMenu() local aPoint := AdjustWnd( oPanel, oPanel:nTop-100, oPanel:nLeft ) MENU oMenu POPUP --- ACTIVATE POPUP oMenu WINDOW oWnd AT aPoint[1], aPoint[2]

... first one, so that the following panels are one behind the other. There is no method in the Texplorerbar class to refresh the panels because the ntop has changed, I tried to create this refresh with the following commands but it doesn't work for n= 1 to Len( oExbar:aPanels )    ...

perhaps

@ 70, 20 GET aGet[1] VAR nTop OF oDlg SIZE 40, 14 PIXEL FONT oFont ;
PICTURE "@ ###,99" UPDATE RIGHT

... the decimal point the procedure must put up to two numbers after the decimal point and then move on to the other get type @ 70, 20 GET aGet[1] VAR nTop OF oDlg SIZE 28, 12 PIXEL FONT oFont ; picture "@Z 99.99" UPDATE RIGHTTOLEFT If I press 1 , 2 3 I must have on get "1,23" then ...

... scrollpanel lost the scroll, because ui now I'm trying with the explorerbar hoping it might work and insert a new method to recalc the position nTop for each ::apanels as this METHOD RecalcPosTask() CLASS TTaskPanel local n for n = ::nIndex + 1 to Len( ::oWnd:aPanels ) ::nHeight = ::nTotalHeight() ...

... in the rect structure. Please look for DT_CALCRECT in FWH *.prg source code for code examples yes, I allredy found DrawTextEx( ::hDC, cMessage , {nTop,nLeft,nBottom,nRight} ) but when I have the new cMessage ( edited) I must modify 3 controls on line 1. the TaskPanel 2. the first panel ( shadow) ...

Hola, Probablemente se pueda conseguir esos efectos modificando los nTop, nLeft, nBottom y nRight del dialogo combinado con las iteracciones y los sleeps necesarios En lenguaje harbour con fwh consigueme un dialogo que se mueva desde la parte inferior de la ...