Description

The following example demostrates the use of ToUpper and ToLower methods (of TCharacter class) to convert an unicode string to upper or to lower case.

Code

procedure TMainForm.btLowerClick(Sender: TObject);
begin
  { Convert the string to lower-case }
  edtText.Text := TCharacter.ToLower(edtText.Text);
end;

procedure TMainForm.btUpperClick(Sender: TObject);
begin
  { Convert the string to upper-case }
  edtText.Text := TCharacter.ToUpper(edtText.Text);
end;

Uses

System.Character.TCharacter.ToUpper ( fr | de | ja )
System.Character.TCharacter.ToLower ( fr | de | ja )