简单一问：有没有这种函数？

Question

我想根据变量求一字符串，形式如下：
repl('0',li_i)
'0'为指定的字符，li_i是变量，根据变量生成字符串，如li_i=1则为'0',li_i=2则为'00',……

Answer 1

对Delphi的函数不熟，想偷个懒嘛！

Answer 2

function repl(sub_str:string;count:integer):string;
var
  i:integer;
begin
  result:='';
  if count<1 then exit;
  for i:=1 to count do
  begin
    result:=result+sub_str;
  end;
end;

Answer 3

谢谢！难道Delphi真没有这样的函数吗？结贴！！

Answer 4

有,Uses StrUtilsDupeString('0',8)