StrTrimL
StrTrimR
str StrTrimL (str)
str StrTrimR (str)
strTest = "  asdf  "

; StrTrimL
; Remove leading blanks.
strTrimL = ItemRemove (-1, StrTrim (StrCat (strTest, @LF)), @LF)
strTestL = StrCat ("#", strTrimL, "#") ; "#asdf  #"

; StrTrimR
; Remove trailing blanks.
strTrimR = ItemRemove (1, StrTrim (StrCat (@LF, strTest)), @LF)
strTestR = StrCat ("#", strTrimR, "#") ; "#  asdf#"


; StrTrimL
; Remove leading blanks.
strTrimL = ItemRemove (-1, StrTrim (strTest : @LF), @LF)
strTestL = "#" : strTrimL : "#" ; "#asdf  #"

; StrTrimR
; Remove trailing blanks.
strTrimR = ItemRemove (1, StrTrim (@LF : strTest), @LF)
strTestR = "#" : strTrimR : "#" ; "#  asdf#"

Exit