with adoquery1 do
begin
Close;
sql.Clear;
SQL.Text := 'select * from assign where assign='+'3'+' ';
open;
end;
adoquery1 .First;
while not adoquery1 .Eof do
begin
showmessage(adoquery1.FieldByName('id').asstring);
adoquery1 .next;
end;
数据库表里符合条件的有9条记录,当我把adoquery1连上Access,showmessage了9次.当我把adoquery1连上SQL Server,showmessage了8次,第一条记录不显示,何故.
begin
Close;
sql.Clear;
SQL.Text := 'select * from assign where assign='+'3'+' ';
open;
end;
adoquery1 .First;
while not adoquery1 .Eof do
begin
showmessage(adoquery1.FieldByName('id').asstring);
adoquery1 .next;
end;
数据库表里符合条件的有9条记录,当我把adoquery1连上Access,showmessage了9次.当我把adoquery1连上SQL Server,showmessage了8次,第一条记录不显示,何故.
解决方案 »
- 在空窗体中加载一个DLL(内含有窗体)文件
- 关于delphi版本开发问题
- 如何在查询分析器中执行数据库文件
- [诚求动作-Delphi]怎么样获取鼠标在ListView上点击后的坐标!??
- 查询显示问题,急
- win2k不可以打印设置自定义页面。我的针式打印机打出来的总是一页打两页,hp6l的就没问题
- 求救:毕业设计要做一个“机房管理系统”,打算用indy下idtcpclient和idtcpserver控件,请高手们指点指点,最好给一些实例,或介绍几本好
- 请问应如何向并口写入数据
- 在Delphi中,Alt+Enter键如何表示?
- 一个菜鸟关于数据库连接的问题
- 如何在SrollBox内拖动Image?
- 怎样把图片存入数据库(BLOB类型,采用Timage控件)
begin
Close;
sql.Clear;
SQL.Text := 'select * from assign where assign='+'3'+' ';
open; while not adoquery1 .Eof do
begin
showmessage(adoquery1.FieldByName('id').asstring);
next;
end;
end;
看看
SQL.Text := 'select * from assign where assign='+'3'+' ';