!!!比较复杂的MDI子窗口问题!!!

Zheast 2001-03-23 11:19:00
MDI子窗体每新建一个其位置总是向下和向右移动一点距离,如何不让它移动而是直接在指定位置显示,请注意不是在Show或Create过程中用ChildForm.Top:=XX;
如果那样子窗体还是先在它本来的位置显示后,再移动到指定的位置,当然这个过程很快,但仔细看还是可以看出来的,如何让它直接在指定位置显示?不要那个移动的过程?
...全文
217 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
Zheast 2001-09-26
  • 打赏
  • 举报
回复
procedure TForm2.FormCreate(Sender: TObject);
begin
//sleep(10000);
Top := 100;
Left := 100;
end;
好象有点作用!
myxfang 2001-07-09
  • 打赏
  • 举报
回复
gz
bubble 2001-06-27
  • 打赏
  • 举报
回复
将窗体的Position属性设为poScreenCenter或poDesktopCenter试一下。
myxfang 2001-06-27
  • 打赏
  • 举报
回复
关闭一个子窗口,其他本来最大化的子窗口都变成原来窗口(即不是最大化时的窗口)?
Muf 2001-06-27
  • 打赏
  • 举报
回复
procedure TForm2.FormCreate(Sender: TObject);
begin
//sleep(10000);
Top := 100;
Left := 100;
end;

用OnCreate即可,为了证明是否会产生你所说的的现象,特加了延时,结果,没有那个现象。
hugeant 2001-06-26
  • 打赏
  • 举报
回复
MDI子窗口创建时的位置好象是由windows管理的
Zheast 2001-04-23
  • 打赏
  • 举报
回复
好象还是一样
laza 2001-04-16
  • 打赏
  • 举报
回复
得到子窗体的HANDLE 然后调用SetWindowsPos()

example:


FrmChild := TFrmChild.Create(self);//mdichild
H := GetWindow(hMDI, GW_CHILD);
SetWindowPos(h, 0, 0, 0, ClientWidth - PnlButton.Width - 4,
ClientHeight - PnlTop.Height - 4,
SWP_NOZORDER);//限制到制定位置。


forgot2000 2001-03-24
  • 打赏
  • 举报
回复
我也非常关注。

5,386

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧