Question

Delphi双击DBGrid将值赋给Edit报错，有一个为空，但是Acess数据库中此处是允许为空的

procedure TForm1.DBGrid1DblClick(Sender: TObject);begin edtName.Text:=DBGrid1.Fields[1].CurValue; edtPhone1.Text:=DBGrid1.Fields[2].CurValue; edtPhone2.Text:=DBGrid1.Fields[3].CurValue; edtMail.Text:=DBGrid1.Fields[4].CurValue; edtHomeAdd.Text:=DBGrid1.Fields[5].CurValue; edtNowAdd.Text:=DBGrid1.Fields[6].CurValue; edtTeam.Text:=DBGrid1.Fields[7].CurValue; edtRemark.Text:=DBGrid1.Fields[8].CurValue;end;

第三个值为空。
。

Answer 1

1、你的控件是否全是edit控件。
2、用DBGrid1.Fields[1].text或者是DBGrid1.Fields[1].value试试。

追问

一样的，会同样的错误。

追答

把所有的CurValue换成text或value或asstring。
还有你的控制是否都是edit，是不是有个只能存放数字的控件？

追问

关键问题是Null，如果是我添加上去的空字符‘’就没问题，第二行是Access数据库中直接添加的，全部为Edit

追答

我刚测试了一下，没有什么问题，还有就是不要用DBGrid1，最好用ADOQuery1。
试了一下用CurValue会报错不能为空，改成text就行了。

追问

DBGrid1是显示数据，ADOQuery是连接数据的，跟这个没有关系吧，

不过不用curValue用text确实解决了问题，不知道为什么，无法理解，
初学Delphi，多谢！

追答

DBGrid是通过DataSource连接到ADOQuery的，也就是说DBGrid和ADOQuery是相同的，
直接取ADOQuery的值要比用取DBGrid的值的效率要来得好一些。