個字元

Version >= 2009

uses
  Character;

var
  C1, C2: Char;
begin
  C1 := 'F';
  C2 := ToLower(C1); // Convert the char to lower-case
  C1 := ToUpper(C2); // Convert the char to upper-case

如果版本是 XE2 或更高版本，uses 子句應該是 System.Character。