FiveTech Software tech support forums

... click on a checkbox the procedure must change the height to the xbrowse example - 60 in another procedure I have already done it but I reduce the ntop of the xbrowse, now I want to make space below

... activar en tiempo de ejecución. * Función RoundBox() nuevo undecimo parámetro nPenStyle, por defecto PS_SOLID. Sintaxis: RoundBox( hDC, nLeft, nTop, nRight, nBottom, ; nRound1, nRound2, nPenColor, nPenSize, ; nFillColor, nPenStyle ) * BtnBmp: Soporte de color Alfa. Soporte para fondos de color ...

... lReadOnly can be toggled during runtime also. * function RoundBox() new 11th parameter nPenStyle, default PS_SOLID Syntax: RoundBox( hDC, nLeft, nTop, nRight, nBottom, ; nRound1, nRound2, nPenColor, nPenSize, ; nFillColor, nPenStyle ) * BtnBmp: Alpha Color support Support for alpha color backgrounds. ...

... .....} 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 ...