The function UpperCase converts the every alphabetic character in the given string S into upper case alphabetic characters.

Declaration: Function UpperCase(const S: string): string;

Here is an example.

procedure OnMapEvent(var Value:Variant);
begin
Value := Uppercase('statelake 123'); //Returns 'STATELAKE 123'
end;