- 博客(16)
- 收藏
- 关注
转载 解析正则表达式
最近很多帖子问如何将内容从数据库取出后换行,这就要用到正则表达式。简单的说,正则表达式是一种可以用于模式匹配和替换的强有力的工具。我们可以在许多编程语言中找到正则表达式的身影,例如,vi编辑器,Perl或PHP脚本语言,以及awk或sed shell程序等。此外,象JavaScript这种客户端的脚本语言也提供了对正则表达式的支持。由此可见,正则表达式已经超出了某种语言或某个系统的局限,成为人们广
2006-03-07 16:03:00
1070
转载 常用正则表达式语法例句
常用正则表达式语法例句 这里有一些可能会遇到的正则表达式示例: /^/[ /t]*$/ "^/[ /t]*$" 匹配一个空白行。 //d{2}-/d{5}/ "/d{2}-/d{5}" 验证
2006-03-07 15:56:00
843
转载 正则表达式语法
正则表达式语法 在典型的搜索和替换操作中,必须提供要查找的确切文字。这种技术对于静态文本中的简单搜索和替换任务可能足够了,但是由于它缺乏灵活性,因此在搜索动态文本
2006-03-07 15:55:00
708
转载 XMLHTTP批量抓取远程资料
AUTOGET=================================================FileName: Getit.AspIntro : Auto Get Data From Remote WebSiteAuthor: Babyt(阿泰)URL: http://blog.youkuaiyun.com/babytCreateAt: 2002-02 LastUpdate:
2006-03-06 18:13:00
612
转载 半小时精通正则表达式
半小时精通正则表达式! document.title="半小时精通正则表达式! - "+document.title想必很多人都对正则表达式都头疼.今天,我以我的认识,加上网上一些文章,希望用常人都可以理解的表达方式.来和大家分享学习经验. 开篇,还是得说说 ^ 和 $ 他们是分别用来匹配字符串的开始和结束,以下分别举例说明 "^The": 开头一定要有"The"字符串;
2006-03-06 15:35:00
701
转载 PHP分词
/* ----------------------------------------------------------------------- */ PHP-简易中文分词 (SCWS) ver 3.1/2.1 (实例演示) (*) 基于词频词典逐点搜索最长词, 双向根据词频取较高之分法 --------------------------------------------
2006-03-06 12:14:00
2042
转载 在DELPHI中用线程排序
在数据处理量很大的情况下,如何在数据处理的同时响应用户操作?Windows95/98和WindowsNT作为多线程的多任务操作系统,其调度单元是线程,即线程是系统分配处理器时间资源的基本单元,所以我们可以利用线程实现在处理大批量数据的同时响应用户操作。 DELPHI作为一个优秀的开发平台,对开发多线程应用程序提供了强有力的支持,即可直接利用32位Windows环境提供的Win32API接口
2006-03-06 12:05:00
674
转载 利用内存映射文件扩充程序可用的内存
Windows利用页交换文件来扩充应用程序实际可用的内存,而不仅限于实际的32兆或64兆物理内存。但是Windows的页交换文件是所有程序共用的,所以我们的程序要想获得更大的内存还是比较困难,比如600兆或者更多。难道就没有办法了吗?Windows提供的内存映射文件为我们提供解决问题的途径。在硬盘上建立一个600兆的文件,然后将它映射到我们进程的地址空间,Windows会返回一个指向这块内存地
2006-03-05 06:46:00
681
转载 最简单的多线程
//调用线程procedure TForm1.Button3Click(Sender: TObject);begin TOpenTest.Create(ProgressBar1); TOpenTest.Create(ProgressBar2);end;unit FThread;interfaceuses Classes,ComCtrls;type TOpenTest = class
2006-03-05 02:27:00
744
转载 数据库存取图像
procedure TForm1.BitBtn1Click(Sender: TObject);var jpeg:TJpegImage; mem:TmemoryStream;begin mem:=TmemoryStream.Create; mem.LoadFromFile("E:/Adobe/Adobe1.jpg"); ADOQuery1.Insert; TBlobField(A
2006-03-05 02:19:00
816
转载 加密与解密
function DecryptSettings(Str : String): String;varX, Y : Integer;A : Byte;Key:string;beginKey:=Fi7ke; //注意了,这里要和加密钥匙一样.Y := 1;for X := 1 to Length(Str) dobeginA := (ord(Str[X]) and $0f) xor (ord(Key
2006-03-05 00:30:00
662
转载 数组保存到文件
procedure TForm1.Button1Click(Sender: TObject);var b: array [0..31] of byte; i:integer; h:integer;begin for i := low(b) to High(b) do begin b[i] := i; end; h := FileCreate(f:/test.dat); FileWrite(h,
2006-03-04 23:32:00
1222
转载 多国语言
我Post一个INI的吧:对于INI文件的操作,我不多说了,仅仅就如何实现语言界面的切换做一个简单的说明:首先,必须把所有的INI语言文件的结构统一,这样,我们只要传入INI的文件名,就可以通用了,例如我们可以做一个过程SetLanguage(const FileName:string);,这样只要用SetLanguage(CN.INI)就可以了,第二个需要注意的地方,你应该可以让用户选择语言
2006-03-04 23:27:00
821
转载 Scripting Your Delphi Applications
Scripting languages are nothing new. From the DOS batch file you wrote years ago, through to the ASP code that drives your website, scripting languages are a good solution to certain problems. However
2006-03-04 22:40:00
7805
转载 WinInet 下载文件示例
Uses WinInet(1)HTTP下载Function WWWDownFile(Const FTURL,LocalFile : String) : Boolean; //下载函数.Const FTAcceptTypes = */*; FTAgent = Explorer; FTUserName = ; //用户名. FTPassw
2006-03-04 22:33:00
1829
转载 fileStream
procedure TForm1.Button1Click(Sender: TObject);var f1:TFileStream; filename:String;begin OpenDialog1.Execute ; filename:=OpenDialog1.FileName ; f1:=TfileStream.Create (filename,fmopenr
2006-03-04 22:24:00
666
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人