请教一个很菜的问题:如何判断一个窗口已销毁 请教一个很菜的问题:如何判断一个窗口已销毁?多谢. 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我也发现了,呵呵.但我的代码还不对,请教一下我在form1的Resize事件中,设置另一个form的位置,但在窗口关闭时总提示出错,代码如下:procedure TMainForm.FormResize(Sender: TObject);var rc:TRect;begin rc.TopLeft := ClientToScreen(self.ClientRect.TopLeft); rc.Top := rc.Top + self.VideoWindow1.Top; if(rc.Top < 0) or (rc.Left < 0) then exit; if (SubTitleForm = nil) then exit; SubTitleForm.Top := rc.Top; SubTitleForm.Left := rc.Left;end; 最近 我研究 搜索引擎 (五) 浏览器篇 运行错误分析(存取非法) 怎么实现这样的功能??? 传奇封包加解密源码! 菜鸟--AdoQuery模糊查询 各位兄弟姐妹帮个忙 用ado连接mysql,当表中有text字段时,delphi认为是memo字段,检索时会出现“数据提供者或其他服务返回e_fail状态”错误,检索不出数据, 如何监测用户是否打开了拨号连接。 关于笔记本电脑的问题 自己写自己:程序员的一天,欢迎大家写,一篇就送100分!! 如何把一个vcl组件(直接继承TComponent而非TWinControl)改写成activex方式? 如何在点下按钮时驱动声卡?
var
rc:TRect;
begin
rc.TopLeft := ClientToScreen(self.ClientRect.TopLeft);
rc.Top := rc.Top + self.VideoWindow1.Top; if(rc.Top < 0) or (rc.Left < 0) then
exit; if (SubTitleForm = nil) then
exit; SubTitleForm.Top := rc.Top;
SubTitleForm.Left := rc.Left;
end;