Dear friends,
I'm searching for the latest Harbour binaries for BCC but I can't find it. Anybody can provide a link, please?
EMG
Dear friends,
I'm searching for the latest Harbour binaries for BCC but I can't find it. Anybody can provide a link, please?
EMG
Error: Unresolved external '_HB_FUN_HB_GETFILESINZIP' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPOPEN' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPFILEFIRST' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPFILEINFO' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPFILEOPEN' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPFILEREAD' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPFILECLOSE' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPFILENEXT' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCS
Error: Unresolved external '_HB_FUN_HB_UNZIPCLOSE' referenced from E:\FWHARBOUR\LIB\FIVEH.LIB|OLEFUNCSXMLENCODE.prg(11) Error E0002 Redefinition of procedure or function 'XMLENCODE'#include "Fivewin.ch"
FUNCTION MAIN()
? XMLENCODE( [<>&'"] )
RETURN NIL
STATIC FUNCTION XMLENCODE( cXml )
LOCAL cEnc := ""
LOCAL cChr
LOCAL i
FOR i = 1 TO LEN( cXml )
cChr = SUBSTR( cXml, i, 1 )
DO CASE
CASE cChr = "<"
cEnc += "<"
CASE cChr = ">"
cEnc += ">"
CASE cChr = "&"
cEnc += "&"
CASE cChr = "'"
cEnc += "'"
CASE cChr = ["]
cEnc += """
OTHERWISE
cEnc += cChr
ENDCASE
NEXT
RETURN cEnc