控件Free的问题（在线等候）(100分)

F

fshell

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-19

• #21

PostMessage(Panel1.Handle, WM_CLOSE, 0, 0);

 

C

CathyEagle

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-19

• #22

用PostMessage

 

N

Nizvoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-22

• #23

改变SpeedButton的Parent

 

N

Nizvoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-22

• #24

改变Parent不行啊~~~~~~~~~~~~~~~

Focus没转移。。

 

N

Nizvoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-22

• #25

D6果真无此问题

 

N

Nizvoo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-22

• #26

代码:

这样好了。。。。。呵呵

procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
  //  SpeedButton1.Parent := Form1;
  //  SpeedButton1.
    //SpeedButton1.Free;
  if SpeedButton1.Parent <> Panel1 then
    Panel1.Free
  else
    SpeedButton1.Parent := Form1;
end;

 

X

xuzhudi

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-26

• #27

看来只有fshell的方法能保证不出错，我试过上面大侠的所有方法，都能作到最好
你还是使用fshell的方法吧，只要不出错，什么都行啊

 

独

独孤剑

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-30

• #28

多人接受答案了。

 

N

nmfx1122

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-10

• #29

fshell的方法真是太好了。