如何转换这样的字符串格式?

Question

有一整型字符串(长度<=5), 我想将其转成定长的五位字符串, 如果位数不够位, 前面自动加零; 
ex:
   '1': '00001'
   '11': '00011'
请问怎么转?
   

Answer 1

SHOWmessage(format('%0.5d',[strtoint(yourstr)]));

Answer 2

多谢outer2000(天外流星), 加分!

Answer 3

主要的思路即部分代码
var
  result:String;result:=IntToStr(number);
for i:=Length(IntToStr(number))-1 to 4 do
result:='0'+result