Alignment in String umwandeln

[Zoot]

So was in der Art?

Delphi-Quellcode:

CONST TAlignmentStrings : Array [TAlignment] of String[14] =
('taLeftJustify', 'taRightJustify', 'taCenter');

 s := TAlignmentStrings[aLabel.Alignment];