我在窗体“form1”里单击命令按钮 “button1”弹出窗体form2,form2是用来查询一个数据库里一个表格的, 现在想在form1里得到form2里查询的结果,但是我的操作结果总是不正确,请各位指点!
我的代码是这样的:
Form1:
application.CreateForm(tform2,form2);
form2.ShowModal;
form2.Free;
.........
Form2:
代码是查询数据库表格的
我的代码是这样的:
Form1:
application.CreateForm(tform2,form2);
form2.ShowModal;
form2.Free;
.........
Form2:
代码是查询数据库表格的
var form2:Tform
form2:=Tform.create(nil)
...
form2.query
然后作为参数取数据
try
if form2.showModal= mrOk then
begin
form2.query1.Fields[0].value;
end;
finally
FreeAndNil(form2);
end;
这样程序的偶和度太高了,不好
而且如果在form2中进行查询,查询结果应该返回数据集,这个数据集你放在哪都可以。
form1连接这个数据集。