我前期在用Delphi编写了一个查询系统,建了一个工程,当运行时出现一个主窗体,然后点出一个Button按钮,将弹出一个子窗体,作为查询的筛选条件.
在使用中,认为运行时,直接打开查询窗体,然后录入查询条件后,再将原来的主窗体打开,并显示查询结果.
如果重新写需要花很大时间,不知道在原来的基础可不可直接修改?怎么修改?

解决方案 »

  1.   

    弹出的输入查询条件的窗体showmodel不行吗?
      

  2.   

    查询条件的窗体showmodel  = mrok 以後得到你想要的條件 更新結果集,.
      

  3.   

    lz说的不是很清楚,你是不是想要在出现主窗口前,先出现一个类似登录的窗口,如果是,那就这样做
    1.先把这个登录窗口做好(在同一个工程下)
    2.把project(点viewunit按钮)打开,改一下运行顺序,把登录的unit放到主窗口的unit前就可以了
      

  4.   

    两种方式:
    1、主窗体show之前,查询窗体showmodal
    2、修改项目源文件,在主窗体create之前动态创建查询窗体。
      

  5.   

    我回答 的没错吧?比如显示结果的叫FrmResult,查询的叫FrmFind;FrmResult上一个按钮叫查询BtnFind,按这个按钮就弹出FrmFind;
    在FrmResult中声明一个全局变量sFilter:string;
    根据FrmFind中选择的条件来生成查询语句sFilter;
    按钮事件这样写
    TFrmFind.Create(nil).ShowModal;
    FrmFind.Free;
    //关闭查询窗口后执行
    with Query do
    begin
      clsoe;
      sql.clear;
      sql.add(sFilter);
      open;
    end;这不就达到你的目的 了吗?