怎么对枚举类型变量数据赋值？

Question

在一个类中定义一个枚举型属性，当创建对象怎么对该属性赋值呢?
如下，省略了create方法中FTheMark:=m1的初始化方法
type
  TMark=(m1,m2,m3);
  TMyClass=class(TComponent)
  private
    FTheMark:TMark;
  protected
    //
  public
    property TheMark:TMark read FTheMark write FTheMark;
  end;//创建对象
var
 aMyClass:TMyClass;aMyClass:=TMyClass.Create(self);
aMyClass.TheMark:=xx 
//如果设置值为m1,xx怎么表示。为什么不能直接写m1呢？试了N种方法都不行。
memo组件的BorderStyle属性就有bsSingle, bsNone(这应该也是枚举型吧，为什么我们使用时可以直接写bsNone呢)

Answer 1

aMyClass.TheMark := m1;
或者
aMyClass.TheMark := TMark(0);
都可以.