TCharacterCasing (Delphi)

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 )