TrimRightAnystring
Short summary
This function removes whitespace from the end of a given AnyString.
Example:
myString :WString(10) := "Test " ;
------------------
TrimRightAnystring(
stringToTrim := myString
);
Parameters
| Name | Type | Comment | Kind |
|---|---|---|---|
| stringToTrim | ANY_STRING | string to trim | input |
Code
Declaration
FUNCTION TrimRightAnystring
VAR_INPUT
(* string to trim *)
stringToTrim :ANY_STRING;
END_VAR
VAR
END_VAR
Implementation
RETURN((stringToTrim.pValue = 0) OR stringToTrim.diSize <= 0);
CASE stringToTrim.TypeClass OF
__SYSTEM.TYPE_CLASS.TYPE_STRING:
TrimRightUtf8String(stringToTrim.pValue);
__SYSTEM.TYPE_CLASS.TYPE_WSTRING:
TrimRightUtf16String(stringToTrim.pValue);
ELSE
; // do nothing
END_CASE