怎样遍历DBGIRDEH中的数据？我是想检查其中的数据，不要有没填的。

Question

我的代码如下：
  for i:=1 to adoquery1.recordcount
  begin
    for j:=0 to dbgrideh1.fieldcount-1 do
    begin
      if dbgrideh1.fields[j].value=null then
        showmessage('error');
    end;
  end;可是，当有没填的数据时，不会提示错误。怎么搞的？

Answer 1

偶现在很穷，挣分结贴 偶现在很穷，挣分结贴 偶现在很穷，挣分结贴到论坛去看一看
http://www.envanet.com
我的论坛，这样说是不是有拉条皮的嫌疑
不过我确实放了很多高程考试的资料在上面
好的话，给点分支持一下

Answer 2

for i:=1 to adoquery1.recordcount
  begin
    for j:=0 to adoquery1.fieldcount-1 do
    begin
      if adoquery1.fields[j].isnull then
        showmessage('error');
    end;
  end;

Answer 3

with dbgride.datasource.dataset  do
begin
  first;
if fieldbyname().asstring='' then
  删除
end

Answer 4

var
  fname:string;
begin
adoquery1.first;
while not adoquery1.eof do
begin
  for i:=0 to dbgrideh1.columns.Count-1 do
  begin
    fname:=dbgrideh1.columns[i].fieldname;
    if adoquery1.fieldbyname(fname).asstring='' then
       ShowMessage('error');
  end;
  adoquery1.next;
end;
end;

Answer 5

同意 lu2004(lu2003) 
另外建表时加上not null限制也是个办法。