关于Form 关闭(50分)

M

Motar Liu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-22

• #1

我在报表的From cretae事件中判断<br>&nbsp; &nbsp;如果 &nbsp;数据是空值 then<br>&nbsp; &nbsp; &nbsp;要关闭此From<br><br>但是我在语法上 用Self.Close;或是用Halt;均会出现错误。<br>如果直接用Application.Terminator;不会出现错误。<br>

 

X

XWHope

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-22

• #2

应该用Application.Terminator<br>close是对已经创建的窗体操作<br>而此时create时间还没成功

 

Y

yostgxf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-22

• #3

使用<br>&nbsp; &nbsp; PostMessage(Self.Handle, WM_Close, 0, 0);<br>

 

W

WoDing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-22

• #4

procedure TForm1.FormShow(Sender: TObject);<br>begin<br>if true then<br>&nbsp;self.close;<br>end;<br>放到onShow中

 

D

dirk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-22

• #5

不能在create中做，最好重载AfterConstruction：<br><br>procedure AfterConstruction;override;<br><br>procedure TForm1.AfterConstruction;<br>begin<br>&nbsp; &nbsp; inherited;<br>&nbsp; &nbsp; if 数据是空值 then Free;<br>end;<br>

 

Y

yostgxf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-22

• #6

呵呵，使用消息是最好的办法，不需要改变你原来程序的结构。<br>没有问题的，我用过<br>&nbsp; &nbsp; PostMessage(Self.Handle, WM_Close, 0, 0);<br>

 

M

Motar Liu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-03-25

• #7

多人接受答案了。