怎样动态创建一个窗体?
flyby 2000-08-21 02:28:00 我要做一个通讯的程序(类似于ICQ),每次点击一个好友,要动态生成一个聊天窗体。
我用一个数组:
myform:array[0..100]of Tformchat;
然后在点击事件中加入:
myform[i]:=TFormchat.creatnew(nil);
这样的话,创建的窗体不包括它的控件,只是一个空白窗体。应如何修改nil使创建时加入他的控件?
而且,这些生成的窗体如何使对话双方建立关系,窗体关闭时激发哪个事件?
望各位多多指教!!!