发信人: xiao_min_()
整理人: teleme(2001-05-31 20:49:47), 站内信件
|
【 在 st.efan 的大作中提到:】
:如何获得鼠标的坐标(不在Form内)?
:Form是Unactived,但上面的label可以一直显示鼠标的坐标,
:如何办到
:
:多谢!
:......
测试通过,
procedure TForm1.Timer1Timer(Sender: TObject);
var
P:tpoint;
begin
getcursorpos(p);
caption:=inttostr(p.x);
end; |
|