如题。

解决方案 »

  1.   

    procedure TForm1.DBGrid1CellClick(Column: TColumn);
    begin
      ShowMessage(DBGrid1.DataSource.DataSet.FieldByName('Field1').AsString);
    end;
      

  2.   

    如果要往一个listbox里加选中的这条记录,只要:
    listbox1.items.add(dbgrid1.datasource.dataset.fieldvalues['field1']);
    listbox1.items.add(dbgrid1.datasource.dataset.fieldvalues['field2']);
    listbox1.items.add(dbgrid1.datasource.dataset.fieldvalues['field3']);
    listbox1.items.add(dbgrid1.datasource.dataset.fieldvalues['field4']);
    就可以了吧。
      

  3.   

    我试了,四个字段的值是放在listbox的四行里,但我想把它们放在一行上,应该怎么办?
      

  4.   

    listbox1.items.add(dbgrid1.datasource.dataset.fieldvalues['field1']+
    dbgrid1.datasource.dataset.fieldvalues['field2']+...);
      

  5.   

    listbox1.items.add(dbgrid1.datasource.dataset.fields[0].asstring+
    dbgrid1.datasource.dataset.fields[1].asstring+...);