摘要：
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) private { Private declarations } public { Public de... 阅读全文
2005年7月15日 #
摘要：
unit UfrmMain; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TfrmMain = class(TForm) btn1: TButton; btn2: TButton; btn3:... 阅读全文
摘要：
No.1 Delphi中的Include文件 begin ShowMessage({$I File1.txt}; //有错吗？ ShowMessage(UpperCase({$I File1.txt}); end; //新建一个文本文件“File1.txt”、内容填写为:“'Hello Word')”看看 No.2 可爱的强制转换 var B: Byte begin Char(B) ... 阅读全文
摘要：
根据〖中华人民共和国国家标准 GB 11643-1999〗中有关公民身份号码的规定，公民身份号码是特征组合码18位：由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为：六位数字地址码，八位数字出生日期码，三位数字顺序码和一位数字校验码。 地址码表示编码对象常住户口所在县(市、旗、区)的行政区划代码。生日期码表示编码对象出生的年、月、日，其中年份用四位数字表示，年、月、日之间不用分隔符。... 阅读全文
摘要：
1、查找和替换。（1）+F[1]：选择页“Find”，进行查找，则根据查找方向继续查找。选择页“Find in Files”，则进行该工程内的全文查找。（2）+R：替换。（3）设置书签和定位：设置书签：++数字[2] 定位书签：+数字 2、窗体编辑。（1）：在窗体编辑和代码编辑间进行切换。（2）：调用窗体组件属性/事件浏览设置器（Object Inspector）。（3）+：对齐... 阅读全文
摘要：
一、概述 Delphi作为Windows下的一种快速开发工具，不仅能开发一般的Windows应用程序，而且还具有强大的数据库应用程序开发功能。Delphi本身提供了对BDE，ODBC，ADO和InterBase几种数据库驱动的支持，能够满足不同应用对数据库程序开发的需要。 然而，在发布用Delphi开发的数据库程序时，除了要安装应用程序之外，还需要同时发布数据库驱动程序。这对于一些只涉及单个或... 阅读全文
摘要：
1.数论算法 求两数的最大公约数 function gcd(a,b:integer):integer; begin if b=0 then gcd:=a else gcd:=gcd (b,a mod B); end; 求两数的最小公倍数 function lcm(a,b:integer):integer; begin if a0 do inc(lcm,a); end; 素数的求法 A.小范围内判断... 阅读全文
摘要：
使用方法, uses 本单元——>使用如:Pub.MsgBox('你好，欢迎使用本公用函数！');ShowMessage(Pub.PathExeDir); //////////////////////以下源码开始{$DEFINE Delphi6}//D5下不要此句unit PubFuncUnit;interfaceuses Windows, SysUtils, ShellAPI, Messages... 阅读全文
摘要：
(** 单元说明: 文件/流的加密解密方法(For Delphi 6-7)** 软件来源: http://www.go-neumann.com* http://www.inbytes.net** 作 者: neumann@163.com** 使用说明: 此文件的代码可以直接编译使用,* 您可以根据需要编写自己的加密/解密代码.** 声 明: 以下... 阅读全文
摘要：
{ No.1 判断逻辑类型 }var B: Boolean;beginB := Boolean(2); //这样只是为了调试//B := True;if B = True then ShowMessage('B = True'); //不建议//不安全///////if B then ShowMessage('B'); //建议//简短end;var B: Boolean;beginif Edit... 阅读全文
摘要：
动态链接库(DLLs)是从C语言函数库和Pascal库单元的概念发展而来的。所有的C语言标准库函数都存放在某一函数库中，同时用户也可以用LIB程序创建自己的函数库。在链接应用程序的过程中，链接器从库文件中拷贝程序调用的函数代码，并把这些函数代码添加到可执行文件中。这种方法同只把函数储存在已编译的.OBJ文件中相比更有利于代码的重用。 但随着Windows这样的多任务环境的出现，函... 阅读全文
摘要：
1. 控制INI文件几法 要利用.INI文件做程序有关数据的存储工作，就需要能读和写.INI文件，所以列了如下方法给大家参考：从.INI文件中获取字符串varstrResult:pchar;beginGetPrivateProfileString('windows', // []中标题的名字'NullPort', // =号前的名字'NIL', // 如果没有找到字符串时，返回的默认值strRes... 阅读全文
摘要：
Delphi作为一门新起的Windows编程语言，由于其集众多的优秀特性于一身，因而越来越得到广大编程人员和发烧友的青睐。以下十则技巧涉及的面比较广泛，希望能够对Delphi的爱好者有所裨益。1．类似于vb．中的doevents功能。 大家或许发现，在Delphi中没有类似于vb．中的doevents函数，这样有的时候，我们将无法使Windows响应多个同时发生的事件。其实，在D... 阅读全文
摘要：
配置数据引擎(BDE、SQL Link)的简单方法 在数据库程序分发时，需要携带数据引擎(BDE、SQL Link)，并且在客户端安装完程序后还需要配置数据引擎，如用户名(username)、密码(Password)等等。如果手工配置的话，工作量比较大，这时，我们可利用InstallShield For Delphi轻松实现配置。在用InstallShield For Delp... 阅读全文
摘要：
在Delphi中调用Windows API 函数十分方便，只需在单元的uses段加入Windows 单元名即可（对于由Delphi自动创建的单元，该项工作已经完成）。单元Windows.pas 已经由Delphi编写并直接提供开发者引用。笔者在开发Windows 应用时对于几个特别的API 函数总结了一些经验供大家参考。以下开发经验均在Windows 9x中适用。 一、关闭系统 ... 阅读全文