RightStr Function |
Unit
QESBPCSConvert
Declaration
Function RightStr(const S: string; const N: LongWord): string;
Description
Also See: LeftStr, RightAfterStr
Parameters |
S | the String from which the right substring is to be taken. |
N | the length of the resultant substring. If Length (S) < N then S is returned. |
Category
Extra String Handling RoutinesImplementation
function RightStr (const S: string; const N: LongWord): string; var M: LongWord; begin M := Int64 (Length (S)) - N + 1; // Calculate the starting point if M < 1 then // If longer then string, return string M := 1; Result := Copy (S, M, N); // Return last N characters End; |
|