delphi2010中FastReport的安装方法
一,准备工作。 1.1安装Delphi2010。 1.2获得FastReport 4.9.31。 二,FastReport文件夹下LibD14目录添加到Delphi中的Library Path 步骤:1,打开Delphi2010,打开菜单Tools->Options。 2,左侧点击Delphi Options的+号,点击Library-win32 3,在右侧框中找到Library Path,将FastReport->LibD14路径粘贴至该文本框的末尾,粘贴之前输入分号(;)。 三,生成FastReport汉化文件 步骤:1,运行"recompile.exe"文件,设置相应选项,我的设置如下: 1,Select the compiler 设置为 Embarcadero Rad Studio 2010(Delphi,C++)。(默认值) 2,Select the FastReport Version 设置为 Enterprise。(默认值) 3,Select the TeeChart version 设置为 TeeChartStd。(默认值) 4,What you want to do 下的 Change language To: 设置为 Chinese 。(自己选择) 四,编译运行时包。 步骤:1,在Delphi中打开(File->Open)菜单。 2,编译,打开如下DPK后,在Delphi中的IDE右侧Project Manager选中该Project右键单击,然后点击Compile。 - FastReportLibD14fqb140.dpk - FastReportLibD14fs14.dpk - FastReportLibD14fsDB14.dpk - FastReportLibD14fsBDE14.dpk - FastReportLibD14fsADO14.dpk - FastReportLibD14fsIBX14.dpk - FastReportLibD14frx14.dpk - FastReportLibD14frxDB14.dpk - FastReportLibD14frxADO14.dpk - FastReportLibD14frxBDE14.dpk - FastReportLibD14frxIBX14.dpk - FastReportLibD14frxDBX14.dpk - FastReportLibD14frxe14.dpk - FastReportLibD14frxcs14.dpk 这个是FastReport的Client/Server,如不需要则不需编译此文件 四,编译并安装Dcl。 步骤:1,在Delphi中打开(File->Open)菜单。 2,编译,打开如下DPK后,在Delphi中的IDE右侧Project Manager选中该Project右键单击,然后点击Compile,接着在弹出的右键菜单中点击Install。 - FastReportLibD14dclfs14.dpk - FastReportLibD14dclfsDB14.dpk - FastReportLibD14dclfsBDE14.dpk - FastReportLibD14dclfsADO14.dpk - FastReportLibD14dclfsIBX14.dpk - FastReportLibD14dclfrx14.dpk - FastReportLibD14dclfrxDB14.dpk - FastReportLibD14dclfrxADO14.dpk - FastReportLibD14dclfrxBDE14.dpk - FastReportLibD14dclfrxIBX14.dpk - FastReportLibD14dclfrxDBX14.dpk - FastReportLibD14dclfrxe14.dpk - FastReportLibD14dclfrxcs14.dpk 这个是FastReport的Client/Server,如不需要则不需编译、安装此文件。 五、安装结束。
FASTSCRIPT脚本实现多国语言
主程序装载脚本 procedure TForm1.FormCreate(Sender: TObject); begin fsScript1.Clear; fsScript1.Parent := fsGlobalUnit; fsScript1.AddComponent(Form1); fsScript1.Lines.LoadFromFile('1.txt'); fsScript1.Run; end; 1.txt文件 uses 'lang.txt'; //引用公用的语言单元 procedure button1click(sender: tobject); begin showmessage('hello'); end; begin with form1 do begin button1.caption := const_append; button2.caption := const_save; button1.onclick := @button1click; end; end. Lang.txt公用的语言单元 const const_append = '增加'; const_save = '保存'; begin end. 使用不同lang.txt文件来对应不同的语言即可。