procedure TWinForm.Panel_QiPan_MouseUp(sender: System.Object; e: System.Windows.Forms.MouseEventArgs);
begin
  if FPlaying then exit;
  if FBaseInputing then
  begin
    case e.Button of
      System.Windows.Forms.MouseButtons.Left :PutQiZi(e.X,e.Y,1,-1);
      System.Windows.Forms.MouseButtons.Right:PutQiZi(e.X,e.Y,0,-1);
    end;
  end
  else PutQiZi(e.X,e.Y,FTurn,FIndex);
end;

如果不写红色的NameSpace，编译会报错：Record,object or class type required. 把鼠标移动到MouseButtons词上，hint显示为:Prop Control.MouseButtons:MouseButtons 可是Control是System.Windows.Forms里的一个Class,MouseButtons是Control的一个property，编译器和Code Insight怎么找到它去了呢？ 久病成良医--多试 千人之诺诺,不如一士之谔谔--兼听

------
江上何人初见月，江月何年初照人