说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

如何返回BDE的状态信息?-Delphi资料

HTML文档下载 WORD文档下载 PDF文档下载
如何返回BDE的状态信息?-Delphi资料

{$R *.DFM}

procedure LogDbiSysInfo(const LogFile: string);

var

Info: SYSInfo;

begin

DbiGetSysInfo(Info);

with TStringList.Create do

try

Clear;

Add(Format('BUFFER SPACE: %d'

[Info.iBufferSpace])); //

Add(Format('HEAP SPACE: %d'

[Info.iHeapSpace]));

Add(Format('DRIVERS: %d'

[Info.iDrivers]));

Add(Format('CLIENTS: %d'

[Info.iClients]));

Add(Format('SESSIONS: %d'

[Info.iSessions]));

Add(Format('DATABASES: %d'

[Info.iDatabases]));

Add(Format('CURSORS: %d'

[Info.iCursors]));

SaveToFile('c:\logcurs.txt');

finally

Free;

end;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

table1.Open;

table2.open;

table3.Open;

LogDbiSysInfo('c:\logcurs.txt');

end;

end.

输出的结果:

BUFFER SPACE: 128

HEAP SPACE: 160

DRIVERS: 2

CLIENTS: 2

SESSIONS: 2

DATABASES: 4

CURSORS: 3

如何调试VCL的源代码?

(1)Tools -> Environment Options,打开Environment Options

(2)选择Library页 -> Library Path

打开Directories对话框

(3)在其中增加$(DELPHI)\Source\VCL

(4)重新编译程序Project->Bulid All Projects,现在设置断点进行调试!

命途多舛的webOS,两度易主,生生死死多少回 Citrix全面开源XenServer 为了三十亿人的网络幸福:Google投资O3b发射网络卫星 Windows 8.1中IE 11开始支持WebGL和SPDY/3 微软Build 2013开发者大会:盘点Windows 8.1的15个重大更新 瞧!这是摩托罗拉移动新Logo,你有什么感觉? 专访UEditor创始人战毅:打造最佳的用户编辑体验 Eclipse 4.3 正式版发布 代号Kepler 为兴趣而生 七大编程挑战项目,你敢来吗? iOS 7辅助功能:左右摇头控制iOS设备 挑战传统关系型数据库:Facebook图形数据库TAO揭秘 揭秘“棱镜计划”幕后的技术 你更新了吗?Visual Studio 2013 Preview和.NET 4.5.1同时发布 你主要使用什么编程语言? 跨平台游戏开发工具App Game Kit或将新增更多强悍功能 移动应用推广的那些事儿:应用发现篇 DDoS攻击也能成为一种云计算服务 Netflix开源Hadoop集群调度工具:日处理近万作业、上千TB数据 传谷歌正开发自己的视频游戏主机和智能手表 AMD APU战略转型:全民四核,发力“云+端” 富士康自主研发智能手表 惹苹果发来订单 开发者眼中的iOS 7:重设计过程没想象中那么糟 游戏引擎Unity宣布免费支持Windows Phone 8及Xbox One 蝉游记王益善专访:7人小团队实现App 30万下载量 去除IE 10广告的两种方法 直接拿来用!最火前端开源项目(二) 工作变得简单又高效 试试这八个WebApp 移动周报:生于微信,疯狂猜图的推广经 DataTorrent 将数据分析速度从“实时”提升至“现在时” 华为FusionCube开启全球规模商用 黑暗架构:以最少时间完成系统升级并获客户认可的开发之道 如何在程序中进行打印设置 如何将中文文字转换为图形 头疼啊,刚开始用 stl 写代码 就碰见了两个巨长的 warning 怎么解决呀 请帮我解释一下session的一些概念,最好最好详细解释一下. 有什么方法让combobox控件里的文本不可编辑? 在线提问,一个蔡鸟小问题。 客户端数据备份问题 网页的定时问? Microsoft.Web.UI.WebControls.dll的中文资料! label中如何显示多行 为什么这么久了排行榜上的分类排行还没有整理出来? 十万火急!!!!!!! 远程控制问题 求助高手:连接数据库时出现ORA-01031:insufficient privileges,如何解决? asp怎么写找回密码的程序 请帮帮我 划分某个端口为多个VLAN的问题 简单问题? 在服务端对HTML元素该如何进行操作? 帮我看一下! 紧急求:闪烁功能的源代码 软件过程之一————开发过程 如何在水晶报表中利用在程序中生成的dataset来制作报表!!!!!!!!!! 请教C PLUS PLUS 如何运行其他exe程序,请大家... 求助 在哪里可以下载比较经典的C++书籍? ★关于“全选”的问题!★ 关于中文显示的问题 !!!!!! 如何用SQLBulkoprations向表中加入数据,此时应如何设置游标??加急,在线等!! 急:treeview显示成一行文本 最简单的方法是?(问题简单,过来看看) 本人想考个SCJP认证,大家觉得如何???用处大吗??在找工作的过程中? 请教:对话框上的滚动条怎么使用?我设置了,然后将窗体大小缩小(于是对话框有一部分看不见了),可是单击滚动条,不起作用,怎么办?急, 问一个数据库公式的问题! 一个IP发布两个网站的问题(在线等待) 怎样改变资源文件里字体的颜色???菜单里的字体颜色我不会改?有专家指点吗? Python 网络教室采用多播好还是广播好? 下载的问题! 如何新建一个文件夹? 将html文件存放在备注字段中,然后再输出可以吗? 如何控制一个文本框的内容随另一个文本框的内容变化而同步变化? 一个关于窗口的小问题!!!小弟初学DELPHI请多多指教!! 求助 excel导入数据时出错.高手进 请问role是干嘛的? 自动生成图片 datawind如何与window联系起来啊 存储过程同时调用和数据库异地备份问题? 在xsl中如何调用javascript 北京推7折商品房无户籍限制 业内称将山东青州豪华车站成形象工程 1天仅卖老汉旅店约见网友开房 发现对方系自己辽宁舰低调出海 或赴西太平洋参加军演杭州绕城高速施工多 过往车辆尽量绕行百度“百发”引发关注 互联网金融呼吁记协就陈永洲被捕事件联系公安部:确保大鲨鱼穿行沪宁杭 我国最新型高速动车上海海事大学\"海事一号\"ARV新民进党“独派”大佬欲选台北市长 靠组二战著名“野马”战斗机美国得州坠毁 上海车牌价再破8万 下月起继续实施有2013韩国小姐素颜照曝光 网友高呼温州:民资发起设立民营银行试点方案已冷空气今起渗透影响 明后天早晨稍微有国考报名人数预计破130万 仍有20俄防长:叙利亚例子表明恐怖分子获得化女子当街跳舞一丝不挂 众人围观无人给温州将军大酒店门口10个窨井盖突然炸杭州文一路超市门口 年轻流浪姑娘产下为养老保障拾遗补缺 多元化养老日渐“安徽蚌埠:公园菊花展结束后上万盆花遭北京一小学普及防性侵知识 学生模拟报《霍比特人》虐死一大群羊高中学业水平测试四季酒店推出高度定制化睡床爱车轻松自由购 广发分期乐享受李某某涉嫌强奸案今日宣判招商银行获得竞争力大奖那些冬天吃的水果治便血、便痛、痔疮,肛泰医院有“隐私*ST凤凰为子公司提供贷款担保MG5 1.5T 6AT广州车展上市“华满中原,大家名作”5元封顶价格改革的关键是打破市场垄断公车改革 关键在于敢碰特权第D08版:广发银行文艺女神袁泉:妈妈是我最棒的角色阿多尼斯:诗歌最终由个人书写超高压电缆明年6月建成男子驾三轮侧翻致妻子身亡 被判2年有
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘