一个关于DBGrid的问题?UP有分!

Question

当我的鼠标放在DBGRID的任意一行上就可以获得该行的值,并把该行的值从数据库中取出来放在Edit中,这应该怎么来实现?
我用的数据库是SQL Server2000,用ADO来连接!

Answer 1

感觉有点象VB的LISTVIEW的功能？

Answer 2

Edit1.Text:=ADOquery1.Fieldbyname('字段名').Asstring

Answer 3

在oncellclick中加代码，把当前行所有字段做个循环，加成一字符串，放到edit里。

Answer 4

看来你只能扩展dbgrid了，不知道dbgrid有没有cell属性

Answer 5

这是我刚写的，看能不能有点帮助
procedure TForm1.DBGrid1CellClick(Column: TColumn);
var
  i: integer;
  str: string;
begin
  for i := 0 to dbgrid1.FieldCount - 1 do
  begin
    str := str + ' ' + adotable1.fields[i].AsString
  end;
  edit1.Text := str;
end;

Answer 6

在OnCellClick事件....这是单击某个单元格所触发的事件edit1.text:=DBGrid1.SelectedField.Text

Answer 7

写DBGrid的单击事件。如果用DBEdit来显示相应字段的值，则单击事件也可以省了。

Answer 8

楼主的意思，我理解为要在相应的MouseMove事件里写代码，效果是鼠标滑过时在相应的Edit框里显示对应字段的值，其实主要方法上面各位朋友都差不多讲了。