急救！！！！小问题，答对都有分，！！！

Question

显示在DBGridEh中有5条信息：
ID    name     age     sex     salary 
1     张三     20      男       800
2     李四     22      女       600
3     王五     30      男       1500
4     赵六     25      男       1200
问题描述：当我选择其中一行时，窗体Caption属性相应显示该行的name，比如我点到第3行，窗体caption属性变成王五。

Answer 1

procedure TForm1.DBGrid1Click(Sender: TObject);
begin
    Form1.Caption;= DBGrid1.Fields[1].AsString;   
end;

Answer 2

procedure TForm1.DBGrid1CellClick(Sender: TObject);
begin
    Form1.Caption;= DBGrid1.Fields[1].AsString;   
end;

Answer 3

不是click，是cellclick
将dbgrid的option里面dgrowselect设为true效果更好些

Answer 4

caption := DBGridEh1.datasource.dataset.FieldByName('name').asString;

Answer 5

恩，谢谢hellolongbin(一个人[终不似 少年游]) 你的是正解！！

Answer 6

应该写在与DBGridEh相关联的DataSource控件的DataChange事件中procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
  Form1.Caption := DBGrid1.DataSource.DataSet.FieldByName('name').AsString
end;如果写在DBGridEhClick事件中，则只有用鼠标点击时才可以显示，如果用键盘上下移动时就不行了！
不过也可以设置！