想在dbgrid中实现,当鼠标选中dbgrid某行时,弹出一个窗口,窗口中显示该行的详细内容,这个该怎么才能实现啊 !

解决方案 »

  1.   

    adoQuery1.FieldByName('Field1').AsString;
    ...分别取每个字段的值。取出来的就是当前选中行所对应的记录行的各字段值。
      

  2.   

    另一窗体上的Edit(比如说),分别赋值;
    如:Edit1.text := AdoQuery1.FieldByName('Names').AsString;
       Edit2.text := AdoQuery1.FieldByName('Department').AsString;
       ........................
      

  3.   


    procedure TForm1.DBGrid1DblClick(Sender: TObject); //DBGrid1的DblClick事件
    begin
       BH:=DBGrid1.DataSource.DataSet.FieldByName('BH').AsString; //获取当前DBGrid1被选中的行的主键BH
       Form2.BH:=BH;  //传主键BH到窗体2的BH,再在窗体2根据主键BH把窗体1被选中的那条信息显示出来
    end;
      

  4.   

    if (dbgrid.DataSource <> nil) and (dbgrid.DataSource.DataSet <> nil) and (dbgrid.DataSource.DataSet.Active) then
    dbgrid.DataSource.DataSet.FieldByName('...').AsString;
    哈哈