FiveTech Software tech support forums

nageswaragunupudi wrote:Use
oCtrl:Hide() for all the controls you want to Hide() and use oCtrl:Show() when you want to show.

in reality I had already thought about it and had tried it without success.
probably at a certain time of night it is better to abandon and go to sleep.

Use
oCtrl:Hide() for all the controls you want to Hide() and use oCtrl:Show() when you want to show.

... //----------------------------------------------------------------------- * * funcion de WILLY * Function Blinker(oCtrl, oTmr) Static lOn := .f. oTmr:DeActivate() if lOn oCtrl:Enable() //Hide() else oCtrl:Disable() //Show() endif lOn := !lOn oTmr:Activate() oCtrl:Refresh() ...

... lActive,; o:refresh(),; Set_items_Active(oElements,o:cargo,o),; nElemento:= val(nProduct) } Function Set_items_Active(oItem,lActive,oBTn) local oCtrl for each oCtrl in oItem:aControls oCtrl:bClrGrad = { | lInvert | If( ! lInvert,; { { 1, CLR_WHITE, CLR_WHITE } },; { { 1, RGB( 229,241,251 ), ...

... RETURN (NIL) //--------------------------------------------------------------------// function RefreshButtons ( oBar ) AEval( oBar:aControls, { | oCtrl | oCtrl:refresh() } ) return .T. https://i.postimg.cc/FHYgwd2Z/nnnnn.png thanks

... class has a method Box and is available for every dialog and control too. Sorry, I got confused looking for the right function/method! oWnd/oDlg/oCtrl:Box( nTop, nLeft, nBottom, nRight, uBorder, uBrush, aText ) uBorder can be Color constant, or oPen or hPen. Test with Box() Method of TGet Class ...

Why are you looking in tcalex.prg and tgraph.prg for drawing boxes?
TWindow class has a method Box and is available for every dialog and control too.

oWnd/oDlg/oCtrl:Box( nTop, nLeft, nBottom, nRight, uBorder, uBrush, aText )
uBorder can be Color constant, or oPen or hPen.

Perhaps If len(oPanel:acontrols) >0 oPanel:acontrols:End() Endif for each oCtrl in oPanel:aControls oCtrl:End() next but make error on oPanel:acontrols Application===========   Path and name: C:\Work\Prg\aarray_dlg_invoice\aarray_dlg_invoice\test.Exe ...

... into the folder I think we must modify the cGenPrg method of window class line 1304 if ! Empty( ::aControls ) cPrg += CRLF AEval( ::aControls, { | oCtrl | cPrg += oCtrl:cGenPRG( lDlgUnits ) } ) endif I think we must insert something of this : for n= 1 to Len( ::aControls) if (::aControls[n]:ClassName() ...

Thanks Mr. Rao.

I have FWH1804

It works with If oCtrl:Seek( Alltrim(cUser) )
And I have SET EXACT OFF

Other
what function replaces ClipValue2SQL()

Thanks very much

Hi, I think you should change this: oCtrl:Append( "USUARIO,ENTRA", { cUser,Datetime()} ) By this: oCtrl:Append() oCtrl:usuario := cUser oCtrl:entra := DateTime() oCtrl:Save() This works oCtrl:Append( "USUARIO,ENTRA", ...

Hi,

I think you should change this:

oCtrl:Append( "USUARIO,ENTRA", { cUser,Datetime()} )

By this:

oCtrl:Append()
oCtrl:usuario := cUser
oCtrl:entra := DateTime()
oCtrl:Save()

Silvio,

You can disable the basic tooltip

Function HazC5ToolTip( oCtrl )
Local oTip

oCtrl:cTooltip := "" // disable normal tooltip
oTip := TC5ToolTip():New( 0,0 , 200, 150, oWnd, , CLR_HGRAY, CLR_HGRAY, CLR_BLUE, 0 , 0 )

regards
Uwe

Hello, I noticed a problem using < oCtrl:cVarName > that returns the object-name. The function shows all infos of a object on focus http://www.pflegeplus.com/IMAGES/Focus2.jpg because of the error ( NIL ) I replaced the ...

... Imagino que usas 50 variables asociadas, pertenecen a un array ? Para los GETs puedes hacer: local nAt := 0 nAt = AScan( oDlg:aControls, { | oCtrl | Upper( oCtrl:ClassName() ) == "TGET" .and. oCtrl:oGet:Changed } ) si nAt es distinto de cero, entonces algún GET cambió Si las 50 ...