本人初学DELPHI,新打开一个窗口A,有EDIT1,点击按钮后弹出窗口B,有DBGRID1,双击DBGRID1的一条数据后,窗口B关闭,并将选中数据的一个字段信息显示到窗口A的Edit1上,要如何实现呢?

解决方案 »

  1.   

    在窗口关闭的时候将值传回去,
    你可以自定义一个函数用来调用,窗口B
    function g_showB: string;
    begin
      frmb:=Tfrmb.create(application);
      try
    frmb.showModal;
       result := field;
      finally
        freeandnil(frmb);
      end;
    end;在双击事件中给field赋值;field := Fieldby().asstring;显示窗口b的函数中
    edit1.text := g_showB;