就是用format把1转换成0001!谢谢!谢谢!谢谢!谢谢!谢谢!谢谢!谢谢!谢谢!
解决方案 »
- 外部程序上的模拟鼠标点击问题?在线急等!!
- 如何屏蔽SQLSErverSqlserver登录对话框
- 求助: 各位高手关注一下, 如何通过字符串类名创建类实例???????????????????
- 反编译的问题
- 如何根据服务器名获取对应的服务端口号?
- ★★★我的turbo pascal 7.0无法生成EXE文件怎么办(好像是缺少systerm单元)?哪有完整的turbo pascal 7.0下载?
- 各位谈谈制作透明控件。
- 请问,表中的数值字段纵向汇总函数是什么?
- D6不能运行了..高手帮忙看看.!
- 如何将存于本地的数据导入SQL Server?
- 如何在一个工程中调用另一个工程的窗体?
- 为什么查询可以,插入就不行呢?
var
sZero: String;
i: Integer;
begin for i:= 1 to Len do
sZero := sZero + '0'; Result := Copy(sZero+Str,Length(sZero+Str) - Len + 1,Len);end;format好像实现不了