获取随机字符串的方法 GetRandomString
摘要:方法1:推荐方便。 System.Hash 单元 Memo1.Lines.Add(THash.GetRandomString(50)); 方法二(自己写的): PK结果,效率差不多。:
阅读全文
posted @
2017-05-27 10:19
del88
阅读(1129)
推荐(0) 编辑
Delphi字符串、PChar与字符数组之间的转换
摘要:var s: string; p: pchar; a: array[1..20] of char; 1、字符串 > PChar p := PChar(s); 2、PChar > 字符串 s := p; 3、PChar > 字符数组 StrCopy(@a , p); 4、字符数组 > PChar PC
阅读全文
posted @
2016-04-30 17:04
del88
阅读(4705)
推荐(0) 编辑
Delphi判断一个字符串在另一个字符串中出现的次数 7个方法的效率对比。
摘要:unit Unit14; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms,
阅读全文
posted @
2015-03-23 16:57
del88
阅读(208)
推荐(0) 编辑
Delphi 字符串截取函数【LeftStr,RightStr,MidStr】
摘要:如果要使用LeftStr,RightStr,MidStr必需引用系统单元StrUtils; 声明变量Str:string; Str:=HelloWorld; 1,LeftStr(Str,2)=He;//从Str字符串变量的最左边(第一个字符包括第一个字符)开始截取2个字符; 2,RightStr(S
阅读全文
posted @
2014-04-28 20:27
del88
阅读(122)
推荐(0) 编辑
SameText、CompareStr、CompareText - 字符串比较
摘要:CompareStr 区分大小写; CompareText 不区分大小写. 举例: var s1,s2: string; i: Integer; begin s1 := 'abc'; s2 := 'adc'; i := CompareStr(s1,s2); ShowMessage(IntToStr(
阅读全文
posted @
2013-03-05 15:20
del88
阅读(280)
推荐(0) 编辑
分割字符串 ExtractStrings(推荐、灵活)
摘要://分割字符串 ExtractStringsvar s: String; List: TStringList;begin s := 'about: #delphi; #pascal, programming'; List := TStringList.Create; ExtractStrings([
阅读全文
posted @
2011-11-06 16:20
del88
阅读(201)
推荐(0) 编辑
StringReplace 替换 与 最新的TStringHelper.Replace 比较。
摘要:背景:原来要替换字符串 官方有StringReplace函数,后来官方引进了StringHelper帮助类,更加简化了字符串的替换操作。这里做个简单对比; 首先看下函数定义原型: 1.StringReplace函数原型 2.TStringHelper类里的原型: 好了,接下来让我们弄个Demo对比下
阅读全文
posted @
2011-11-06 14:10
del88
阅读(463)
推荐(0) 编辑