现有form1,有一edit1;form2,有一dbgrid1,现在要实现地是点击edit1就跳出form2,在dbgrid1中显示出数据(这个我已经做到),现在要把dbgrid1的某一个我选中的单元格的内容传回到edit1中,这一步我想不出来用dbgrid1地什么方法来实现了,大虾们指点一二。
先谢过!

解决方案 »

  1.   

    具体点好不好,偶很菜地。
    我想地是用
    procedure TForm2.DBGrid1CellClick(Column: TColumn);
    begin
    form1.Edit1:=当前单元内的内容,可是这个我不会表达了。
    end;
      

  2.   

    form1.edit1.Text:=DBGrid1.SelectedField.AsString;
      

  3.   

    procedure TForm2.DBGrid1CellClick(Column: TColumn);
    begin
    form1.Edit1:=dbgrid1.textcell(index,n)
    end;
      

  4.   

    同意cjfzy
    form1.edit1.Text:=DBGrid1.SelectedField.AsString;
      

  5.   

    在输入比如说form1.后会有提示一些属性、过程、函数什么的,为什么在输入dbgrid1.后却不提示任何东西了,所以我才不知道怎么表达我选中当前的值要用dbgrid的什么属性,一般.后不出现后面的提示是什么原因导致的呢?
      

  6.   

    Self.edit1.Text:=DBGrid1.SelectedField.AsString;
      

  7.   

    谢谢大虾们了,解决了。
    但是为什么不出现提示我还是没有搞清楚,但是不是代码有误。我有两个系统,在另一个系统里面输入dbgrid1.后就会有提示,我也搞不清楚怎么了!!