請問各位，我在ｃ＋＋中可利用ｓｐｒｉｎｔｆ的函式做到字串補足的功能（如'1'補足三碼為'001'），那在Delphi中是否有字串補足的字串函數?

chungho_chang 您好： 你可用 Concat 來實現 exp var str: String begin str := '1'; str := Concat('00',str); end; 如此一來 str = '001'

chungho_chang您好： 在ｃ＋＋中可利用ｓｐｒｉｎｔｆ意为：将字符串格式化。在delphi也有该功能的函数：format。虽说Concat（Concatenates two or more strings into one.连接两个或多个字串到一个中）能达到此形似的效果，但如果说作用相同的函数还是format。用法：

procedure TForm1.Button4Click(Sender: TObject);
var
  str: String;
begin
  str := '1';
  str:=format('00%s',[str]);
  showmessage(str);
end;

============================ 为什么经过多年以后，得失的过程如此冷漠 ============================