码农的笔记

Delphi虽好,但已不流行; 博客真好,可以做笔记

博客园 首页 新随笔 联系 订阅 管理
  117 随笔 :: 0 文章 :: 3 评论 :: 61568 阅读

04 2022 档案

摘要:来源:http://www.itpub.net/thread-193247-1-1.html 先保存,以后研究一下 1 *--获取连接SQL服务器的信息 2 3 所有连接本机的:操作的数据库名,计算机名,用户名,网卡物理地址,IP地址,程序名 4 -*/ 5 6 /*--调用示例 7 --显示所有本 阅读全文
posted @ 2022-04-30 09:43 码农的笔记 阅读(1120) 评论(0) 推荐(0) 编辑

摘要:此处代码只是测试代码,仅仅是测试 //环境:D7+SQL Server 2008 1 unit Unit1; 2 3 interface 4 5 uses 6 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Fo 阅读全文
posted @ 2022-04-21 18:06 码农的笔记 阅读(90) 评论(0) 推荐(0) 编辑

摘要: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 阅读全文
posted @ 2022-04-08 13:57 码农的笔记 阅读(358) 评论(0) 推荐(0) 编辑

摘要: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 阅读全文
posted @ 2022-04-08 11:04 码农的笔记 阅读(73) 评论(0) 推荐(0) 编辑

摘要:1. 不可思议的函数调用--开始- 开发环境D7 1 function TForm1.GetssA: string; 2 begin 3 Result:=Result+'AA'; 4 end; 5 6 procedure TForm1.Button1Click(Sender: TObject); 7 阅读全文
posted @ 2022-04-08 10:58 码农的笔记 阅读(69) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示