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;
 

相关阅读 >>

Delphi程序升级到64位

Delphi正则表达式

Delphi中tapplicationevents控件的用途与使用方法

Delphi webbrowser 去除滚动条和边框

Delphi写的服务程序在服务管理器中显示“描述”

Delphi 刷新桌面函数

Delphi调节音量及静音

Delphi设置窗口透明

Delphi opendialog控件用法

Delphi 获取电脑进程网络连接ip端口

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi System.FillChar - 填充字节