本文整理自网络,侵删。
函数功能:当Str不满Len长度时,在Str前自动填充FillStr以补足长度function FillString(const Str: string; Len: Integer; FillStr: Char): string;beginResult:= StringOfChar(FillStr, Len - Length(Str)) + Str;end;――――――――――――――――
原文链接:https://blog.csdn.net/sidely/article/details/39341885 相关阅读 >>
Delphi 窗体的位置和高宽度-tform:letf、top、width、height、clientwidth、clientheight
更多相关阅读请进入《Delphi》频道 >>