请问怎么在一个新建的Form1中获取鼠标的当前坐标？
新手问题，本人在学做一个多功能编辑器，希望能在状态栏中显示鼠标所在的位置，各位大虾帮忙~~~
在Form中创建一个MouseMove的事件.
//创建鼠标在Form中的移动事件
procedure TForm1.FormMouseMove(Sender:Tobject;Shift:TshiftState:X,Y:Integer);
begin
statusbar1.Panels.Items[0].Text='X'+IntToStr(X);//在状态栏里写出鼠标的X坐标
statusbar1.Panels.Items[1].Text='Y'+IntToStr(Y);//在状态栏里写出鼠标的Y坐标
end;
