adoquery1.Next ;怎么会错？

Question

procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
adoquery1.ConnectionString :='Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=yyjg;Data Source=pan';
adoquery1.SQL.Text :='select * from guestbook';
adoquery1.Open ;
i:=1;
while not adoquery1.Eof do
begin
i:=i+1
adoquery1.Next ;//////////////这里错
end;
showmessage(inttostr(i));
end;end.错误信息:[Error] Unit1.pas(39): Missing operator or semicolon
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'为什么？

Answer 1

如果你用的是Delphi5请下载升级包安装