说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

怎么把int 233 格式位 '0000233'

编辑:说三道四文库 发布时间:2018-02-24 06:25
HTML文档下载 WORD文档下载 PDF文档下载
rt
var
  aa: string;
begin
  aa := '233';
  for lp := 1 to 7 - length(aa) do 
  aa := '0' + aa;
  showmessage(aa);
end;
看我的.

Var
  IntValue : Integer;
  StrValue : String;
Begin
  IntValue := 123;
  StrValue := '000000' + IntToStr(IntValue);
  StrValue := Copy(StrValue, Length(IntValue) - 7, 7);
End;
用formatfloat不行吗??????????嘿嘿
沒有更簡單的嗎?
用format 行不?
Format('%.7d',[233])
哎﹐小問題?高手就是高手啊
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘