Как я могу использовать символы Unicode (или просто кириллицу) в свойстве TStringField.FieldName в Delphi?

Приведенная ниже программа компилируется и выполняется (XE4) без ошибок.

program CDS;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils, db, dbclient;

procedure Test;
var
  aClientDataSet : TClientDataSet;
  aStringField : TStringField;
begin
  aClientDataSet := TClientDataSet.Create(Nil);
  aStringField := TStringField.Create(aClientDataSet);
  aStringField.FieldName := 'аАяЯ';
  aStringField.DataSet := aClientDataSet;
  aClientDataSet.CreateDataset;
end;

begin
  Test;
end.

Кроме того, если я использую ваше объявление aStringField (т.е. как TField) и ваш метод его создания, я получаю ошибку r/time «Неверный тип поля» в aClientDataSet.CreateDataset.