From Clomosy Docs

No edit summary
No edit summary
Line 7: Line 7:


'''Example:'''<br>
'''Example:'''<br>
'''var'''<br>
:'''Base Syntax'''
   MyForm:TclForm;
var
   SimpleString : String;<br>
   SimpleString : String;
  '''begin'''
   MyForm := TclForm.Create(Self);
begin
   SimpleString := '''AnsiUpperCase'''('I am learning CLOMOSY.');
   SimpleString := AnsiUpperCase('I am learning CLOMOSY.');
  ShowMessage(SimpleString);<br>
  ShowMessage(SimpleString);
   MyForm.Run;<br>
  end;
'''end;'''
 
:'''TRObject Syntax'''
   var
    SimpleString : String;
    
  begin
    SimpleString := AnsiUpperCase('I am learning CLOMOSY.');
    ShowMessage(SimpleString);
   end;


'''Output:'''<br>
'''Output:'''<br>
  I AM LEARNİNG CLOMOSY.
  I AM LEARNING CLOMOSY.

Revision as of 13:15, 6 February 2024

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:

Base Syntax
var
 SimpleString : String;

begin
 SimpleString := AnsiUpperCase('I am learning CLOMOSY.');
 ShowMessage(SimpleString);
end;
TRObject Syntax
 var
   SimpleString : String;
 
 begin
   SimpleString := AnsiUpperCase('I am learning CLOMOSY.');
   ShowMessage(SimpleString);
 end;

Output:

I AM LEARNING CLOMOSY.
Retrieved from "http:///index.php?title=AnsiUpperCase&oldid=1602"