var
  myChar  : Char;

begin
  myChar := 'G';                    // Назначение из символьной константы
  ShowMessage('Символ G = '+myChar);

  myChar := #65;                    // Назначение из целочисленной константы
  ShowMessage('#65 = '+myChar);

  myChar := ^I;                     // Назначение из символа управления - табуляции
  ShowMessage('Control '+myChar+' character');

  myChar := Chr(66);                // Использование Char для конвертирования числа
  ShowMessage('Chr(66) = '+myChar);

  myChar := Char(67);               // Использование Char как стандартное приведение
  ShowMessage('Char(67) = '+myChar);
end;