本文整理自网络,侵删。
适宽处理: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 从indy9升级到indy10时idtcpserver的变化
Delphi application.restore不起作用了,该如何处理
更多相关阅读请进入《Delphi》频道 >>