RSS订阅 | 匿名投稿
您的位置:网站首页 > 字符串

delphi根据网络链接截取域名

//delphi根据网络链接获取域名usess****utils;functionEx****actUrlDomain(constUrl:s****ing):s****ing;var//www.delphitop.coms****:s****ing;begins****:=reverses****ing(Url);s****:=copy(s****,1,pos('/&#…
类别:字符串 标签: 作者:admin 日期:2011-08-26 09.58.46

Delphi 从字符串中提取单词、从字符串中提取汉字的函数

{从字符串中提取单词的函数}procedureStrToWordList(str:string;var<codeclass=...
类别:字符串 标签: 作者:admin 日期:2011-08-19 20.57.48

Delphi字符串隐藏

Delphi字符串隐藏代码:unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls;typeTForm1=class(TForm)Button1:TButton;Button2:TButton;p...
类别:字符串 标签: 作者:admin 日期:2011-08-17 10.23.05

delphi 自定義分割字符串

functionsplit(src,dec:string):TStringList;vari:integer;str:string;beginresult:=TStringList.Create;repeati:=pos(dec,src);str:=copy(src,1,i-1);if(str='')and(i>0)thenbegindelete(src,1,length(dec));contin…
类别:字符串 标签: 作者:admin 日期:2011-08-11 11.12.38

delphi URL解碼函數(By Kingron)

functionURLDecode(psSrc:string):string;{///URLDecodemodifiedbyKingron,///SupportIE6URLencode:%u3FE5%uA805test
类别:字符串 标签: 作者:admin 日期:2011-08-11 11.12.15

delphi 字符串的分割

C#**************stringstrList='A,B,C,D';string[]strArray=strList.Split(newChar[]{','});//这里strArray里有4个元素,各自分别为:'A','B','C','D'。Delphi**************procedureStringSplit(<spanstyle="colo…
类别:字符串 标签: 作者:admin 日期:2011-08-11 11.04.41

delphi UTF-8

//Utf8存、取procedureTForm1.Button1Click(Sender:TObject);var
类别:字符串 标签: 作者:admin 日期:2011-08-11 11.04.01

delphi 搜索字符串在流中的位置

(*//标题:搜索字符串在流中的位置说明:适用于文件搜索等设计:Zswang支持:wjhu111@21cn.com日期:2004-03-21//*)(*//============================================================================设计思...
类别:字符串 标签: 作者:admin 日期:2011-08-11 10.57.24

delphi 删除任意文件的任意位置的任意数量的字符

functionDelChar(AFile:string;DelStart,DelCount:integer):integer;//如果作为窗体的过程,过程名前要加窗体的类名,比如TForm1.DelChar//AFile是欲处理的文件,DelStart是欲删除字符的开始位置,DelCount是欲删除的…
类别:字符串 标签: 作者:admin 日期:2011-08-11 10.52.33

delphi 怎么将一个文件流转换成字符串?

//fromhttp://kingron.myetang.com/zsfunc0d.htm(*//标题:充分利用pascal字符串类型说明:和PChar不同,string可以保存#0字符在其中;示例文件、内存流字符串之间转换设计:Zswang日期:2002-01-25支持:wjhu111@21cn.com/…
类别:字符串 标签: 作者:admin 日期:2011-08-11 10.49.52

delphi判断字符是否是汉字

//┏━━━━━━━━━━━━━━┓//┃代码着色:CodeColorv1.0┃//┃来自:悄然无声的Blog┃//┗━━━━━━━━━━━━━━┛//判断字符是否是汉字functionIsMBCSChar(constch:Char):Boolean;beginResult:=(By…
类别:字符串 标签: 作者:admin 日期:2011-08-11 10.01.18

delphi 2010 unicode

delphi2010中默认的stringcharpchar都为wide双字节型的,若要使用以前的代码在delphi2010中顺利编译通过,得出正确结果,请修改为ansi单字节型(string-ansistringchar-pchar,pchar-pansichar)。http://hi.baidu.com/…
类别:字符串 标签: 作者:admin 日期:2011-08-11 08.59.39

Delphi模仿“千千静听”滚动标题栏,非常简单!

记得曾写过类似功能,但由于对Delphi数据类型不清楚,要花不少代码去处理中文被切半而出现乱码的尴尬。后来知道只需把字符串定义成WideString即可解决半个中文的问题了。实现过程:不停地剪切标题的第1个字符放到最后…
类别:字符串 标签: 作者:admin 日期:2011-08-01 21.13.47

Delphi判断字符串是否是数字、字母、大小写字母

functionIsNumberic(Vaule:String):Boolean;//判断Vaule是不是数字vari:integer;beginresult:=true;//设置返回值为是(真)Vaule:=trim(Vaule);//去空格fori:=1
类别:字符串 标签: 作者:admin 日期:2011-08-01 20.54.31

delphi 生成随机字符串

functionRandomStr(majuscule:boolean;lowercase:boolean;number:boolean;digit:integer):string;//大写字母,小写字母,数字,字符串的位数vari:Byte;s:string;beginifmajusculethens:='ABCDEFGHIJKLMNOPQRSTUVWXYZ'el…
类别:字符串 标签: 作者:admin 日期:2011-08-01 20.51.51

Delphi X秒生成大量垃圾字符

DelphiX秒生成大量垃圾字符functionRandomStr(Digit:Integer):string;vari:integer;s:string;begins:='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789';setLength(Result,Digit);Randomize;fori:=…
类别:字符串 标签: 作者:admin 日期:2011-08-01 20.51.10

delphi得到字符串中第一个汉字的位置

functionPositionFirstGB(str:string):Integer;vari:integer;beginResult:=0;fori:=1toLength(str)-1dobegin//第一个汉字的第一个字节判断它的内码是否大于128大于则是汉字,小于则是英文iford(str[i])>$7Fthenbegin…
类别:字符串 标签: 作者:admin 日期:2011-06-07 09.36.35

delphi 有授权许可的字符串拷贝函数源码

一段看上去“貌不惊人”的Delphi插入汇编代码,却需要授权许可,但是与经典的同类型函数比较,确实“身手不凡”。研究代码的目的在于借鉴,本文通过分析,并用C++重写代码进行比较,再次证明这段代码效率较高的主要原…
类别:字符串 标签:字符串 作者:admin 日期:2011-05-16 11.05.41

字符串提取算法

字符串提取算法.
类别:字符串 标签:字符串 作者:admin 日期:2011-05-14 16.59.01

delphi汉字与汉字区位码的转换

delphi汉字与汉字区位码的转换.
类别:字符串 标签: 作者:admin 日期:2011-04-04 23.38.05