摘要:
//dll code uses // ShareMem, SysUtils, Windows, Math; {$R *.res} function TestString1(Buffer: PChar): PChar; stdcall; var Tmpstr:string; begin try Tmp 阅读全文
摘要:
使用CNPACK 的单元来实现AES CBC 解密 CBC PKCS7 解密要注意的点是,如果解密内容不够16位整除要补#0 var inbase64, outbase64: string; i:integer; Ret:string; TmpAesIv: TAESBuffer; IvStr: An 阅读全文
摘要:
https://learn.microsoft.com/zh-cn/sql/t-sql/data-types/datetime-transact-sql?view=sql-server-ver16&redirectedfrom=MSDN http://www.hemingcha.com/a1/MsS 阅读全文
摘要:
procedure RunMSDOS(Str: string); var Command: string; Output: string; Buffer: array[0..255] of Char; Security: TSecurityAttributes; ReadPipe, WritePip 阅读全文
摘要:
function Get360SDPath:string; const AppsPath:string= '\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths'; S60SD:string='360sd.exe'; var ARegistry:T 阅读全文
摘要:
因为for xml有些特殊符号 不能作为分割符号,所以采用这种方式。如果是SQL2012的话 有自带的函数了 --测试数据 IF OBJECT_ID('tempdb..#tmp_Orgdata') IS NOT NULL DROP TABLE #tmp_Orgdata GO --GID 分组ID S 阅读全文
摘要:
TWinHTPP /// a class to handle HTTP/1.1 request using the WinHTTP API// - has a common behavior as THttpClientSocket() but seems to be faster// over a 阅读全文
摘要:
SELECT sp.object_Id as FunctionId, sp.name as FunctionName, isnull(param.name,'')as ParamName,isnull(usrt.name,'') AS [DataType], ISNULL(baset.name, ' 阅读全文
摘要:
开源的版本也一样会。 rtcinfo.pas ,以下的解析 StatusCode 有问题,如果服务器返回的是 “HTTP/1.1 200” 后面没有状态文本。会解析不到 状态码,这里应该按标准格式来,协议 空格 状态码 空格 状态文本 一个一个解析才对,但是RTC 认为状态码、文本是要一起有的。例子 阅读全文
摘要:
一般都是有dcc32.exe 通过参数来编译,但是各种控件的路径有点难搞。 写程序直接把dcc32.exe 复制过来,再把工程.cfg文件改成dcc32.cfg。 再读取测试表控件路径写进去,以下都要加入 -U -O -I -R https://blog.eurekalog.com/2009/04/ 阅读全文