摘要: procedure RunMSDOS(Str: string); var Command: string; Output: string; Buffer: array[0..255] of Char; Security: TSecurityAttributes; ReadPipe, WritePip 阅读全文
posted @ 2023-09-04 10:59 Tag 阅读(108) 评论(0) 推荐(0)
摘要: function Get360SDPath:string; const AppsPath:string= '\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths'; S60SD:string='360sd.exe'; var ARegistry:T 阅读全文
posted @ 2023-09-03 16:23 Tag 阅读(88) 评论(0) 推荐(0)
摘要: 因为for xml有些特殊符号 不能作为分割符号,所以采用这种方式。如果是SQL2012的话 有自带的函数了 --测试数据 IF OBJECT_ID('tempdb..#tmp_Orgdata') IS NOT NULL DROP TABLE #tmp_Orgdata GO --GID 分组ID S 阅读全文
posted @ 2023-07-28 10:09 Tag 阅读(44) 评论(0) 推荐(0)
摘要: 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 阅读全文
posted @ 2023-05-26 14:46 Tag 阅读(102) 评论(0) 推荐(0)
摘要: SELECT sp.object_Id as FunctionId, sp.name as FunctionName, isnull(param.name,'')as ParamName,isnull(usrt.name,'') AS [DataType], ISNULL(baset.name, ' 阅读全文
posted @ 2023-05-26 11:07 Tag 阅读(32) 评论(0) 推荐(0)
摘要: 开源的版本也一样会。 rtcinfo.pas ,以下的解析 StatusCode 有问题,如果服务器返回的是 “HTTP/1.1 200” 后面没有状态文本。会解析不到 状态码,这里应该按标准格式来,协议 空格 状态码 空格 状态文本 一个一个解析才对,但是RTC 认为状态码、文本是要一起有的。例子 阅读全文
posted @ 2023-05-23 10:04 Tag 阅读(86) 评论(0) 推荐(0)
摘要: 一般都是有dcc32.exe 通过参数来编译,但是各种控件的路径有点难搞。 写程序直接把dcc32.exe 复制过来,再把工程.cfg文件改成dcc32.cfg。 再读取测试表控件路径写进去,以下都要加入 -U -O -I -R https://blog.eurekalog.com/2009/04/ 阅读全文
posted @ 2023-05-19 17:28 Tag 阅读(171) 评论(0) 推荐(0)
摘要: delphi7 导入RDP AcitveX 生成的MSTSCLib_TLB.pas delphi真的好惨啊,资料都是其他语言的。用到都得自己转换,自身导入生成的还有问题。或者用法根本就不一样。 第一处: 生成的是这样的: IMsRdpClientNonScriptable = interface(I 阅读全文
posted @ 2023-04-08 15:36 Tag 阅读(216) 评论(0) 推荐(0)
摘要: var cf: TCompositionForm; begin cf.ptCurrentPos := Point(500, 10); ImmSetCompositionWindow(ImmGetContext(Handle), @cf); end; 其他输入法测试是可以的,QQ五笔不可以。 原因是因 阅读全文
posted @ 2023-03-26 11:00 Tag 阅读(42) 评论(0) 推荐(0)
摘要: WriteFile函数的第二个参数是一个指向要写入文件的数据的指针。 因此,您可以使用任何指针类型作为第二个参数,包括指向动态数组的指针。 但是,您需要确保指针指向的内存块具有足够的空间来容纳要写入文件的数据。 如果您使用动态数组作为指针,您需要使用SetLength函数为数组分配足够的内存,并使用 阅读全文
posted @ 2023-03-26 10:58 Tag 阅读(234) 评论(0) 推荐(0)