| PadChLeftStr Function |
Unit
QESBPCSConvert
Declaration
Function PadChLeftStr(const S: string; const Ch: Char; const Len: LongWord): string;
Description
Also See: PadLeftStr, PadChRightStr
| Parameters |
| S | the String to pad. |
| Ch | the character to use for padding |
| Len | the length of the resultant substring. If Length (S) >= Len then NO padding occurs, and S is returned. |
Category
Extra String Handling RoutinesImplementation
function PadChLeftStr (const S: string; const Ch: Char;
const Len: LongWord): string;
var
N: LongWord;
begin
N := Length (S);
if N < Len then
Result := FillStr (Ch, Len - N) + S
else
Result := S;
End; |
|
|