Question

delphi中 有两个From1和Form2。 如何在From1中打开多个Form2窗体？ 类似QQ能同时和多个人聊天的功能。

delphi 如何实现同一个窗体打开多次？
根据数据库内容的不同显示不一样的数据。
并且可以相互之间复制 文本框的内容？
可以创建出来了
可是 操作其中一个 form
其他几个from 内容也跟着变成一样的了。
这怎么处理呢？

Answer 1

动态创建
frm2:=tfrm2.create(self);
frm2.show;
这样点一按钮就生成一个frm2
再在frmcreate时调用赋值函数改变里边的内容就可以了

追问

能具体点吗？谢谢啦!

追答

写个函数
procedure iniData（frmCaption）;
var
s:string;
begin
s:='select caption,... from 表 where frmCaption = '+quotedstr(frmCaption);

qry.close;

qry.sql.clear;

qry.sql.add(s);

qry.open;

frm2.capiton:=qry.fieldByName('caption').asstring;
...
end;

窗体create时生成个调用这个函数 再传一个参数就可以了