... 0) aTable := {} Do while (!oTemp4:Eof()) * If Empty(oTemp4:Nome) oTemp4:skip() Loop Endif ....................... c1:="Cartella n."+ Trim(oTemp4:codice) c2:=alltrim(oTemp4:nome) procedure to Create atable from oTemp4 ........................ then call CreateRtf(aTable,c1,c2,oFile) ...
... = type that the data is made in (ex. Datatype = array, but Type = C as return value for program info = what's about...to remember afther time ))) trim = Should result be trimmend. All tips, enhancements are welcome... the small code (but you have this already) just for forum setkey( VK_F6,{|| ...
... become the real record names? select products a=5 b=5.8 set filter to products->niet=" " goto top do while .NOT. eof() cnaam2=TRIM(products->naam) nalias=TRIM(products->alias) @ a,5 say cnaam OF oDlg FONT oFont @ b,12 get nalias OF oDlg SIZE 20,11 picture "999" ...
... the DO Events to sysrefresh and uncomment the 2 lines //SetProperty( "TranslateMemo", "RichEdit_Translate", "Value", TRIM( cTranslated ) ) //DoMethod( "TranslateMemo", "RichEdit_Translate", "Refresh" ) Then it seems to work !! Thanks for ...
The class used in the RES dialog file is TWBrowse... Source... REDEFINE LISTBOX oBrw ; FIELDS aAcc_No[ nItem ] ,; P6_Mast->(DbSeek(Trim(PadCode1(aAcc_No[ nItem ]))),P6_Mast->Acc_Name) ,; aAcc_Desc[ nItem ] ,; If(!Empty(aTrn_AmtD[ nItem ]),TransForm(aTrn_AmtD[ nItem ],'99,999,999,999.99 ...
... c9:= "081828384858687888" c10:= "091929394959697989" contacomb:= 1 do while (contacomb <= combinaz) c:= "C" + LTrim(Str(contacomb)) cnum:= LTrim(Trim(&c)) <----------------- give me error here not found c1 conta:= 1 do while (conta <= Len(cnum) / 2) ...
Hello Marc, You can't just TRIM the column name. You then have a different name when you query it - a name that does not exist in your xBrowser and therefore the error. You could maybe test with the column number instead of oBrw:oCol( ...
Julio, Agosto, Septiembre 2021 ============================== * Mejora:Se ha actualizado WindowsXP.Manifest64 para hacerlo compatible con Windows 11. * Nuevo: Nueva función FrameTiff( cTiffFileName ), convierte un fichero TIFF multipágina en múltiples ficheros JPGs. Muchas gracias a Manuel Alvarez: ...
... are recognized for appropriate capitalization. * New functions FW_TRIM,FW_RTRIM,FW_LTRIM,FW_ALLTRIM(cStr,[cTrimChars]) These functions trim not only spaces, but all control characters, which include white-spaces like TABs, CRLF(EOL), EOF, EOpage, etc. If an optional list of characters ...
... * Enhancements: functions GetModuleFileName() and ShellExecute() are now Unicode compatible, if FW_SetUnicode() is set to .T. * New translate: xtrim( <u> ) returns trim of <u> if <u> is a character value and otherwise returns <u>. * New Miscellaneous functions: - FW_AGE( ...