Задача: Нужно преобразовать перечисление (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('alTop');
end;