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

delphi ByteType-单双字节判断

//ByteType:判断是单字节还是双字节;procedureTForm9.BitBtn3Click(Sender:TObject);vars:System.AnsiString;iCount:Integer;c:AnsiString;begins:='ChinaBank(中国银行)';//ByteType:针对的是采用MBCS字符集的数据…
类别:字符串 标签: 作者:admin 日期:2014-08-05 17.46.52

Delphi 判断特定字符是为单字节还是双字节

问题:判断特定字符是为单字节还是双字节解决://mbSingleByte单字节字符mbLeadByte双字节字符首字节mbTrailByte双字节字符尾字节Edit1.Text:='0102030405060708我1112131415';n:=Length(WideString(Edit1.Text));Sh…
类别:字符串 标签: 作者:admin 日期:2014-08-05 17.43.54

Delphi做繁体简体转换

//转简体procedureTfm_Words.Button6Click(Sender:TObject);beginself.memo_msg.Text:=STConvert(memo_msg.Text,ttSimple);end;//转繁体procedureTfm_Words.Button7Click(Sender:TObject);beginself.memo_msg.Text:=…
类别:字符串 标签: 作者:admin 日期:2014-08-04 14.15.33

Delphi跨平台的字符串代码标准

去年的写过关于跨平台的字符串代码,发现没说明白,自己都看糊涂了。于是做了这样的测试:procedureTForm3.Button1Click(Sender:TObject);varI:Integer;s:string;begins:='0123456789';forI:=0tos.length-1dobeginme…
类别:字符串 标签: 作者:admin 日期:2014-07-29 17.30.08

Delphi字符串旋转任意角度

例子1//声明:CreateFontIndirect(constp1:TLogFont{字体结构}):HFONT;{返回新字体指针}//TLogFont是tagLOGFONTA结构的重定义:tagLOGFONTA=packedrecordlfHeight:Longint;{字体高度}lfWidth:Longint;{字体平均宽度}lf…
类别:字符串 标签: 作者:admin 日期:2014-07-29 17.25.49

Delphi XE6 String转MemoryStream

将一个字符串转换成MemoryStream的函数.functionStringToMemory(s:string):TMemoryStream;varbytes:TBytes;ms:TMemoryStream;beginms:=TMemoryStream.Create;bytes:=TEnCoding.UTF8.GetBytes(s);ms.Write(bytes,Leng…
类别:字符串 标签: 作者:admin 日期:2014-07-29 17.09.53

Delphi中常用字符串处理函数

1.copy(str,pos,num)从str字符串的pos处开始,截取num个字符的串返回.假设str为'abcdef',copy(str,3,2)='cd',copy(str,4,10)='def'2.concat(str1,str2{,strn})把各自变量连接起来,返回连接后的字符串(长度不能超过255…
类别:字符串 标签: 作者:admin 日期:2014-07-25 13.26.49

Delphi提取字符串

使用单元StrUtils//提取字符串functionSubString(html,Cstr_L,Cstr_R:string):string;varsPosB,sPosE:integer;Lwhtml,LwCstr_L,LwCstr_R:string;beginResult:='';iftrim(html)=''thenexit;&...
类别:字符串 标签: 作者:admin 日期:2014-05-06 20.18.01

Delphi获取URI的查询参数

functionExtractURIQueryString(constURI:string):string;varQueryStart:Integer;QueryEnd:Integer;beginResult:='';QueryStart:=SysUtils.AnsiPos('?',URI);ifQueryStart=0thenExit;Inc(QueryStart);QueryEnd:=SysU…
类别:字符串 标签: 作者:admin 日期:2014-03-05 22.38.14

delphi varchar和Nvarchar区别

Unicode字符集就是为了解决字符集这种不兼容的问题而产生的,它所有的字符都用两个字节表示,即英文字符也是用两个字节表示如果还为了这个纠结,就直接看看后面的解说,做决定吧。一般如果用到中文或者其它特殊字符,…
类别:字符串 标签: 作者:admin 日期:2013-12-24 01.00.05

delphi 中文urlencode的简单办法

方法1userHttpapp;HttpEncode(AnsiToUtf8('中文'));方法2usesIdURI;..beginS:=TIdURI.URLEncode(str);//S:=TIdURI.URLDecode(str);end;
类别:字符串 标签: 作者:admin 日期:2013-11-25 20.31.43

delphi中httpencode使用注意事项

一、usesHTTPApp二、使用前要用UTF8Encode转换成utf-8编码HTTPEncode(UTF8Encode(Text));不然和标准的url_encode()编码结果不一致,查询结果自然不是预期的。可以通用浏览器地址来查看。解码后要用UTF8Decode做解码后…
类别:字符串 标签:httpencode 作者:admin 日期:2013-11-25 10.46.14

Delphi中对URL进行编码和解码

Delphi中处理URL时,有时会遇到编码问题,比如文件名如果含有空格,则空格会被%20代替。如果不进行转换,则会出现问题。在网上找到一段转换代码(Delphi没有自带的?),可以顺利进行//delphi最快速编码URLDecodeURLEn…
类别:字符串 标签: 作者:admin 日期:2013-11-25 10.33.18

Delphi XE String与TStringBuilder的关系

有朋友问说UnicodeString与TStringBuilder有什么关系?粗浅的个人理解,请内行指正:后者可以用于前者,但一般情况下不能这样用,在DelphiXE4中String只是UnicodeString的一个别名,也只有这一种字符串类型。TString…
类别:字符串 标签: 作者:admin 日期:2013-11-24 23.23.11

Delphi XE TStringHelper用法详解

DelphiXE的TStringHelper,对操作字符串进一步带来更多的方法,估计XE5还能继续用到。System.SysUtils.TStringHelper大小写转换:--------------------------------------------------------------------------------…
类别:字符串 标签: 作者:admin 日期:2013-11-24 23.21.54

delphi KMP(字符串匹配)算法

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls;typeTForm1=class(TForm)Button1:TButton;procedureButton1Click(Sender:TObject);private{Privated…
类别:字符串 标签: 作者:admin 日期:2013-11-22 19.42.07

delphi截取字符串的方法

functionGetStr(StrSource,StrBegin,StrEnd:string):string;//(源字符串,开始字符串,结束字符串)varin_star,in_end:integer;strtmp:string;beginin_star:=AnsiPos(strbegin,strsource)+length(strbegin);strtmp:…
类别:字符串 标签: 作者:admin 日期:2013-11-15 11.31.24

delphi随机字符(密码生成)函数

functionGetRandStr(len:Integer;lowercase:Boolean=True;num:Boolean=True;uppercase:Boolean=False):string;constupperStr='ABCDEFGHIJKLMNOPQRSTUVWXYZ';lowerStr='abcdefghijklmnopqrstuvwxyz';numStr='01234567…
类别:字符串 标签: 作者:admin 日期:2013-11-12 11.06.28

Delphi 判断字符是否是汉字

//判断字符是否是汉字functionIsHZ(ch:WideChar):boolean;vari:integer;begini:=ord(ch);if(i40869)thenresult:=falseelseresult:=true;end;//判断字符是否是汉字functionIsHZ(ch:WideChar):boolean;vari:integer;be…
类别:字符串 标签: 作者:admin 日期:2013-11-12 10.57.42

Delphi中分隔字符串函数的使用

delphi中内置的字符串分割函数已经很强大了,能够满足我们基本的使用需要。主要有两种:ExtractStrings(Separators:TSysCharSet;WhiteSpace:TSysCharSet;Content:PAnsiChar;Strings:TStrings):Integer;Separators参数…
类别:字符串 标签: 作者:admin 日期:2013-11-12 09.21.50