FiveTech Software tech support forums

Dear Silvio, Arguments aArray The array name into which the value xValue will be inserted. nPos Subscript position in aArray. Default: 1st position xValue Value to be inserted lAutoSize Boolean flag to increase or not the size of aArray. Default value: .F. ...

Dear Silvio, Arguments aArray The array name into which the value xValue will be inserted. nPos Subscript position in aArray. Default: 1st position xValue Value to be inserted lAutoSize Boolean flag to increase or not the size of aArray. Default value: .F. ...

... DrXlsx, NOT XBROWSE i like to get a working Excel Sheet with German "Umlaute" using DrXlsx --- when you ask me for STRTOHEX() i got xValue = "„" STRTOHEX(xValue) = "84" ASC(xValue) = 132 xValue = "”" STRTOHEX(xValue) = "94" ASC(xValue) = 148 ...

hi, this i got when have use DBU and fill it with German Umlaute xValue = "ä" STRTOHEX(xValue) = "84" ASC(xValue) = 132 xValue = "ö" STRTOHEX(xValue) = "94" ASC(xValue) = 148 xValue = "ü" STRTOHEX(xValue) ...

... 951 ) Y la linea del prg es un simple say: oExcel:Say(3,1 ,'Matrícula','Arial',09 ,.F. , , , 7 , , , ,1) //METHOD Say( nRow, nCol, xValue , cFont , nSize , lBold , lItalic ,lUnderLine, nAlign, nColor, nFondo , nOrien , nStyle , cFormat ) CLASS TExcelScript Como que "explota" ...

...   ambos retornan 8, ahi no se si falla o esta correcto, dado que la ayuda indica que Syntax Transform( <xValue>, <cPicture> ) --> cFormattedString Arguments <xValue> This is a value of data type Character, Date, Logic, Memo or Numeric ...

...   ambos retornan 8, ahi no se si falla o esta correcto, dado que la ayuda indica que Syntax Transform( <xValue>, <cPicture> ) --> cFormattedString Arguments <xValue> This is a value of data type Character, Date, Logic, Memo or Numeric ...

cJSON := hb_jsonEncode( xValue [, lHuman] )

After save cJSON string in memo field

To Restore:

nLengthDecoded := hb_jsonDecode( cJSON, @xValue )


From https://www.kresin.ru/en/hrbfaq_3.html

... ) ? Eval( bBlock, nNumber ) ? Eval( bBlock, GetNew() ) ? Eval( bBlock, bBLock ) RETURN FUNCTION ConversionBlock() LOCAL bBlock bBlock := <| xValue | LOCAL cType := Valtype( xValue ) LOCAL cValue, xElem SWITCH cType CASE "A" cValue := "{" FOR EACH xElem IN xValue cValue ...

... //cierra el fichero return //-----------------------------------------------------// STATIC FUNCTION GetPropertyValue(oService, cName, xValue ) LOCAL oArg oArg := oService:Bridge_GetStruct( "com.sun.star.beans.PropertyValue" ) oArg:Name := cName oArg:Value := xValue RETURN ...

... _CdmType( xReturn, cValType ) RETURN (xReturn) //----------------------------------------------------------------------------- FUNCTION _CdmType( xValue, cValType ) local xReturn := xValue IF (VALTYPE(xValue)<>cValType) DO CASE CASE cValType="C" DO CASE CASE (VALTYPE(xValue)="N") ...

No. Pero solamente estas ejecutardo la CLase Tpublic. Colocalo asi. __objSendMsg( Self, "_" + cName,xValue ) Me imagino que pasas el Nombre (cName) y el valor para inicializarlo (xValue) Muestrame como haces el llamado a esta clase. Sigue sin funcionar...no declara ...

No.
Pero solamente estas ejecutardo la CLase Tpublic.
Colocalo asi.

__objSendMsg( Self, "_" + cName,xValue )

Me imagino que pasas el Nombre (cName) y el valor para inicializarlo (xValue)
Muestrame como haces el llamado a esta clase.

... PosUpper(<cString>,[<lNoUpper>],[<nSkipChars>])->nPos Prgexptoval(<cString>)->xValue PrinterExists(<cPrinterName>)->lInstalled PrinterPortToName(<cPortName>)->cPrinterName PrintFileRaw(<cPrinterName>,<cFileName>,[<cJobTitle>])->nErrorCode ...

... PosUpper(<cString>,[<lNoUpper>],[<nSkipChars>])->nPos Prgexptoval(<cString>)->xValue PrinterExists(<cPrinterName>)->lInstalled PrinterPortToName(<cPortName>)->cPrinterName PrintFileRaw(<cPrinterName>,<cFileName>,[<cJobTitle>])->nErrorCode ...