var
  myChar  : AnsiChar;

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

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

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

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

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