我在报表的每一页设定了记录数为十,不足的补空行打印
现在客户需要我将空行部分用表格填满,使报表看起来整齐
请问怎么实现!
现在客户需要我将空行部分用表格填满,使报表看起来整齐
请问怎么实现!
解决方案 »
- Delphi ActiveX Library 的Dll 调用窗体问题
- 一个有关导出EXCEL文件的问题,急,请高手赐教!
- delphi制作安装程序
- 怎么取出执行一段代码,用了多长时间?大侠帮帮忙!
- 小小问题,
- 如何使DirectorBox在单击后就将当前选中目录中的文件放到FilelistBox中去???
- 请问如何定义一种类型为函数?
- ado查询错在哪里?(vf中的sql查询),如果回答的详细可再加分
- 如何得到一个stream中的某一特定字符串的位置?
- 笨蛋有急事,想知道:Char和PChar有什么区别啊!如何把PChar转化为Char?
- Execl数据读取中的问题
- C中的union在Delphi中如何表示?
inc(i);//i是一個全局變量
//qr不要設置dataset(即為空),BeforePrin裡面dataset.first;//設置為第一記錄
//在onneeddata裡面,
//因為以前搞過,都過了比較久了,你試試看看行不行
if not ADOQuery1.Eof then
begin
QRLabel2.Caption:=ADOQuery1.Fields[1].AsString;
QRLabel3.Caption:=ADOQuery1.FieldByName('SL').AsString;//+ADOQuery1.FieldByName('DW').AsString;
ADOQuery1.Next; if i<=20 then
MoreData:=true
else
begin
QuickRep1.NewColumn;
i:=0;
MoreData:=true;
end;
end
else
begin
QRLabel2.Caption:='';
QRLabel3.CaptioN:=''; if i=20 then
MoreData:=false;
end;
你参考一下
或者控制数据集也可以呀。