我是Delphi新手，以前用VB的，现在必须用Delphi,请大家帮忙。几个简单的问题。

Question

'000'+IntToStr(1);
再formclose内：
Action:= caFree;

Answer 1

1、我希望字符的长度是定长的，当为10时，我希望是'0010'而不是‘00010’，谢谢，还有其他的方法吗
2、我希望是通过botton的Click 事件实现，不是通过Form自己的方法
还有其他的方法吗

Answer 2

edit1.text:=format('000%d',[1]);
edit1.text:=format('a00%d',[1]);

Answer 3

Result:=Copy('000',1,3-Length(StrsIP[i]))+StrsIP[i];//以上代码：如果StrsIP[i]='90',得到Result='090'

Answer 4

搞错了这样对
edit1.text:=format('%4d',[10]);
edit1.Text:=stringreplace(edit1.text,' ','0',[rfReplaceAll])

Answer 5

我想应该能满足你第一个要求：
//如果StrsIP[i]='90',得到Result='090'
//如果StrsIP[i]='9',得到Result='009'
//如果StrsIP[i]='900',得到Result='900'