如题: 整数123,长度是不固定的,也可能是1,12,1234
解决方案 »
- 北京1300/月怎么过,放弃还是留下来!(应届生)
- 请问:是不是用ADOQuery这个控件只能实现查询?更新操作不行吗?
- 跪求DELPHI6下载网址。。。在线等
- 我是刚学的菜鸟MM
- 急救!在线等
- delphi7中XpMenu控件怎么使用
- 不给分的,只是想推荐下可以真正的免费下电影的地方,RMVB格式。挺好的。http://free.dlmovie.net/movie/freemovie.asp?userid=wissly
- 有谁能给我说说delphi中的self到底是什么意思?
- 如何用delphi编制数字转换器
- delphi Indy新手问题
- 100分求教高手类类型强制转换(详情请进),在线等待!
- 如何显示标题?
begin
zz3:='1234';
zz:=length(zz3);
zz1:=' ';
for i:=1 to 12-zz do
zz1:=zz1+'0';
zz2:=zz1+zz3;
showmessage(zz2);
begin
str := '0' + str;
end;
DupeString
Returns the concatenation of a string with itself a specified number of repeats.UnitStrUtilsCategorystring handling routinesDelphi syntax:function DupeString(const AText: string; ACount: Integer): string;C++ syntax:extern PACKAGE AnsiString __fastcall DupeString(const AnsiString AText, int ACount);DescriptionDupeString returns a string containing ACount repeats of the string specified by AText. For example,S := DupeString('Ha', 5);sets S to the string 'HaHaHaHaHa'.
function MyFun(i:Integer):String;
begin
i:=1000000000000+i;
Result:=copy(IntToStr(i),2,12)
end;