DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: iushoviskdors
今日帖子: 32
在线用户: 10
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 wufen (wufen) ★☆☆☆☆ -
盒子活跃会员
2003/5/26 15:14:04
标题:
发现错误提示,但不知是什么意思,希望大家帮我 浏览:1225
加入我的收藏
楼主: 我想实现将数据库的查询结果显示在memo中,以下是代码
var
  sGetResult : String ;
  i: integer ;

begin
if  ComboBox1.ItemIndex=0//若ComboBox1的选项是第一项,则进行
then begin
 Query2.Close;
 Query2.SQL.Clear;
 Query2.SQL.Add('select * from zhongjie');//查找zhongjie表中所有项
 Query2.open;
 begin
With Query2 do
First ;
sGetResult := ' ;

  
  for i:=1 to Query2.RecordCount do
  begin
  sGetResult := sGetResult + Query2.Fields[0].AsString ;//返回查找中的第一列,并每项相加
  memo1.lines.add(sGetResult);//结果显示在memo中
  Next ;
end;
end;
end.
这只是程序的一部分,但是我觉得理论上没错,可是在运行是memo中没有内容显示,但若加一个dbgird控件却能完全显示内容。
按f9后,程序能运行,但出现warning提示for loop control variable must be 
simple local variable
代表错误在fori:=1 to Query2.recordcount do一行请问是什么错误,该怎么修改呢?由于我不能经常上网,所以会在后天来看结果,欢迎大家帮助!

----------------------------------------------
delphi菜鸟
作者:
男 zizii (高高高级馒头) ★☆☆☆☆ -
神秘会员
2003/5/26 17:17:37
1楼: 一般用 for i:=0 to Query2.recordcount-1 do
----------------------------------------------
维护世界和平,共创美好盒子。
作者:
男 wufen (wufen) ★☆☆☆☆ -
盒子活跃会员
2003/5/26 22:20:31
2楼: 但是这样的话也会出错,问题不在那个地方,不知道for loop control variable must be simple local variable
指出的错误是什么意思,该怎么修改
----------------------------------------------
delphi菜鸟
作者:
女 ruby_li (ruby) ★☆☆☆☆ -
注册会员
2003/5/27 13:51:29
3楼: 增加另一变量 j
j:=Query2.RecordCount ;
for i:=0 to j-1 do
----------------------------------------------
笨笨
作者:
男 wufen (wufen) ★☆☆☆☆ -
盒子活跃会员
2003/5/28 16:19:49
4楼: 这样本质上没有区别,我估计关键是for loop control variable must be simple local variable
的错误,不知是什们意思
----------------------------------------------
delphi菜鸟
作者:
男 wufen (wufen) ★☆☆☆☆ -
盒子活跃会员
2003/5/28 16:26:15
5楼: 谢谢anjunaj,我竟然没看前一篇文章,看来是with语句的位置不对,现在已经解决了。
----------------------------------------------
delphi菜鸟
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v2.1 版权所有 页面执行46.875毫秒 RSS