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

[yaccor]

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

[laoz]

汗！

[hellolongbin]

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

[hellolongbin]

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

[hellolongbin]

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

[周江涛]

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

[yaccor]

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

[taoxianxue]

只好来顶一下啦

[hqhhh]

应该写在与DBGridEh相关联的DataSource控件的DataChange事件中

procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
Form1.Caption := DBGrid1.DataSource.DataSet.FieldByName('name').AsString
end;

如果写在DBGridEhClick事件中，则只有用鼠标点击时才可以显示，如果用键盘上下移动时就不行了！
不过也可以设置！