delphi System.FillChar - 填充字节
举例:
var
s: array[0..9] of Char;
begin
FillChar(s,SizeOf(s),'a');
ShowMessage(s); {aaaaaaaaaa}
end;
System.StringOfChar - 反复字符
举例:
var
s: string;
begin
s := StringOfChar('G', 5);
ShowMessage(s); {GGGGG}
end;
StrUtils.DupeString - 反复字符串
举例:
var
s: string;
begin
s := 'Delphi';
s := DupeString(s,3);
ShowMessage(s); //DelphiDelphiDelphi
end;
System.Copy - 从字符串或数组中复制
function Copy(
S: String; {字符串或动态数组}
Index: Integer; {起始位置}
Count: Integer {Copy 个数}
): String; {如果参数 S 是动态数组, 这里也应该返回动态数组}
举例:
//从字符串中提取
var
ss,s: string;
begin
ss := 'CodeGear Delphi 2007';
s := Copy(ss,5,4);
ShowMessage(s); {Gear}
end;
System.Delete - 从字符串中删除
procedure Delete(
var S: String; {源字符串; 因为是 var 参数, 不可能是个常量}
Index: Integer; {起始位置; 第一个字符的位置是 1, 起始位置不能小于 1 }
Count: Integer {要删除的字数}
);
举例:
var
s: string;
begin
s := 'Delphi 2007';
Delete(s, 2, 4);
ShowMessage(s); {Di 2007}
end;
System.Concat - 连接字符串
举例:
var
s: string;
begin
s := Concat('CodeGear', #32 ,'Delphi', #32 ,'2007');
ShowMessage(s); {CodeGear Delphi 2007}
end;
推荐分享
图文皆来源于网络，内容仅做公益性分享，版权归原作者所有，如有侵权请告知删除！
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.096925973892212 seconds