本文整理自网络,侵删。
适宽处理:function PadLeft(TotalWidth: Integer): string;function PadLeft(TotalWidth: Integer; PaddingChar: Char): string;function PadRight(TotalWidth: Integer): string;function PadRight(TotalWidth: Integer; PaddingChar: Char): string;//--------------------------------------------------------------------------------var str: string;begin str := '1'; str := str.PadLeft(4, '0'); // 0001end;
相关阅读 >>
Delphi读取excel文件-统计全部工作表中内容相同单元格出现次数
Delphi toscilloscope 仿windows任务管理器cpu使用记录组件
更多相关阅读请进入《Delphi》频道 >>