Armando, para poder hacer esto, si o si debes tener algo en la terminal en modo local, o bien, identificar cada terminal por, por ejemplo, su IP o nombre de equipo en una base de datos centralizada. La idea de SysCtrol es muy buena, puedes usar un archivo INI o ...
las defino en un .ini en el disco duro local y ya :D cToPrinterTicket := LeeIniFile("CONFIG", "PRINTER_TICKET", "C:\CONFIG\PRINTERS.INI" )cToPrinterLaser := LeeIniFile("CONFIG", "PRINTER_LAER", ...
... of this version: SET HB_DIR_ADS=\Ace\101049 this set to compile build libs with ace 10, this way like reinaldo says we can access to 10 and above local and server. maybe reinaldo can help us... thanks
Enrico, are you using ads 10 on client side for build xharbour and harbour ? i guess is this the right, because using 10 version in client side we can access 10 or newer version local/server.
I don’t think those are needed. The last ADS release was 2015. Remote is useful but I find local is slower than the native rddcdx. I distribute the last .dll files they produced for 32 and 64 bit. Those are usually good with versions 10-12, except for 64 bit on 10 & ...
... for(i = 1; i < pi_iLongitud; i++ ) { vl_iLRC = vl_iLRC ^ pi_sTrama[i]; } return(vl_iLRC); }; // SEGUN FORO DE FIVEWIN function LRC( cText ) local nCheckSum := 0 local n for n = 1 to Len( cText ) nCheckSum = nXor( nCheckSum, Asc( SubStr( cText, n, 1 ) ) ) next return (nCheckSum) // valores ...
... the drawing yourself. You can do this by drawing a rectangle using functions like WndBoxClr, where you can specify the brush or pen color. Otto local hPen, oCli := ::GetCliRect() hPen = CreatePen( PS_SOLID, 1, nRGB( 255, 0, 0 ) ) WndBoxClr( ::GetDC(), 1, 1, oCli:nBottom - 2, oCli:nRight - 2, ...