频道分类
您的位置:网站首页 > 字符串

Delphi 生成GUID算法的单元

unituGUID;{采用的开源算法https://github.com/martinusso/ulid加已改造成32位有序GUID}interfaceusesDateU…

类别:字符串 标签: 作者:admin 日期:2020-10-01 20.14.58

Delphi 随机字符3

functionGeneratePassword(PasswordLength:Integer):string;varSourceString:String;ExcludeString:String;…

类别:字符串 标签: 作者:admin 日期:2020-09-30 11.08.31

Delphi 10.3 处理CSV TStreamReader 自带Split用法

测试文件:animals.csv"NAME","SIZE","WEIGHT","AREA""AngelFish",2,2,"ComputerAquariums""Boa",10,8,"Sou…

类别:字符串 标签: 作者:admin 日期:2020-09-30 10.05.05

Delphi 将整数转换为罗马数字(字符串)2

uRomanNumerals.pasunituRomanNumerals;interfaceusesSystem.SysUtils;typeTRomanNumRange=0..3999;{TRoman…

类别:字符串 标签: 作者:admin 日期:2020-09-30 08.24.02

Delphi 将整数转换为罗马数字

//数字转换罗马functionToRoman(constiArabic:Integer):String;const//S5は5*10^nを表すシンボル,S1は1*10^…

类别:字符串 标签: 作者:admin 日期:2020-09-30 07.51.29

Delphi 最简单的判断数字函数

functionIsDigit(ch:char):boolean;beginResult:=chin['0'..'9'];end;

类别:字符串 标签: 作者:admin 日期:2020-09-21 23.37.07

Delphi 获取带分隔符字符串中的字段值

functionGetFieldValue(separator:Char;strLine:string;nNum:Integer):string;varStrs:TStrings;ResultStr:…

类别:字符串 标签: 作者:admin 日期:2020-09-21 23.22.22

delphi中判断字符串是否为数字

functionIsNumber(pcString:PChar):Boolean;beginResult:=False;whilepcString^<>#0do//0indicatestheendof…

类别:字符串 标签: 作者:admin 日期:2020-09-15 17.16.32

Delphi 如何检查字符串是否为数字

functionIsNumber(pcString:PChar):Boolean;beginResult:=False;whilepcString^<>#0do//0indicatestheendof…

类别:字符串 标签: 作者:admin 日期:2020-09-15 14.40.35

Delphi 如何从文本内容中删除指定行

将完整文件加载到TStringList实例中。然后遍历列表中的项目,并使用Pos函数检查该行是否以“PIL”开头(如果…

类别:字符串 标签: 作者:admin 日期:2020-09-15 13.46.29

Delphi 如何将整数值转换为罗马数字表示形式

functionIntToRoman(num:Cardinal):string;constNvals=13;vals:array[1..Nvals]ofword=(1,4,5,9,10,40,50,9…

类别:字符串 标签: 作者:admin 日期:2020-09-15 13.30.08

Delphi 金额转大写

//注意这里传进去的类型是Currency,functionMoney2ChineseCapital2(constNum:Currency):WideString;constm…

类别:字符串 标签: 作者:admin 日期:2020-09-06 23.49.36

Delphi 提取字符串中所有数字

unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes…

类别:字符串 标签: 作者:admin 日期:2020-08-26 23.09.33

Delphi 判断字符串是否相同

ifSameStr(Edit1.Text,Edit2.Text)then//分大小写ifSameText(Edit1.Text,Edit2.Text)then//不分大小写//空格…

类别:字符串 标签: 作者:admin 日期:2020-08-26 23.05.05

Delphi 反转字符串方法2

functionReverse(s:string):string;varch:char;beginResult:='';forchinsdoResult:=ch+Result;end;

类别:字符串 标签: 作者:admin 日期:2020-08-24 22.26.14

Delphi 验证TStrings是否存在

functionIsPresentInList(strings:TStrings;constvalue:string):Boolean;vari:Integer;beginResult:=False;…

类别:字符串 标签: 作者:admin 日期:2020-08-24 22.14.36

delphi 批量日期格式化

vari:integer;vLine,vStr,vPart:string;vYear,vMonth,vDay:Word;vArr:TArray;vDate:TDateTime;beginMemo2.C…

类别:字符串 标签: 作者:admin 日期:2020-06-25 10.05.51

Delphi 判断是否为空('None', 'Null', '')

functionVarStrEmpty(v:Variant):Boolean;vardata:PVarData;begindata:=FindVarData(V);casedata^.VTypeofv…

类别:字符串 标签: 作者:admin 日期:2020-06-25 10.03.09

Delphi 计算一个字符串在另一个字符串中出现的次数

functionOccurrences(constSubstring,Text:string):integer;varoffset:integer;beginresult:=0;offset:=Pos…

类别:字符串 标签: 作者:admin 日期:2020-06-25 09.37.01

Delphi 提取标签之间的字符串

FunctionsExtractBetweenTagsB(Consts,LastTag,FirstTag:string):string;varpLast,pFirst,pNextFirst:Integ…

类别:字符串 标签: 作者:admin 日期:2020-06-25 09.09.19