CharacterCasing (Delphi)

From RAD Studio Code Examples
Jump to: navigation, search

Description

The following example demostrates the use of ToUpper and ToLower routines 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 := ToLower(edtText.Text);
end;

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

Uses