2014年11月3日
判断程序是否无响应
摘要： 转自《Delphi超级猛料》 function IsAppRespondig9X(dwThreadId: DWORD): Boolean; type TIsHungThread = function(dwTh... 阅读全文
posted @ 2014-11-03 22:16 小宇飞刀 阅读(207) 评论(0) 推荐(0) 编辑
判断程序是否无响应
摘要： 转自《Delphi超级猛料》 function IsAppRespondig9X(dwThreadId: DWORD): Boolean; type TIsHungThread = function(dwThreadId: DWORD... 阅读全文
posted @ 2014-11-03 22:15 小宇飞刀 阅读(613) 评论(0) 推荐(0) 编辑
用 BPL 封装数据连接
摘要： BPL 代码：uDM.pasunit uDM;interfaceusesSysUtils, Classes, uIntf, DB, ABSMain;typeTDM = class(TDataModule, IDMSearch) DS: TDataSource; ... 阅读全文
posted @ 2014-11-03 21:59 小宇飞刀 阅读(261) 评论(0) 推荐(0) 编辑
用 BPL 封装数据连接
摘要： BPL 代码：uDM.pasunit uDM;interfaceusesSysUtils, Classes, uIntf, DB, ABSMain;typeTDM = class(TDataModule, IDMSearch) DS: TDataSource; DB: TABSDatab... 阅读全文
posted @ 2014-11-03 21:58 小宇飞刀 阅读(306) 评论(0) 推荐(0) 编辑