ICode9

Delphi 字符串替换 SysUtils.StringReplace StringReplace  返回一个字符串，其中一个子字符串替换为另一个子字符串。 原型： function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string; var SearchStr, Patt, NewStr: string; Offse

Now、Date、Time、CurrentYear - 当前日期 SysUtils.Now; SysUtils.Date; SysUtils.Time; SysUtils.CurrentYear; unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm)

测试 System.SysUtils.TStringHelper 大小写转换:function ToLower: string; function ToLower(LocaleID: TLocaleID): string; function ToLowerInvariant: string; function ToUpper: string; function ToUpper(LocaleID: TLocaleID): string; function ToUpperInvariant:

SysUtils-Function SysUtils.Abort SysUtils.AddExitProc SysUtils.AddTerminateProc SysUtils.AdjustLineBreaks SysUtils.AnsiCompareFileName SysUtils.AnsiCompareStr SysUtils.AnsiCompareText SysUtils.AnsiDequotedStr SysUtils.AnsiExtractQuotedStr SysUtils.Ans

SysUtils.StrByteType - 获取字节类型 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Memo1: TMemo; procedure FormCreate(Sender: TObject);

SysUtils.StrAlloc、SysUtils.StrBufSize StrAlloc : 给 PChar 指针分配空间, 并填充 #0; StrBufSize : PChar 缓冲区大小. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = c

SysUtils.StrMove 其实这也是个 Copy 函数, 和 Move 没有关系.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); end

SysUtils.StrEnd、SysUtils.StrLen StrEnd 获取 PChar 串未指针; StrLen 获取 PChar 串长度.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button

SysUtils.StrScan、SysUtils.StrRScan、SysUtils.StrPos StrScan : 返回一个字符在一个 PChar 串中第一次出现的位置指针; StrRScan : 返回一个字符在一个 PChar 串中最后一次出现的位置指针; StrPos : 返回一个 PChar 串在另一个 PChar 串中第一次出现的位置指针. unit

SysUtils.StrLCat StrLCat 与 StrCat 类似, StrLCat 多出的参数好像是限制结果的长度.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TBu

SysUtils.StrUpper、SysUtils.StrLower StrUpper 和 StrLower 是转换 PChar 串的大小写的函数.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Butt

SysUtils.StrLCopy、SysUtils.StrPCopy、SysUtils.StrPLCopy StrLCopy 只是比 StrCopy 多了一个限制长度的参数; StrPCopy 等价于 StrCopy; StrPLCopy 等价于 StrLCopy.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls

SysUtils.StrCopy、SysUtils.StrECopy StrCopy 和 StrECopy 都是复制源 PChar 串到目标 PChar 串, 只是返回值不同; StrCopy 返回结果的首地址, StrECopy 返回结果的尾(#0)地址.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics,

SysUtils.StrLComp、SysUtils.StrLIComp StrLComp、StrLIComp 与 StrComp、StrIComp 基本是一样的, 只是多了一个参数用来指定有效长度.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TF

SysUtils.StrComp、SysUtils.StrIComp StrComp 和 StrIComp 都是对比 PChar 字串的大小的函数, 只是后者不区分大小写.unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 =

SysUtils.StrCat //把源串添加到目标串后, 要求目标串必须有足够的空间 StrCat( Dest: PChar; {目标串} const Source: PChar {源串} ): PChar; {返回目标串} unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Gra

SysUtils.FmtStr、SysUtils.Format - 格式化输出 FmtStr 是个过程, 它是用第一个参数来返回结果的; Format 是个函数, 返回值就是格式后的结果. 举例:var str: string; begin FmtStr(str, '最大整数是: %d', [MaxInt]); ShowMessage(str);

SysUtils.IsDelimiter - 判断字符串的某个位置是不是指定的字符串 举例:var s: string; b: Boolean; begin s := 'CodeDear Delphi'; b := IsDelimiter('de', s, 3); ShowMessage(BoolToStr(b)); {返回 -1, 就是 True} end; SysUtils 单元下的公用函数目录

SysUtils.LastDelimiter - 判断一个字符串在另一个字符串中最后出现的位置 该函数不区分大小写, 举例:var s: string; i: Integer; begin s := 'CodeDear Delphi'; i := LastDelimiter('Del',s); ShowMessage(IntToStr(i)); {12} end; SysUtils 单元下的公用函

SysUtils.Trim、SysUtils.TrimLeft、SysUtils.TrimRight - 删除空格 举例:var ss,s: string; begin ss := ' Delphi '; s := Trim(ss); {删除两边空格} ShowMessage('^' + s + '$'); {^Delphi$} s := TrimLeft(ss); {

时间与字符串 SysUtils.StrToDate(); SysUtils.StrToDateDef(); SysUtils.TryStrToDate(); SysUtils.StrToTime(); SysUtils.StrToTimeDef(); SysUtils.TryStrToTime(); SysUtils.StrToDateTime(); SysUtils.StrToDateTimeDef(); SysUtils.TryStrToDateTime(); SysUtils.