System.SetString - 获取字符串

最新推荐文章于 2022-09-23 18:03:25 发布

weixin_30409849

最新推荐文章于 2022-09-23 18:03:25 发布

阅读量149

点赞数

原文链接：http://www.cnblogs.com/del/archive/2008/03/29/1129298.html

版权

举例:

var
  ss,s: string;
begin
  ss := 'CodeGear Delphi 2007';
  SetString(s,PChar(ss),4);
  ShowMessage(s); {Code}
end;


var
  s: string;
  arr: array[0..6] of Char;
  i: Integer;
begin
  for i := 0 to 6 do
    arr[i] := Chr(i + 65);

  ShowMessage(arr); {ABCDEFG}

  SetString(s, PChar(@arr), 3);
  ShowMessage(s);   {ABC}
end;

System 单元下的公用函数目录

转载于:https://www.cnblogs.com/del/archive/2008/03/29/1129298.html