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) ...
阅读全文
posted @
2008-05-12 21:44
万一
阅读(2066)
推荐(0) 编辑
SysUtils.StrLCopy、SysUtils.StrPCopy、SysUtils.StrPLCopy
摘要：StrLCopy 只是比 StrCopy 多了一个限制长度的参数; StrPCopy 等价于 StrCopy; StrPLCopy 等价于 StrLCopy. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; t...
阅读全文
posted @
2008-05-12 21:23
万一
阅读(5336)
推荐(1) 编辑
SysUtils.StrCopy、SysUtils.StrECopy
摘要：StrCopy 和 StrECopy 都是复制源 PChar 串到目标 PChar 串, 只是返回值不同; StrCopy 返回结果的首地址, StrECopy 返回结果的尾(#0)地址. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Form...
阅读全文
posted @
2008-05-12 21:21
万一
阅读(5225)
推荐(0) 编辑
SysUtils.StrLComp、SysUtils.StrLIComp
摘要：StrLComp、StrLIComp 与 StrComp、StrIComp 基本是一样的, 只是多了一个参数用来指定有效长度. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = c...
阅读全文
posted @
2008-05-12 16:52
万一
阅读(2479)
推荐(0) 编辑
SysUtils.StrComp、SysUtils.StrIComp
摘要：StrComp 和 StrIComp 都是对比 PChar 字串的大小的函数, 只是后者不区分大小写. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = cla...
阅读全文
posted @
2008-05-12 14:31
万一
阅读(3049)
推荐(0) 编辑
SysUtils.StrCat
摘要：//把源串添加到目标串后, 要求目标串必须有足够的空间 StrCat( Dest: PChar; {目标串} const Source: PChar {源串} ): PChar; {返回目标串} unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Clas...
阅读全文
posted @
2008-05-12 14:11
万一
阅读(3088)
推荐(0) 编辑
SysUtils.FmtStr、SysUtils.Format - 格式化输出
摘要：FmtStr 是个过程, 它是用第一个参数来返回结果的; Format 是个函数, 返回值就是格式后的结果. 举例: var str: string; begin FmtStr(str, '最大整数是: %d', [MaxInt]); ShowMessage(str); {最大整数是: 2147483647} str := F...
阅读全文
posted @
2008-03-31 22:49
万一
阅读(4872)
推荐(0) 编辑
SysUtils.IsDelimiter - 判断字符串的某个位置是不是指定的字符串
摘要：举例: var s: string; b: Boolean; begin s := 'CodeDear Delphi'; b := IsDelimiter('de', s, 3); ShowMessage(BoolToStr(b)); {返回 -1, 就是 True} end; SysUtils 单元下的公用函数目录
阅读全文
posted @
2008-03-31 22:44
万一
阅读(2975)
推荐(0) 编辑
SysUtils.LastDelimiter - 判断一个字符串在另一个字符串中最后出现的位置
摘要：该函数不区分大小写, 举例: var s: string; i: Integer; begin s := 'CodeDear Delphi'; i := LastDelimiter('Del',s); ShowMessage(IntToStr(i)); {12} end; SysUtils 单元下的公用函数目录
阅读全文
posted @
2008-03-31 22:38
万一
阅读(5316)
推荐(0) 编辑
SysUtils.Trim、SysUtils.TrimLeft、SysUtils.TrimRight - 删除空格
摘要：举例: var ss,s: string; begin ss := ' Delphi '; s := Trim(ss); {删除两边空格} ShowMessage('^' + s + '$'); {^Delphi$} s := TrimLeft(ss); {删除左空格} ShowMessage('^' + s + '$')...
阅读全文
posted @
2008-03-31 22:32
万一
阅读(2650)
推荐(0) 编辑
SysUtils.QuotedStr - 加单引号
摘要：举例: var ss,s: string; begin ss := 'Delphi'; s := QuotedStr(ss); ShowMessage(s); {'Delphi'} end; SysUtils 单元下的公用函数目录
阅读全文
posted @
2008-03-31 21:44
万一
阅读(2887)
推荐(0) 编辑
SysUtils.AdjustLineBreaks - Unix 与 Windows 的换行符互换
摘要：举例: var s: string; i: Integer; begin s := 'Delphi'#10'2007'; ShowMessage(IntToStr(Length(s))); {11} s := AdjustLineBreaks(s); //s := AdjustLineBreaks(s,tlbsCRLF); {tlbsCRLF 是默认的} Sh...
阅读全文
posted @
2008-03-31 21:42
万一
阅读(2240)
推荐(0) 编辑
SysUtils.CompareStr、SysUtils.CompareText - 字符串比较
摘要：CompareStr 区分大小写; CompareText 不区分大小写. 举例: var s1,s2: string; i: Integer; begin s1 := 'abc'; s2 := 'adc'; i := CompareStr(s1,s2); ShowMessage(IntToStr(i)); {-2} i := CompareText(s1,s2)...
阅读全文
posted @
2008-03-31 21:38
万一
阅读(4345)
推荐(0) 编辑
SysUtils.WrapText - 换行
摘要：举例: var ss,s: string; begin ss := 'aa.bb e-ff'; s := WrapText(ss, #13#10, ['.',' ',#9,'-'], 0); ShowMessage(s); {aa.} {bb } {e- } {ff...
阅读全文
posted @
2008-03-31 21:34
万一
阅读(3220)
推荐(1) 编辑
SysUtils.UpperCase、SysUtils.LowerCase - 大小写转换
摘要：举例: var ss,s: string; begin ss := 'Delphi'; s := UpperCase(ss); ShowMessage(s); //DELPHI s := LowerCase(ss); ShowMessage(s); //delphi end; SysUtils 单元下的公用函数目录
阅读全文
posted @
2008-03-31 21:32
万一
阅读(3253)
推荐(0) 编辑
SysUtils.StringReplace - 替换
摘要：举例: var ss,s: string; begin ss := '2007-2008'; s := StringReplace(ss,'00','x',[rfReplaceAll]); ShowMessage(s); //2x7-2x8 s := StringReplace(ss,'00','x',[rfIgnoreCase]); ShowMessage(s); ...
阅读全文
posted @
2008-03-31 21:31
万一
阅读(5495)
推荐(0) 编辑
SysUtils 单元下的公用函数目录
摘要：有简单提示的链接有效. 过程或函数名 分类 简单提示 Abort AddExitProc AddTerminateProc AdjustLineBreaksUnix 与 Windows 的换行符互换 AnsiCompareFileName AnsiCompareStr AnsiCompareText AnsiDequotedStr AnsiExtractQuotedStr An...
阅读全文
posted @
2008-03-23 22:47
万一
阅读(6296)
推荐(0) 编辑
管理
