5,930
社区成员
发帖
与我相关
我的任务
分享新手问题，中菜就可以轻易得分，保证40分送出
我的程序是没有数据库的，现在我要用报表打印，我看Delphi的Demos可他都是有数据库的，问：现在如何用报表输出计算的来的数据（非数据库数据），要求不能用到数据库！
我将把全部的分数给第一个方法正确可行的人。如果没有人回答我将平均分配给看过的人。
我将把全部的分数给第一个方法正确可行的人。如果没有人回答我将平均分配给看过的人。
...全文
请发表友善的回复…
发表回复
Except 2001-08-09
- 打赏
- 举报
好了，我决定平均分配这些分数了。谢谢
yxjjx 2001-07-25
- 打赏
- 举报
这个问题很简单有一个Qrexpr控件在它EXPRESSION中写sum就可以了试试吧
bubble 2001-07-25
- 打赏
- 举报
to joyhero(JoyHero):
有没有下载的网址。
有没有下载的网址。
joyhero 2001-07-25
- 打赏
- 举报
用Formula One，Delphi自带Formula One 3.0，建议下载高版本，我现在使用6.1，无论有无数据库连接，做报表一律用它。
乱码 2001-07-25
- 打赏
- 举报
看帮助嘛
很简单
很简单
Except 2001-07-19
- 打赏
- 举报
正在试验中，谁还有更好的办法！
Except 2001-07-19
- 打赏
- 举报
xagang(乱码)
请问一下如何做?
请问一下如何做?
Except 2001-07-19
- 打赏
- 举报
好，我就先试一下直接画，如果没有问题的话就开始给分
乱码 2001-07-19
- 打赏
- 举报
不是显示，是打印
乱码 2001-07-19
- 打赏
- 举报
可以用TQRStringsBand + TQRExpr
我用它来显示TStringGrid、字符串等等
我用它来显示TStringGrid、字符串等等
chills 2001-07-19
- 打赏
- 举报
是啊，直接操作Printer对于系统来说最经济,不过要浪费一下你的精力。
alphen 2001-07-19
- 打赏
- 举报
在uses中加入printers
如下方式，人工输出数据，可以自己定位输出数据位置，字体大小，等
with Printer do
begin
BeginDoc;
Canvas.TextOut(x,y,Text);
EndDoc;
end;
具体用法查查printers的help
如下方式，人工输出数据，可以自己定位输出数据位置，字体大小，等
with Printer do
begin
BeginDoc;
Canvas.TextOut(x,y,Text);
EndDoc;
end;
具体用法查查printers的help
alphen 2001-07-19
- 打赏
- 举报
在uses中加入printers
printerwith Printer do
begin
BeginDoc;
Canvas.TextOut(x,y,Text);
EndDoc;
end;
具体用法查查printers的help
printerwith Printer do
begin
BeginDoc;
Canvas.TextOut(x,y,Text);
EndDoc;
end;
具体用法查查printers的help
cyms 2001-07-19
- 打赏
- 举报
为什么非用Qreport,试试F1Book控件吧，最适合没数据库的报表了，使用方法和excel差不多,只需指定表格的row ,col 然后f1book.text赋值就成了。
xiaoxiao_8 2001-07-19
- 打赏
- 举报
gz
dingsg111 2001-07-19
- 打赏
- 举报
没区别^_^
chenjun 2001-07-19
- 打赏
- 举报
这样做跟自己画表格有什么区别嘛
chechy 2001-07-19
- 打赏
- 举报
那也没有办法，不就写一些赋值语句吗，你多用Copy & Paste不就可以了。
li_zhifu 2001-07-19
- 打赏
- 举报
只能用QRLabel了，一个一个地赋值嘛，我曾写过一个有500多行赋值语句的类似程序，只要结果正确就比什么都强
Except 2001-07-19
- 打赏
- 举报
不明白
加载更多回复（6）
