我的常量组使用为何总是出错？

Question

在使用brush时，我定义了一个常数
type Brushstyle
      (bsSolid,         //0    单色
       bsCross,         //1   相交叉的水平线和垂直线
       bsClear,         //2   透明
       bsDiagCross,     //3   相交叉的双向对角线
       bsBDiagonal,     //4   向后的对角线
       bsHorizontal,    //5   水平线
       bsFDiagonal,     //6   向前的对角线
       bsVirtical,      //7   竖直线
       Custom)          //8   自定义模式然后在为brush的style赋值时使用
  case ..... of
 0:brush.style:=brushstyle(0);
 1:...........................
 .............................可是操作不能成功，请各位指教。声明的常数应该如何使用。

Answer 1

type
  TMyType = (mtA, mtB, mtC);procedure TForm1.Button1Click(Sender: TObject);
var
  MyType: TMyType;
begin
  MyType := TMyType(0);
end;如果是这样的意思，那我上面的代码没有问题。