SReport强大易用稳定与最终用户交互良好(For Delphi6) 咳,用不用我帮你测试,测试 [email protected] 别忘了分给我! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 听说很强,以前只用过fastreport,但是没有用过sreport~~看看先~~ 请问如何安装?“File Not Found ” 当我安装FOR D6时,报错“Error] Report_Public.pas(495): Could not create output file 'e:\MySoft\WinTemp\Report_Public.dcu'”请各位帮助 如果出现找不到文件的情况, 请点击“Options”-->“Directories/Conditionals”, 在Search path 中加入相应的路径(怎么加就不用说了吧)。 ===================================================================编译的时候出了找不到路径的问题,后来我把那些路径删了(因为看到是输出文件的路径),装上以后却用不了——控件栏里只多了一个图标,把该图标放在窗体上双击却没有任何作用。该怎么用啊?===================================================================各位朋友: 控件栏里只多了一个图标,就说明正确的安装了。 怎么用的问题,请参见 (http://www.csdn.net/cnshare/soft/7/7408.shtm) 中的相关说明。 一、初始化。procedure Tfrm_PublicFP.SReportInitialized;begin with SReport do begin UserFormName := ''; SaveDirectory := ''; ModelInfoFilesName := ''; SubDetailDataSet := nil; MainDataSetOne := nil; maindatasettwo := nil; maindatasetthree := nil; maindatasetfour := nil; maindatasetfive := nil; maindatasetonecaption := ''; maindatasettwocaption := ''; maindatasetthreecaption := ''; maindatasetthreecaption := ''; maindatasetfourcaption := ''; maindatasetfivecaption := ''; PrintMemoRows := 0 ; PrintMemoString := ''; with Dm_Main.ADOQuery_DanweiInfo do if not active then Open; end;end; 二、赋值。procedure TFrm_Xiao_Baojia.beforePrint;begin with Frm_PublicFP do with SReport do begin DM_Xiao.Baojiadan_update; SReportInitialized; LocateKehuInfo(trim(DBEdit_kehu_no.Text)); UserFormName := Frm_Xiao_Baojia.Name; UserFormCaption := Frm_Xiao_Baojia.Caption; SaveDirectory := 'Report'; SubDetailDataSet := DM_Xiao.ADOQuery_Baoj_Mx; MainDataSetOne := DM_Xiao.ADOQuery_Baoj_Pz; MainDataSetOneCaption := '报价单主表'; MainDataSetTwo := DM_Zhwu.ADOQuery_Kehu; MainDataSetTwoCaption := '客户信息'; MainDataSetThree := Dm_Main.ADOQuery_DanweiInfo; MainDataSetThreeCaption := '本单位信息'; end;end; 三、预览、打印、设置begin BeforePrint; Frm_PublicFP.SReport.SRep_Preview;end;begin BeforePrint; Frm_PublicFP.SReport.SRep_Print;end;begin BeforePrint; Frm_PublicFP.SReportSetting;end;…………………………… 这里有for d6 的。http://www.csdn.net/cnshare2/soft/11/11301.shtm 你的联系方法,我发信到你的263得信箱,一直被退回,请于我联系,关于SREPORT源码的购买呀,我的信箱[email protected] http://www.csdn.net/cnshare2/soft/11/11301.shtm不用购买可以直接用呀.我的邮件地址更改为:[email protected] 我想问一下,怎样把报表打印中的下脚显示文字“WinStar 缔造业精品。”去掉呀,因为在报表中打印出来总不太好呀 我想问一下,怎样将报表打印页面上的"winstar 缔造业精品。。”去掉,因为这打印出来,不太好,不知怎去掉 我想问一下,怎样将报表打印页面上的"winstar 缔造业精品。。”去掉,因为这打印出来,不太好,不知怎去掉RE:对不起,这是免费使用时作者的保留权利. delphi中的进度条的使用,在线等啊 cxGrid的一些问题 ***请问如何取出ColorDialog.Color的RGB的色号***** 如何获得本地连接的名称啊 关于indy 在一个字符串怎么放一个单独的'呀?就一个小撇。 关与表的问题 Button怎么更改颜色? delphi 串口通信 这段代码在VB Script中怎样写?着急!! 关于SQL 2000数据库的一个问题!很急!!!!! 如何控制显示器的亮度,对比度?
请点击“Options”-->“Directories/Conditionals”,
在Search path 中加入相应的路径(怎么加就不用说了吧)。
编译的时候出了找不到路径的问题,后来我把那些路径删了(因为看到是输出文件的路径),装上以后却用不了——控件栏里只多了一个图标,把该图标放在窗体上双击却没有任何作用。该怎么用啊?
===================================================================
各位朋友:
控件栏里只多了一个图标,就说明正确的安装了。
怎么用的问题,请参见
(http://www.csdn.net/cnshare/soft/7/7408.shtm)
中的相关说明。
begin
with SReport do
begin
UserFormName := '';
SaveDirectory := '';
ModelInfoFilesName := '';
SubDetailDataSet := nil;
MainDataSetOne := nil;
maindatasettwo := nil;
maindatasetthree := nil;
maindatasetfour := nil;
maindatasetfive := nil;
maindatasetonecaption := '';
maindatasettwocaption := '';
maindatasetthreecaption := '';
maindatasetthreecaption := '';
maindatasetfourcaption := '';
maindatasetfivecaption := '';
PrintMemoRows := 0 ;
PrintMemoString := '';
with Dm_Main.ADOQuery_DanweiInfo do
if not active then Open;
end;
end; 二、赋值。
procedure TFrm_Xiao_Baojia.beforePrint;
begin
with Frm_PublicFP do
with SReport do
begin
DM_Xiao.Baojiadan_update;
SReportInitialized;
LocateKehuInfo(trim(DBEdit_kehu_no.Text));
UserFormName := Frm_Xiao_Baojia.Name;
UserFormCaption := Frm_Xiao_Baojia.Caption;
SaveDirectory := 'Report';
SubDetailDataSet := DM_Xiao.ADOQuery_Baoj_Mx;
MainDataSetOne := DM_Xiao.ADOQuery_Baoj_Pz;
MainDataSetOneCaption := '报价单主表';
MainDataSetTwo := DM_Zhwu.ADOQuery_Kehu;
MainDataSetTwoCaption := '客户信息';
MainDataSetThree := Dm_Main.ADOQuery_DanweiInfo;
MainDataSetThreeCaption := '本单位信息';
end;
end;
三、预览、打印、设置begin
BeforePrint;
Frm_PublicFP.SReport.SRep_Preview;
end;begin
BeforePrint;
Frm_PublicFP.SReport.SRep_Print;
end;
begin
BeforePrint;
Frm_PublicFP.SReportSetting;
end;……………………………
http://www.csdn.net/cnshare2/soft/11/11301.shtm
关于SREPORT源码的购买呀,我的信箱[email protected]
[email protected]
RE:
对不起,这是免费使用时作者的保留权利.