| wangkexian
20943
|
2006/1/15 10:21:11 |
{**********}
{ 报表设计器(.fr3) }
{ }
{ 王克鲜 于2005年6月完成 }
{**********}
{使用方法：
1.直接执行Fr3Dsgner.exe：
根据需要选取"文件"菜单下的"新建"或"打开"菜单项。
2.与.fr3文件关联：
在资源管理器中双击.fr3文件，window会问"打开方式"，
选择Fr3Dsgner.exe，并选中"以后都用这个程序打开"，单击"确定"。
3.调用Fr3Dsgner.exe的方法：以rep.fr3文件为例
Dos 命令行：Fr3Dsgner.exe rep.fr3
Delphi源码：WinExec('Fr3Dsgner.exe '+'rep.fr3',SW_SHOW);
}
program Fr3Dsgner;
uses
FRxDesgn, FRxClass; //需要注意
var
frxReport1: TfrxReport; //需要注意
{$R *.res} //此行可以去掉，Fr3Dsgner.res亦可删除
begin //代码开始
frxReport1 := TfrxReport.Create(nil);
try
frxReport1.LoadFromFile(ParamStr(1));
frxReport1.DesignReport;
finally
frxReport1.Free;
end; //代码结束
end. |
| hxylw
20892
|
2006/1/12 17:50:49 |
| 只适用于fr2的，不能适用于fr3 |
| wangkexian
16207
|
2005/7/8 21:31:57 |
参见：
http://bbs.2ccc.com/topic.asp?topicid=178400 |
| wangkexian
16205
|
2005/7/8 20:58:35 |
//本人有一个更简单的方法
//只需.prj，无需.pas和.dfm
//FrfDsgner.prj
{**********}
{ 报表设计器(.frf) }
{ }
{ 王克鲜 于2005年6月完成 }
{**********}
{使用方法：
1.直接执行FrfDsgner.exe：
根据需要选取"文件"菜单下的"新建"或"打开"菜单项。
2.与.frf文件关联：
在资源管理器中双击.frf文件，window会问"打开方式"，
选择FrfDsgner.exe，并选中"以后都用这个程序打开"，单击"确定"。
3.调用FrfDsgner.exe的方法：以rep.frf文件为例
Dos 命令行：FrfDsgner.exe rep.frf
Delphi源码：WinExec('FrfDsgner.exe '+'rep.frf',SW_SHOW);
}
program FrfDsgner;
uses
FR_Desgn, FR_Class; //需要注意
var
frReport1: TfrReport; //需要注意
//{$R *.res} //此行可以去掉，FrfDsgner.res亦可删除
begin //代码开始
frReport1 := TfrReport.Create(nil);
try
frReport1.LoadFromFile(ParamStr(1));
frReport1.DesignReport;
finally
frReport1.Free;
end; //代码结束
end. |
![]() |
|
