新手求帮忙，delphi 中 单击一个按钮弹出新的窗体，和查询语句怎么写！求帮助

Question

新手求帮忙，delphi 中 单击一个按钮弹出新的窗体，按字段查询然后显示怎么写！求帮助！

Answer 1

  application.CreateForm(Tbatsale_cform,batsale_cform);
  batsale_cform.Show;batsale_cform是新窗体的名称；
在新窗体的show事件中写查询语句，然后用控件显示出来

Answer 2

打开新窗体
procedure ShowAbout; 
var 
 tmpFrmAbout: TFrmAbout; 
begin 
 tmpFrmAbout := TFrmAbout.Create(nil); 
 try 
  tmpFrmAbout.ShowModal; 
 finally 
  tmpFrmAbout.Release; 
 end; 
end;
查询的后显示用到DBGrid,Dateset,Datasource等控件
你留个邮箱吧，我这有个小例子。

Answer 3

button1事件:
   查询集:
   show(adoquery1,field1);
   application.createform(Tform2,form2);
   把form2设为模式窗体，并在form2里设个数据集变量(注意不是控件),adoqu:Tadoquery;
   然后写,form2.adoqu := adoquery1;并用dbgrid显示出来。
   if form2.showmodal = mrOK then
   begin
    ;;;
   end;
   

Answer 4

楼主，发到[email protected]，
邮箱是lzg开头的新浪邮箱就是我。
有问题再联系，楼主可以结贴啦。

Answer 5

程序自带的数据库是Access，要换其他数据库的话，在ADOConnection中改下连接设置即可。

Answer 6

 没有收到啊！[email protected]