摘要：
来源：http://www.itpub.net/thread-193247-1-1.html 先保存，以后研究一下 1 *--获取连接SQL服务器的信息 2 3 所有连接本机的:操作的数据库名,计算机名,用户名,网卡物理地址,IP地址,程序名 4 -*/ 5 6 /*--调用示例 7 --显示所有本 阅读全文
2022年4月30日 #
2022年4月21日 #
摘要：
此处代码只是测试代码，仅仅是测试 //环境：D7+SQL Server 2008 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Fo 阅读全文
2022年4月8日 #
摘要：
1 --这样是不行的 2 select sys.dm_exec_sql_text(most_recent_sql_handle) from sys.dm_exec_connections 3 4 --这个可以 5 select text from sys.dm_exec_connections a 阅读全文
摘要：
D7 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, StdCtrls; 8 9 type 10 阅读全文
摘要：
1. 不可思议的函数调用--开始- 开发环境D7 1 function TForm1.GetssA: string; 2 begin 3 Result:=Result+'AA'; 4 end; 5 6 procedure TForm1.Button1Click(Sender: TObject); 7 阅读全文
2022年3月15日 #
摘要：
IEEE 754了解可以参考https://www.cnblogs.com/gyunf/p/12816817.html 浮点数的内存方式以及由内存转化为浮点数_chenchaoflight的专栏-CSDN博客 https://blog.csdn.net/chenchaoflight/article/ 阅读全文
2022年3月9日 #
摘要：
开发环境D7 获取所有菜单的Caption 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 7 Dialogs, Std 阅读全文
2022年3月7日 #
摘要：
直接复制过来的，做个笔记 1.创建窗口并响应事件（不使用VCL） 1 program WindowDemo; 2 3 //{$APPTYPE CONSOLE} 4 5 uses Windows, Messages; 6 7 // 窗口函数，窗口接到消息时被Windows所调用 8 function 阅读全文
2022年1月10日 #
摘要：
//资料来源 ：一个把字符转换成各种编码文件的delphi2010函数. - textbox - IT博客 http://www.cnitblog.com/textbox/archive/2011/03/03/72913.aspx 1 procedure SaveFile(const FileNam 阅读全文
2022年1月8日 #
摘要：
superobject版本为1.2 开发环境D7 太容易忘记了，做个笔记 //1. Json的数组添加和赋值 1 var 2 Ijson,Ijson_01:ISuperObject; 3 s:string; 4 i:Integer; 5 begin 6 Ijson:=superobject.SO(' 阅读全文