From Clomosy Docs
No edit summary |
No edit summary |
||
| Line 8: | Line 8: | ||
'''Example:'''<br> | '''Example:'''<br> | ||
'''var'''<br> | '''var'''<br> | ||
MyForm: | MyForm:TclForm; | ||
SimpleString : String;<br> | SimpleString : String;<br> | ||
'''begin''' | '''begin''' | ||
MyForm := | MyForm := TclForm.Create(Self); | ||
SimpleString := '''AnsiUpperCase'''('I am learning CLOMOSY.'); | SimpleString := '''AnsiUpperCase'''('I am learning CLOMOSY.'); | ||
ShowMessage(SimpleString);<br> | ShowMessage(SimpleString);<br> | ||
MyForm.Run;<br> | MyForm.Run;<br> | ||
'''end;''' | '''end;''' | ||
'''Output:'''<br> | |||
I AM LEARNİNG CLOMOSY. | |||
Revision as of 10:34, 31 March 2023
function AnsiUpperCase(const MixedString string):string;
The AnsiUpperCase function creates a copy of String with all letters converted to upper case. All Ansi commands support multi-byte and accented characters.
Syntax:
AnsiUpperCase(StringValue)
Example:
var
MyForm:TclForm; SimpleString : String;
begin MyForm := TclForm.Create(Self); SimpleString := AnsiUpperCase('I am learning CLOMOSY.'); ShowMessage(SimpleString);
MyForm.Run;
end;
Output:
I AM LEARNİNG CLOMOSY.