Delphi — enum в строку и обратно

Задача: Нужно преобразовать перечисление (enum) в строку и обратно, строку в перечисление

Инструментарий: Delphi 10

Решение: Для преобразования перечисления в строку нам понадобится модуль RTTI, в котором есть соответствующие методы преобразования.

uses
  RTTI;

var
  value: string;
  align: TAlign;
begin
  // Enum to string
  align := TAlign.alLeft;
  value := TRttiEnumerationType.GetName(align);

  // String to enum
  align := TRttiEnumerationType.GetValue<TAlign>('alTop');
end;

Добавить комментарий