在线等待：在创建TActiveForm时，鼠标Button变量的冲突！！！

Question

在DELPHI 7.0创建TActiveForm时会自动产生枚举常量TxMouseButton，
但是TxMouseButton与Controls中的TMouseButton枚举常量冲突；// Controls.Pas定义：
  TMouseButton = (mbLeft, mbRight, mbMiddle);// TActiveForm自动产生的枚举常量定义：
type
  TxMouseButton = TOleEnum;
const
  mbLeft = $00000000;
  mbRight = $00000001;
  mbMiddle = $00000002;在TActiveForm.MouseDown/MouseUp等鼠标事件中，Button的值有冲突；
procedure TvtAppCanvas4Ctrl.ActiveFormMouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);if Button = mbLeft then
提示错误：[Error] Incompatible types ；
该怎么处理啊！！！！！是不是DELPHI 的BUG

Answer 1

看看这样行不行
if Button=TMouseButton(0) then

Answer 2

type
  TxMouseButton = TOleEnum;
const
  mbLeft = $00000000;
  mbRight = $00000001;
  mbMiddle = $00000002;
中的定义常量与系统的枚举变量冲突，删除该类型数据，编译出错。更改TxMouseButton 常量名通过。这是不是D的BUG？？