怎么取得TQRBDText的值,在线等 有一个TQRBDText,设置了DataSet和DataField那么TQRBDText的Caption就是字段名我想取得它在预览时显示的数据值应该用它的哪个属性,谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 qrdbtext1.DataSet.FieldByName(qrdbtext1.DataField).asstring; 可是,这好像是最后一条记录的数据值。是这样的,这个TQRBDText显示的是数据集中的product_type字段我在QRGroup里用这个进行了分组,每个分组都用变量i重新记录页码。比如,product_type字段为‘DDD’的页码i从1到12product_type字段为‘EEE’的页码i从1到9我设了两个变量,记录前一个product_type字段值和当前product_type字段值比较两者是否相同,如果相同,页码重新开始。但是取不到当前的product_type字段值 procedure TForm1.DetailBand1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);begin QRLabel1.caption:= tablexxx.text; end; 是这样的:在QRGroup中有qrdbtext1,DataSet是adoQuery1,DataField是product_type我用数据集adoQuery1中的一个字段product_type(产品型号)进行分组不同的产品型号另起一页打印页码我用变量iPage计数,产品型号改变了,iPage就从1开始计数比如,产品型号‘DDD’的页码iPage从1到12产品型号‘EEE’的页码iPage从1到9...但是不知道数据集adoQuery1好像不是随qrdbtext1的值(取不到)滚动我就不知道从哪一页产品型号发生了变化,从而也无法控制iPage的计数大家帮帮忙,看还有没有别的好法子,谢了!! delphi 中用treeview控件读出数据库中的数据 有对Themida壳了解的么?怎么用它的虚拟机? 我写了一个双色球分析软件 delph 如何删除文件? 请进!感谢 报表控件TQuickRep在哪有下载的? 请问谁知道那里有Delphi6官方简体中文版下载阿? 天哪,真是邪了门!!EDIT中按回车怎么没响应?我真的快要疯了,UP有分。 不明白的几条语句。 来吧,写万能打印的同行,让我看看你的代码。 为何用DBEDIT不能改变数据 请问在fastreport中如何显示不同数据表的内容
我在QRGroup里用这个进行了分组,每个分组都用变量i重新记录页码。
比如,product_type字段为‘DDD’的页码i从1到12
product_type字段为‘EEE’的页码i从1到9我设了两个变量,记录前一个product_type字段值和当前product_type字段值
比较两者是否相同,如果相同,页码重新开始。
但是取不到当前的product_type字段值
var PrintBand: Boolean);
begin
QRLabel1.caption:= tablexxx.text;
end;
我用数据集adoQuery1中的一个字段product_type(产品型号)进行分组
不同的产品型号另起一页打印
页码我用变量iPage计数,产品型号改变了,iPage就从1开始计数
比如,产品型号‘DDD’的页码iPage从1到12
产品型号‘EEE’的页码iPage从1到9
...但是不知道数据集adoQuery1好像不是随qrdbtext1的值(取不到)滚动
我就不知道从哪一页产品型号发生了变化,从而也无法控制iPage的计数
大家帮帮忙,看还有没有别的好法子,谢了!!