如何最得光标所在位置控件的Handle? 如题。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Timer1Timer(Sender: TObject);var P: TPoint;begin GetCursorPos(p); Caption := IntToStr(WindowFromPoint(p));end;把代码放到定时器了 DataSource2DataChange(sender); 这个事件怎么写 Delphi三层架构数据压缩 delphi listview选中问题 关于delphi中,ado的几个简单应用? 不知 这就是三!!! 赋值也会出错? 奇怪! 帮我提个建议!(关注有分) 技术和非技术怎么分出来的??????还有怎么看我得分的问题和用户的信誉??? 怎么样为delphi编出的程序减肥 在Image1中画一个固定大小的矩形,矩形可随意拖动,矩形线条的粗细及颜色最好能由我自己来定义 copy pos来取文件名
procedure TForm1.Timer1Timer(Sender: TObject);
var
P: TPoint;
begin
GetCursorPos(p);
Caption := IntToStr(WindowFromPoint(p));
end;
把代码放到定时器了