关于formclose和formshow的问题(100分)

procedure tform2.formshow(sender:tobject);
begin

memo1.Clear;
edit1.text:='aaa';
memo1.Lines.Add('asdfsf');
end;

这个有问题吗? 为什么我form2打开以后.里面写的内容没有实现.
同样.我用
fprocedure tform1.formclose(sender:tobject);
begin

showmessage('退出');
end;

一样也无法出现.用别人的源程序就可以出来.我自己写的怎么写也没用...
不知道为什么.忘解答.

要设置窗体的 OnShow 和 OnClose 属性的，
双击这两个属性就可以了。

谢谢