delphi中按指定字符重复生成指定长度字符串

 delphi中没有和VB的string函数相同的函数;
网上有人这么建议:
var tmp :string;
SetLength(tmp, n); //指定长度
FillChar(tmp[1], sizeof(tmp), '0');  //用0填充
需要注意的是fillchar函数的第一个参数, 说明是var object
delphi中字符串string的首字符貌似是tmp[1],tmp[0]用于存放字符串长度信息.

参考:
http://topic.csdn.net/t/20021125/16/1203747.html