请教高手！！！

Question

该如何把控件的属性转换成字符串？
例如:怎么样把Form.Align转换成字符串啊？

Answer 1

我不知道，才几个值，用分支语句实现吧！
type TAlign = (alNone, alTop, alBottom, alLeft, alRight, alClient, alCustom);

Answer 2

不对，应该是通过强制类型转换，取得Integer型，这样，以后存取都方便了！！早知道就不问了，才问完，就找到答案了！

Answer 3

unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;type
  TMainForm = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  MainForm: TMainForm;implementation
uses TypInfo;{$R *.dfm}procedure TMainForm.Button1Click(Sender: TObject);
begin
  ShowMessage(GetEnumName(TypeInfo(TAlign), Integer(Self.Align)));
end;end.