★TForm1.FormMouseDown中点击鼠标左键可以用Button＝1 ，如果在TForm1.FormMouseMove中点击鼠标左键使用是什么？？

Question

TForm1.FormMouseMove中没有button这个参数
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
beginend;
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
beginend;
－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－－

Answer 1

if ssLeft in Shift then