在DBGrid中,双击一条记录,弹出另外一个窗体
在这个窗体中的edit1.text让它显示双击的那条记录
线等,急!!!!!!!!!!!!!!!1

解决方案 »

  1.   

    正好在写程序,类似,帖给你吧
    procedure TC_GetIssueInfoByIssCodeF.GD_CouseListDblClick(Sender: TObject);
    begin
      if not mainf.GetCreateForm(C_listf) then
        Application.CreateForm(TC_listf, C_listf);
      try
        c_Listf.personnel_in.Text := '';
        c_Listf.IssuePos_in.text := '';
        C_listf.Project_in.Text := project_in.Text;
        C_listf.mbu_in.Text := mbu_in.Text;
        c_Listf.FTime_in.Date := FTime_in.Date;
        c_Listf.TTime_in.Date := TTime_in.Date;
        c_Listf.ICode_in.text := GD_CouseList.DataSource.DataSet.FieldValues['IssueCode'];
        C_listf.Nowstate := 2;
        C_listf.Show;
        c_listf.btn_q.Click;
      except
      end;
    end;
      

  2.   

    似乎太简单了:procedure TForm1.DBGrid1DblClick(Sender: TObject);
    begin
      Dlg.Edit1.Text := Table1.FieldByName('Name').AsString;
      Dlg.ShowModal;
    end;
      

  3.   

    再另一个窗体中引用本窗体edit1.text :=form1.table.fieldbyname('').asstring;
      

  4.   

    其实就相当与把你另外一个窗体的值传到你这个窗体中的edit.text里面去让它显示啊