这个是怎么回事，怎么改过？Mdiform的问题(200分)

M

maikee1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-14

• #1

主窗体是mdiform
一子窗口form1打印报表时。开始报表的form2.formstytle=tsNomal
按子窗体上的一按钮打印： TForm2.create(self).Quickrep1.preview没有任何问题。
但后来我把Form2.formstytle改为TsMdichild.仍用上面代码打印。在预览前会先显示
Form2以及上面只有设计界面的quickrep(即设计报表的窗体完完全全的象窗体一样显示),
然后再preview.关闭掉预览窗口，这窗体仍然存在，需要重新关闭一下。
更奇怪的是当我把form2.formstytle改为tsNomal时因为编译过一次仍然是这样。我试了很多次
都如此，新建的没有。但如果改一下fromstytle为mdichild再编译一次再改回来。运行时就改不回来了
。我把两个单元改名重新加入工程还是这样。请教高手怎么回事。怎么改回来。

 

M

maikee1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-14

• #2

在线等待中......

 

轻

轻舞肥羊

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-14

• #3

MDI子窗体是建立就自动显示的
你把普通窗体改为MDI子窗体,VISIBLE属性自动变真,再改成普通窗体并不会变回来!
如果要用MDI子窗体上的打印预览,用下面的代码
with TForm2.create(self)do
begin
Quickrep1.preview;
close;
end;

别忘了在MDI子窗体的OnClose事件中写上
Action:=caFree;

 

M

maikee1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-14

• #4

这个问题解决了，取消这个问题。 遇到同样问题的请交流

 

M

maikee1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #5

to 轻肥
你回答的不是我的问题。我是要改过来，不过谢谢你

 

L

love888

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #6

把分给我

 

M

maikee1978

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-05-15

• #7

多人接受答案了。