If I understood correctly, then the cookie window is bothering you? This is for DIV with a bitmap. See his class. Using Eval(document.getElementsByClassName("classname").style.visibility = "hidden"; ), remove it
while also this Syntax is used METHOD Update() INLINE AEval( ::aControls,; { | o | If( ( Upper( o:ClassName() ) $ "TFOLDER;TFOLDEREX" ), o:Update(),; If( o:lUpdate, o:Refresh(),)) } ) ...
Existe algum problema em utilizar a contante RELEASE FONT para destruir uma fonte ? fivewin.ch #xcommand RELEASE <ClassName> <oObj1> [,<oObjN>] ; => ; <oObj1>:End() ; <oObj1> := nil ; [ ; <oObjN>:End() ; <oObjN> := nil ] acredito que não ...
... toma el mando (incluso si está contenido en otro) Las imágenes o cuadros de colores ya se mueven, drag&drop, con el siguiente código : IF oWnd:ClassName()="TBITMAPINF" ::bRClicked:= { || ( ::lInfinito:=.f., ::Hide(), ::oWnd:lDrag:=.t. ) } ::oWnd:blDblClick := { || ::oWnd:lDrag:=.f., ...
... lo vi en el foro) : 1.- en todos mis prgs incluí #include "hbcompat.ch" 2.- en five.win agregué #ifdef __HARBOUR__ #xcommand CLASS <ClassName> [METACLASS <metaClass>] ; [ <frm: FROM, INHERIT> <SuperClass1> [,<SuperClassN>] ] ; [ <modulfriend: MODULE ...
... lo vi en el foro) : 1.- en todos mis prgs incluí #include "hbcompat.ch" 2.- en five.win agregué #ifdef __HARBOUR__ #xcommand CLASS <ClassName> [METACLASS <metaClass>] ; [ <frm: FROM, INHERIT> <SuperClass1> [,<SuperClassN>] ] ; [ <modulfriend: MODULE ...
Buenas tardes: La clase base de Fivewin sino me equivoco es TWindow a partir de ahi heredan todas, pero esta clase base llama a un metodo ::ClassName() que no pertenece a TWindow, Entonces de que clase de Harbour heredan todas las clases que se definen? Aprovecho el mismo post para preguntar ...
... | oCtrl | cPrg += oCtrl:cGenPRG( lDlgUnits ) } ) endif I think we must insert something of this : for n= 1 to Len( ::aControls) if (::aControls[n]:ClassName() ) $ "TFOLDER;TFOLDEREX" For k= 1 to Len( ::aControls[n]:aDialogs) AEval( ::aControls[n]:aDialogs[k], { | oCtrl | cPrg += oCtrl:cGenPRG( ...
EXTEND CLASS <ClassName> WITH [MESSAGE <MessageName>] METHOD <FunctionName> EXTEND CLASS <ClassName> WITH MESSAGE <MessageName> INLINE <expression> EXTEND CLASS <ClassName> WITH DATA <MemberName> [PERSISTENT]
oRs:ClassName() = toleauto oRs:Fields:Count() = 103 oRs:RecordCount() = ERROR!!! Error description: Error ADODB.RecordSet:FIELDS/9 l record corrente corrisponde all'inizio o alla fine del file oppure è stato eliminato. Per eseguire ...