排序函数:一个很实用的Ehlib排序函数，适合ADO
Ehlib3.0版本以上虽然支持排序功能但不支持带有Order BySQL语句而且排序很慢；我写这个排序利用ADOsort思路方法排序很快几万条数据也是很快该支持Lookup字段排序不支持计算字段排序计算字段值在内存里高速运算排序分为:升序、降序和默认 3种支持排序图标procedure SortDBGridEh(Sender: TO... [阅读全文]
dbgrid复选框:DBGrid中用光标键控制Cell
{////////////////////////// //// Grids549 //// //// 14:33 2005-2-17 //// //}//////////////////... [阅读全文]
delphiwinsock:Winsock完成端口模型-Delphi代码
原文出处Windows网络编程技术第8章 完成端口模型由于原书附是C代码我把其翻译成Delphi代码其中winsock2.pas在delphi中不带要另外下载http://jungla.dit.upm.es/~bti/files/winsock2.pasprogram CompletionIO;{$APPTYPE CONSOLE}uses... [阅读全文]
软件启动画面中启动状态的显示
我们平时看到很多软件Software(PhotoShop3DMax)都会在启动画面中显示当前正在启动哪个模块并在模块加载失败时给予提示这样好处是可以让比较专业软件Software使用者知道当前软件Software加载了哪些模块或者在软件Software发生启动时让用户得以反馈是启动哪个模块时发生了以及在长时间软件Software启动过程中... [阅读全文]
delphiflash:在Delphi里播放Flash
首先，你的机器里要装有Flash播放软件（你的IE能显示Flash）。IE之所以能显示Flash是安装了由Macromedia公司提供的swflash.ocx控件，我们可以在Win98的$Windows\\System\\Macromed \\Flash中或在Win2000中的$Winnt\\System32\\ Macromed\\Flash中找到它。ActiveX控件在Window... [阅读全文]
多线程支持库1.1版:支持多线程的日志类，可以在线程中使用，用来与主窗口通讯
在些涉及到多线程设计中线程常常有些消息要发送到用户界面进行显示这方面处理思路方法很多有通过消息传递、全局变量、管道等这里给出了种通过消息传递和全局变量相结合处理思路方法并且把代码封装到个TLog类中使用方便在这里和大家分享//TLog类介绍说明部分事实上该类是个“日志队列”const MAX_LOG_LEN=1024; type TLog... [阅读全文]
2003下安装xp:win2000/xp/2003下不能关闭程序的方法
只针对2000以上系统,9X就别问我了,4年没搞了:) 般有4种思路方法: 1)DLL挂靠思路方法 改写为DLL结构,挂靠Explorer.exe上运行 好处:没进程实体普通进程查看无效 缺点:可以通过代码叫Explorer.exe Unload你Dll呵呵还有Explorer出错时会重新启用那个时候需要重新挂靠你DLL ... [阅读全文]
硬盘怎么样分区:怎么样知道硬盘上有哪几个分区或者指定的分区是在哪一个硬盘上
希望能得到这样结果 磁盘 1 分区 1 : C 磁盘 1 分区 2 : D 磁盘 1 分区 3 : E 磁盘 1 分区 4 : F 磁盘 2 分区 1 : G 磁盘 2 分区 2 : I 磁盘 2 分区 3 : J 磁盘 2 分区 4 : K... [阅读全文]
delphi布尔:Delphi中的布尔类型
Delphi... [阅读全文]
汉字查拼音:自动生成拼音(汉字反查到拼音)
unit IMCode; // 简化版拼音反查单元erface{ iMode 2进制功能位介绍说明 X X X X X X X X X X X X X X X X 3 2 1 1: 0 - 只取各个汉字声母第个字母; 1 - 全取 2: 0 - 遇到不能翻译不翻译; 1 - 翻译成 \'?\' (本选项目针对全角) 3: 0 - 生成串... [阅读全文]
delphi全局变量:防止全局hook入侵Delphi版，2000以上系统适用（part2）
unit Unit1; erface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = (TForm) Button1: TButton; Memo1: TMemo... [阅读全文]
delphi全局变量:防止全局hook入侵Delphi版，2000以上系统适用（part3）
unit MLDE32Unit; //Micro Length Disassembler Engine erface //作者忘记了不好意思好像出自29A-7 //sorry, author! function LDE32(Opcode: poer): eger; implementation function LDE32(Opcode:... [阅读全文]
delphi调用dll:delphi的调用约定
Calling conventions(约定) 在声明过程或时你可以使用下面指示字的来指明约定:register、pascal、cdecl、stdcall以及safecall比如function MyFunction(X, Y: Real): Real; cdecl;... 约定决定了参数被传递给例程顺序它们也影响从堆栈中删... [阅读全文]
Delphi中实现汉字拼音声母查询
Delphi中实现汉字拼音声母查询,unit代码如下:unit Unit1;erfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = (TForm) ListBox1:... [阅读全文]
windowshook:使用HOOK随心监视Windows
每个都有自己生存空间在Windows系统中你可以在任何时候让你执行些操作还可以触发消息触发消息分为 3种是操作你界面onClickonMouseMove等等另外个可以使用Windows消息机制来捕获些系统消息但是如果你想在任何时候监控任何情况那可能你就会选择HOOK来实现了虽然还有其他思路方法但不得不承认HOOK是个比较简单解决问题途径... [阅读全文]
c语言枚举:枚舉並設置界面的Caption之多語言方法
uses ..., TypInfo;... [阅读全文]
动态代理:关于动态代理
本来想上周末没能用DELPHI实现动态代理就算了可是这几天却始终放不下这个想法这实在是个太美妙想法了而且在认真看了VCL对SOAP实现后现在至少有 9成把握可以实现这样个动态代理 那么动态代理有什么用？这要先从GoFProxy模式说起假设有下面这样个接口及其实现: 现在如果你是这个接口用户而这个接口及其实现者提供了个: Foo : IF... [阅读全文]
delphirtti:用DELPHI的RTTI实现对象的XML持久化
去年我花了很多时间尝试用DELPHI进行基于XMLWEB应用开发起初设想是很美好但结果做出来东西很简陋部分原因就在于XML到Object的间数据绑定实现太麻烦(另部分是对XSLT不熟学习它花了很多时间) 的前我直是用DELPHI提供XML Data binding来做基本做法是:先用工具(如XMLSPY)做好个XML Schema(XSD... [阅读全文]
delphi编程:Delphi编程控制摄像头
你电脑有没有摄像头？看到别人用... [阅读全文]
红头文件:lua头文件翻译之lauxlib
{** $Id: lauxlib.h,v 1.60 2003/04/03 13:35:34 roberto Exp $** Auxiliary functions for building Lua libraries** See Copyright Notice in lua.h} { this .h header file is tra... [阅读全文]
跟随鼠标移动:实现界面跟随鼠标移动的实例
unit Unit_Mouse;erfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Menus; {= DESIGN BY : 花好月圆 / 玉面书生 DATE: ... [阅读全文]
delphi全局变量:防止全局hook入侵Delphi版，2000以上系统适用（part1）
原理见http://202.38.73.222/~pjf/blog/archives/000040.html 代码如下: form1.dfm object Form1: TForm1 Left = 192 Top = 107 Width = 396 Height = 261 Caption = \'Form1\' Color = clBt... [阅读全文]
crc算法及c语言实现:CRC算法的实现
unit Crc32;erface ---转截ksaiyBloguses Windows,SysUtils,Classes;const //Crc32表 Table:Array[0..255] of DWORD= ( $00000000, $77073096, $EE0E612C, $990951BA, $076DC419, $706AF... [阅读全文]
delphirtti:用DELPHI的RTTI实现数据集的简单对象化
在强大DELPHI RTTI--兼谈需要了解多种开发语言文中我说了下我用DELPHIRTTI实现了数据集简单对象化本文将详细介绍下我实现思路方法 首先从个简单例子说起:假设有个ADODataSetControl控件连接罗斯文数据库SQL为: select * from Employee 现在要把它内容中EmployeeID, FirstN... [阅读全文]
进程查看器:进程查看器1.2版，欢迎下载
自己编写进程查看/管理软件Software除实现W2K进程管理器功能外还可查看各进程所文件、结束任务并删除文件、复制模块文件等功能除NT4外其它操作系统包括98、ME、2K、XP等均可正常使用下载地址:http://www.freewebs.com/kacarton/software/kktproview.rar (235K) (国外免费... [阅读全文]
delphi服务程序:用Delphi创建服务程序
Windows 2000/XP和2003等支持种叫做\"服务\"东西.作为服务启动有以下几个好处:(1)不用登陆进系统即可运行.(2)具有SYSTEM特权.所以你在进程管理器里面是无法结束它.笔者在2003年为公司开发机顶盒项目时候,曾经写过课件上传和媒体服务,下面就介绍下如何用Delphi7创建个Service. 运行Delphi7,选... [阅读全文]
access压缩mdb:用程序实现压缩access(*.mdb)数据库的方法
下面用来压缩access数据库 需要增加ComObj单元function CompactDatabase(AFileName,APassWord:):boolean;//压缩和修复数据库,覆盖源文件const SConnectionString = \'Provider=Microsoft.Jet.OLEDB.4.0;Data Sour... [阅读全文]
红头文件的格式:lua头文件的pas翻译_lua.h
{ ** $Id: lua.h,v 1.175b 2003/03/18 12:31:39 roberto Exp $ ** Lua - An Extensible Extension Language ** Tecgraf: Computer Graphics Technology Group, PUC-Rio, Brazil ** ht... [阅读全文]
delphi控件:用Delphi编写自己的可视化控件
可视化控件(Visual Component)实际上就是一个类(class)，要编写一个类，可以直接在*.pas文件中编写。但是要编写控件，则必须使用包(package)。从File菜单中选择New，新建一个Package，这就是存放和安装控件用的包。然后单击Package窗口中的Add按钮，添加一个元件(Unit)。... [阅读全文]
delphi应用程序:在Delphi中开发使用多显示器的应用程序
Windows... [阅读全文]
