【搞定】帮我解决一个错误!**

巧克力味

procedure TMainForm.BizFormCreate(Sender: TObject);
var
   dataset1:TSQLDataSet;
begin
dataset1 := TSQLDataSet.Create(Self);
dataset1.Database.URL:='Biz:\JXC_GJP_\SJK.Database';
with dataset1 do
begin
sql.Text := 'select Count(SL) from TJDBCB Group by SPBH';
          Open;
          while not eof do
          begin
               Edit1.Text := sysutils.IntToStr(FieldByName('Count(SL)').AsInteger);
               Next;
          end;
          Close;
end;
end;

//Edit1.Text := sysutils.IntToStr(FieldByName('Count(SL)').AsInteger); 这一句是错的,能帮我解决吗?

atiger

Count(SL)，这是啥，是一个字段的ID，还是在求SL这个字段的格式
你不会告诉我是后者吧，如果是，那肯定不对，FieldByName 后面的参数是字段的ID，不是其他的。

zfang

sql.Text := 'select Count(SL) As lSL  from TJDBCB Group by SPBH';
Edit1.Text := sysutils.IntToStr(FieldByName('lSL').AsInteger);
这样写既可。

巧克力味

Count(SL)我写错了,呵呵,用Sum(SL)用你的方法解决了,谢谢!

yanyequan

FieldByName('Count(SL)').AsInteger  里的 Count(SL) 不是字段名，
要想用字段名得这么写 SQL ：'select Count(SL) as zsl from TJDBCB Group by SPBH'，然后这么调用：
FieldByName('zsl').AsInteger;，

如果不想用字段名调用，就得用索引这么写：
Fields[0].AsInteger;