Delphi正则表达式使用方法（TPerlRegEx）
Delphi正则表达式使用方法（TPerlRegEx）
正 文：
使用Delphi开发软件无疑是一种比较高效率的方式，完全对象的语言，严格控制的语法，可视化开发环境的性能，编译器的速度和已编译代码的效率，编程语言的功能及其复杂性，数据库结构的灵活性和可扩展性，框架对设计和使用模式的扩充无疑都是delphi身上的光芒。
最近飘易使用Delphi开发了一套工具，由于和网络应用相关的东西较多，需要使用正则表达式，而目前主流的delphi下的正则表达式，应该是 PerlRegEx 。
官方网站: http://www.regular-expressions.info/delphi.html
直接下载: http://www.regular-expressions.info/download/TPerlRegEx.zip
安装方法（飘易使用的delphi版本是 delphi2007）:
1、先把解压的 TPerlRegEx 文件夹放在 Delphi 的根目录下的 Imports 目录中。
2、目前最新 For Win32 的版本是可以在 Delphi7，Delphi 2006，Delphi 2007，Delphi 2009 下使用。飘易用的是2007，于是就打开 PerlRegExD2007.dpk ，在 Project Manager 窗口中的 PerlRegExD2007.bpl 上点击右键，执行 Install。这时在 Tool Palette 的列表中已经有了 TPerlRegEx，在 JGsoft 组。
3、Tools -> Options -> Environment Options -> Delphi Options -> Library-Win32 -> Library path -> 添加路径：$(BDS)\Imports\TPerlRegEx （注：就是刚才放置的路径）。
4、打开delphi根目录下 Imports\TPerlRegEx\pcre ，把 pcre3.dll 文件复制到 C:\WINDOWS\system32 文件夹下，这个文件夹里是windows系统存放 dll 文件的大本营。如果不复制pcre3.dll，在应用 TPerlRegEx 正则的时候，系统提示出错。
5、用delphi打开 Imports\TPerlRegEx 目录下的 pcre.pas 文件，找到 //{$DEFINE PCRE_STATICLINK} ，把之前的注释 // 删除；找到 {$DEFINE PCRE_LINKDLL} ，把它注释掉，即改为&nb
相关文档：
．pas ---- pascal的缩写, 单元原始程式档（ unit source files ）
．dpr ---- 专案档 ( project files )
．dpk ---- 包裹原始程式档/组件包 ( package source files )
．dfm ---- 表单档 (记录form的内容,除去这个内容就等于删除了form这个表单)
．dcu ---- 是编译好的单元文件.若只有一个dcu文件,则不能看到源代码.
......
ADO 使用 ORACLE provider FOR OLE DB 驱动时
调用存储过程需要返回游标时，在连接字符串中增加
PLSQLRSet=1 参数。
存储过程中的游标不需要付初始值
如:
sp1: TADOStoredProc;
sp1.Close;
sp1.ProcedureName := 'pkg_ScanList_By_JobNo.sp_GetScanList';& ......
absolute
//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.
var
Str: string[32];
StrLen: Byte absolute Str;
//这个声明指定了变量StrLen起始地址与Str相同.
//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.
begin
Str := 'abc';
Ed ......
32位Delphi程序中可利用TRegistry对象来存取注册表文件中的信息。
一、创建和释放TRegistry对象
1.创建TRegistry对象。为了操作注册表，要创建一个TRegistry对象：ARegistry := TRegistry.Create；
&n ......
技术交流,DH讲解. 这个是在CSDN上面看见的问题.我说说自己的想法. procedure TForm1.btn1Click(Sender: TObject);
var
Str:String;
begin
Str:='abc' ;
Str:=str+'d';
str:=copy(Str,1,3);
str:=UpperCase(str);
end;
问题1答案:2010下
Unit4.pas.29: begin
005144E0 55 p ......
