1、Delphi正则表达式学习
Delphi正则表达式学习，参考CSDN万一老师的BLOG、CSDN、网络资料以及带源码的TPerlRegEx，在此注明，以后不再说明，在些感谢Google老师和百度老师
安装：
下载地址：http://download.csdn.net/source/1668436
1、安装.dpk文件，在Libary中添加TPerlRegEx单元存放路径
2、运行程序前复制pcrelib.dll到C:\WINDOWS下
小试：
procedure TForm1.FormCreate(Sender: TObject);
var
reg: TPerlRegEx; //声明正则表达式变量
begin
reg := TPerlRegEx.Create(nil); //建立
reg.Subject := 'GoodBoy is You!'; //这是要替换的源字符串
reg.RegEx := 'You'; //这是表达式, 在这里是准备替换掉的子串
reg.Replacement := 'Me'; //要替换成的新串
reg.ReplaceAll; //执行全部替换
ShowMessage(reg.Subject); //返回替换结果: GoodBoy is Me
FreeAndNil(reg); //或 reg.Free
end;
//License Version 1.1
//Delphi 7.0
procedure TForm1.btn1Click(Sender: TObject);
var
Reg : TPerlRegEx;
begin
Reg := TPerlRegEx.Create(nil);
with Reg do
begin
Subject := '我爱DELPHI, 但Delphi不爱我--Delphi!'; //目标字符串
RegEx := 'Delphi'; //要替换的字符串
Replacement := '它'; //替换后的字符串
Options := [preCaseLess]; //不区分大小写
ReplaceAll; //全部替换
ShowMessage(Subject);
FreeAndNil(Reg);
end;
//设置Options := [preCaseLess];中文也可以替换
end;
相关文档：
3.2 用户登录方案
在进入一个系统时，必须先在登录窗体中输入正确的用户名和密码才能进入。这样可以确保系统的安全性和保密性，登录窗体的制作按照系统的大小及用处，可以分为不同的登录窗体样式，在系统第一次登录前，首先要对操作员信息进行相应的设置。本节将对登录窗体及操作员管理窗体的制作过程进行详细的说明 ......
Delphi操作注册表步骤如下：
-------------------------------------
1）在Uses中添加Registry单元；
2）声明TRegistry对象；
3）创建TRegistry对象；
4）指定根键；
----------------try------------------
5）打开需要操作的主键；
6）读写操作；
7）保存并关闭主键；
--------------finally----------------
......
Delphi操作INI文件步骤如下：
-------------------------------------
1）在Uses中添加iniFile单元；
2）声明TiniFile对象；
3）创建TiniFile对象；
----------------try------------------
4）INI文件读写操作；
--------------finally----------------
5）释放TiniFile对象；
---------------end--------------- ......
Client:TSocketConnection 和Server: Scktsrvr关系----压缩数据传输
一直用SocketConnection和服务端的传输数据在三层数据库中，从来没有注意到它们之间的数据传输，只是想着，管它了，网络的事，前段时间在Delphi中的Demos中发现Demos\Midas\Intrcpt.dpr例子，呵呵，再看了半天的VCL发现可以将Client端发送的给Server的� ......
Delphi中调用Windows自带的图片和传真浏览器查看图片，可以旋转图片也可以调用画图程序编辑图像。自己写不出来好的代码，就用系统自带的好了。
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,ShellAPI;
type
TForm1 = class(TFo ......
