首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

数据库查询结果显示有关问题

2013-09-07 
数据库查询结果显示问题通过用户名查询用户的购买记录使用自带的打印控件QuickRpt 显示数据库查询结果,为

数据库查询结果显示问题
通过用户名查询用户的购买记录
使用自带的打印控件QuickRpt 显示数据库查询结果,为什么得到的结果是一样的?
现在情况是假如:用户购买记录有三次,应该每次是不同的.但是现在显示的是三次但三次的结果是一样的?
正常情况应该是用户有几次购买记录就显示几条购买记录而且每条记录是不同的.


begin
        with ADOQuery1 do begin
          ADOQuery1.close;
          ADOQuery1.SQL.Clear;
          ADOQuery1.SQL.Add('Select * From T_Powersell Where F_name =:F_name');
          ADOQuery1.Parameters.ParamByName('F_name').Value := trim(edit1.Text);
          AdoQuery1.Open;

          QRLabel2.Caption :='User';
          QRLabel7.Caption :=ADOQuery1.FieldValues ['F_name'];

          QRLabel3.Caption :='Meter NO.'; 
          QRLabel8.Caption :=ADOQuery1.FieldValues ['F_meterno'];

          QRLabel4.Caption :='Customer NO.';
          QRLabel9.Caption :=ADOQuery1.FieldValues ['F_custno'];

          QRLabel5.Caption :='kWh';
          QRLabel10.Caption :=ADOQuery1.FieldValues ['F_amount'];
           
          QRLabel12.Caption :='Total Amount';
          QRLabel13.Caption :=ADOQuery1.FieldValues ['F_total'];

          QRLabel6.Caption :='Time & Date';
          QRLabel11.Caption :=ADOQuery1.FieldValues ['F_time'];
          QuickRep1.Preview;
          end
       end;

哪位帮我看看代码有什么问题吗?
想要的结果是通过查询用户名 得到用户的购买记录 有N次购买记录就显示N次再打印.
Delphi 数据库 控件


[解决办法]
lz的查询语句没问题, 但是没看到lz遍历adoquery的语句怎么写的
------------------------------------------
逐步排除问题吧

1 确认数据库里的数据没问题
2 遍历adoquery的数据看看提取的数据是否正确, 方法如下

 

热点排行