送分请教:如何把dbgrid中的内容回写到edit中?
说明:我的dbgrid的datasourse是adoquery1,如何让dbgird的ondblclick事件触发便可使这一条数据回写到edit中去!就是形如用table时这样的:edit1.Text:= ADOTablezgdd.fieldbyname('XM').asstring; 问题点数:0、回复次数:6Top
1 楼hklyan()回复于 2004-09-04 15:26:24 得分 0
这样用是可以的:
Edit1.Text :=adoqueryzgdd['xm'];
但是这样库里不能为空,为空就报错了,如何解决?Top
2 楼drift1981(delphi coder)回复于 2004-09-04 15:55:59 得分 0
前面加一句判断这是不是空的,如果是空的就退出
if adoquery1.IsEmpty then
exit
else
....Top
3 楼Tensionli()回复于 2004-09-04 16:19:03 得分 0
procedure form1.DBGrid1DblClick(
Sender: TObject);
begin
edit1.text := adoquery1.fieldbyname('field').asstring;
edit2.text := adoquery1.fieldbyname('field').asinteger;
........
end;Top
4 楼qiujsh(www.chinascsoft.com)回复于 2004-09-04 20:34:18 得分 0
edit1.Text:= dbgrid.datasourse.dataset.fieldbyname('XM').asstring;
Top
5 楼luke5678()回复于 2004-09-04 21:15:37 得分 0
for i := 0 to FieldCount - 1 do
Edit1.Text := Edit1.Text + DBGrid1.Field[i].AsString;Top
6 楼cdsgajxlp(起名很难)回复于 2004-09-06 09:08:23 得分 0
你能给分么?Top




