这是DELPHI,它封装了ADO
改成
while not TADOQuery1..EOF do
begin
//..........
TADOQuery1.Next;
end;
改成
while not TADOQuery1..EOF do
begin
//..........
TADOQuery1.Next;
end;
解决方案 »
- 如何隐藏自己的程序(不在任务管理器中)
- 我是初学者,以前用的是VB,现在想改学DEPHI,请问哪本讲DP7的书比较好些?最好有对现有控件进行介绍的,谢谢
- 如何在程序中打开一个EXE。(在线等待)
- 为什么窗体会闪动?
- 数组
- 在Delphi中如何使用HTML帮助文件?
- 显示密码编辑框中的密码!急急
- (一个简单问题)请问怎样把 Memo1 中的文字内容写入到一个文本文件中?
- toolbar放在controlbar中,给toolbar上的toolbutton指定一个菜单,为什么快捷键失效了?
- 紧急求助,MediaPlay组件如何控制左右声道?
- 怎樣截取字符串中的指定字符﹖
- 那里能找到类似QQ导航条的控件源码下栽 - --- 在线给分不够可以再加
改成
while not TADOQuery1.EOF do //刚才这里多了一点
begin
//..........
TADOQuery1.Next;
end;
adoquery1.fieldbyname('somefield').asstring;所以你要使用adoquery1.next;来移动指针
adoquery1.recordset.field[0].value;
TADOQuery1.SQL.Clear;
TADOQuery1.SQL.Add('select * from tablename');//表中不止一行数据
TADOQuery1.Open; while not TADOQuery1.EOF do
begin
//..........
TADOQuery1.Next;
end;
TADOQuery1.SQL.Clear;
TADOQuery1.SQL.Add('select * from tablename');//表中不止一行数据
TADOQuery1.Open; while not TADOQuery1.RecordSet.EOF do
begin
//..........
TADOQuery1.RecordSet.MoveNext;
end;
//以上循环内的语句有点像vb
你这样试试吧! TADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select * from tablename');//表中不止一行数据
ADOQuery1.Open; while not ADOQuery1.EOF do
begin
//..........
ADOQuery1.MoveNext;
end;================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多,功能完备!★ 浏览帖子速度极快![建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口,可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录!
★ 支持在线检测程序升级情况,可及时获得程序更新的信息。★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]