eWAM - 大写字符串值

eWAM - Uppercasing a string value

我正在寻找一个简单的函数来使 eWAM 中的字符串大写。这是我得到的,但它会引发错误。

procedure CapitalizeName
    var lowercaseName : CString
    var uppercaseName : CString

    lowercaseName = 'test'
    uppercaseName = ToUpper(lowercaseName)
endProc 

Upcase 是正确使用的函数:

procedure CapitalizeName
   var lowercaseName : CString
   var uppercaseName : CString

   lowercaseName = 'test'
   uppercaseName = Upcase(lowercaseName)
endProc