本文目录
- fastreport4 如何把金额转换成大写
- c++builder6怎么安装fastreport 4
- FastReport4中怎么判断文本框里的字数FastRepor
- fastreport4 for delphi 7 的安装
- 请大家请问新版FastReport4控件的操作
- Fastreport4数据源内取数问题，最高分，可追加
- 如何fastreport4 安装到delphi7-CSDN论坛
fastreport4 如何把金额转换成大写
小写金额转换
如下为一个简单的小写金额转换为大写的函数，其思路简单（可以说烂吧，居然利用了位置来转换），但是它几乎可以无限制的转换，只要你能读得出来和写得进去：
function Tform1.SmallTOBig(small:real):string;
var SmallMonth,BigMonth:string;
wei1,qianwei1:string;
wei,qianwei,dianweizhi,qian:integer;
begin
{------- 修改参数令值更精确 -------}
qianwei:=-2;{小数点后的位置，需要的话也可以改动-2值}
Smallmonth:=formatfloat(’0.00’,small);{转换成货币形式，需要的话小数点后加多几个零}
{---------------------------------}
dianweizhi :=pos(’.’,Smallmonth);{小数点的位置}
for qian:=length(Smallmonth) downto 1 do{循环小写货币的每一位，从小写的右边位置到左边}
begin
if qian《》dianweizhi then{如果读到的不是小数点就继续}
begin
case strtoint(copy(Smallmonth,qian,1)) of{位置上的数转换成大写}
1:wei1:=’壹’; 2:wei1:=’贰’;
3:wei1:=’叁’; 4:wei1:=’肆’;
5:wei1:=’伍’; 6:wei1:=’陆’;
7:wei1:=’柒’; 8:wei1:=’捌’;
9:wei1:=’玖’; 0:wei1:=’零’;
end;
case qianwei of{判断大写位置，可以继续增大到real类型的最大值}
-3:qianwei1:=’厘’;
-2:qianwei1:=’分’;
-1:qianwei1:=’角’;
0 :qianwei1:=’元’;
1 :qianwei1:=’拾’;
2 :qianwei1:=’佰’;
3 :qianwei1:=’千’;
4 :qianwei1:=’万’;
5 :qianwei1:=’拾’;
6 :qianwei1:=’佰’;
7 :qianwei1:=’千’;
8 :qianwei1:=’亿’;
9 :qianwei1:=’十’;
10:qianwei1:=’佰’;
11:qianwei1:=’千’;
end;
inc(qianwei);
BigMonth :=wei1+qianwei1+BigMonth;{组合成大写金额}
end;
end;
SmallTOBig:=BigMonth;
end;
调用如下“edit1.text:=SmallTOBig(1234567890.1234);”他自动默认小数点后两位
替换指定串函数
一个替换指定串的函数，从一个字符串中找出指定子串，并替换为另一子串。
function replacing(S,source,target:string):string;
var site,StrLen:integer;
begin
{source在S中出现的位置}
site:=pos(source,s);
{source的长度}
StrLen:=length(source);
{删除source字符串}
delete(s,site,StrLen);
{插入target字符串到S中}
insert(target,s,site);
{返回新串}
replacing:=s;
end;
c++builder6怎么安装fastreport 4
一、 卸载旧版本
如果以前未安装过FastReport可以直接跳到下一步。如果安装过以前版本的FastReport在工具栏上会看到FastReport和FR Tools两个选项栏。首先我们要把先前的版本卸载。
打开BCB的菜单“Project“-》Option。然后在Packages的标签栏项目下，找到FastReport的所有部件，如下图的FastReport2.4 ADO Components 和 FastReport 2.4 Components。分别点击它们然后点地击“Remove”按钮逐个删除。卸载完成后返回，工具栏上面的FastReport和FR Tools两个选项栏也同时被清除。
二、设定安装目录
选择一个目录进行安装，现在以D:\cb6_control目录为例，将下载的FastReport V4.7.9解压到此目录。
三、生成安装链接文件
1. 执行recomplie文件，执行文件前请先将BCB6退出。否则程序文件出现提示并不能继续安装。
2. 程序运行后出现提示，主要是目录读写权限、C++Builder是否运行、是否有其它程序运行FastReport的部件包，点击“Continue”。
3. 进入到程序界面，选择相应的参数项。
第一项“1. Select the complier”选择程序，选择C++Builer 6。
第二项“2. Select the FastReport version”选择安装FastReport的版本，选择Enterprise。
第三项“3. Select the TeeChart version”，如果不知道的情况下请选择TeeChartStd。
第四项“4.What you want to do”，把“Choose Language to”的选择改为“Chinese”中文版。
完成后点击“Complier”，然后程序将FastReport安装所需要的文件生成到“LibBCB6“目录下。
3. 进入安装目录的\Res\Chinese，执行mk.bat文件生成中文菜单XML文件。并将文件复制到安装目录下的Source目录里面。注意一定要执行这个步聚，否则安装后的FastReport菜单的中文为乱码。
四、编译部件
1. 将刚才生成的LibBCB6的所有文件复制到Source目录下。
2.启动BCB。
3.将Source目录下的文件frx.inc复制到FastQB目录下。
4.编译基本部件，用BCB打开及编译以下部件。
打开FastQB目录下的fqb60.bpk，然后Complie.
打开FastScript目录下的fs6.bpk，然后Complie，编译完成后Install安装.
打开FastScript目录下的fsDB6.bpk，然后Complie，编译完成后Install安装..
打开FastScript目录下的FsADO6.bpk，然后Complie，编译完成后Install安装.
打开FastScript目录下的FsBDE6.bpk，然后Complie，编译完成后Install安装.
5.安装控件。
将LibD10目录下的所有pas文件复制到Source目录。
将Source目录下的所有pas文件复制到C++Builder安装目录的Lib\Release目录里面。
将FastScript目录下的所有pas文件复制到C++Builder安装目录的Lib\Release目录里面。
1) 用BCB打开source目录下的frx6.bpk，然后Complie，编译完成后Install安装。
2) 用BCB打开source目录下的frxDB6.bpk，然后Complie，编译完成后Install安装。
3) 用BCB打开source\ExportPack目录下的frex6.bpk，然后Complie，编译完成后Install安装。
4) 用BCB打开source\Ado目录下的frxADO6.bpk，然后Complie，编译完成后Install安装。
5 用BCB打开source\BDE目录下的frxBDE6.bpk，然后Complie，编译完成后Install安装。(可选安装)
6) 用BCB打开source\DBX目录下的frxDBX6.bpk，然后Complie，编译完成后Install安装。(可选安装)
7) 用BCB打开source目录下的frxTee6.bpk，然后Complie，编译完成后Install安装。(Chart,可选安装)
6.完成以上安装后，BCB的工具栏出现FastReport 4.0 和FR4 tools的标签栏。
五、指定头文件和链接库的目录
1. 点击BCB菜单“Project”-》“Options”，选择“Directories/Conditionals”的标签栏。
2. 点击“Include Path”的目录选择按钮“...”，弹出界面后点击“...”选择头文件的目录，即Source目录，本例的路径为“D:\cb6_control\gastReport.v4.7.9\Source”，然后点击“Add”按钮。
3. 按照同样的方法将“Source”目录添加到“Libary Path”链接库选项。
4.点击选择左下角的Default，然后点击“OK”。
5.重新启动BCB，FastReport4正式安装完毕。
安装测试环境：WinXP+BCB6+FastReport4.7.9。
FastReport4中怎么判断文本框里的字数FastRepor
FastReport4中怎么判断文本框里的字数FastRepor
本例首先将MATLAB的图标转化为灰度图，将数据存储在文本文件中，再将其部分读出，显示为图形。
编写M文件，命名为immatlab.m，内容为：
% the example of functions csvread and csvwrite
I_MATLAB= imread(’D:\matlab.bmp’); % read in the image
I_MATLAB= rgb2gray(I_matlab); % convert the image to gray image
figure,imshow(I_matlab,’InitialMagnification’,100); % show the image
csvwrite(’D:\matlab.txt’,I_matlab); % write the data into a text file
sub_MATLAB= csvread(’D:\matlab.txt’,100,100);% read in part of the data
sub_MATLAB= uint8(sub_matlab); % convert the data to uint8
figure,imshow(sub_matlab,’InitialMagnification’,100); % show the new image
在命令窗口中运行该脚本，输出图形如图13-2所示。
fastreport4 for delphi 7 的安装
1.如果你下载的文件无误的话，从图上看你下载的就是个安装文件，直接双击运行就可以了。2.文件名fr4d11，我不太清楚这具体针对的是什么版本的，d11或许不是Delphi7的，一般情况下标志应该为D7，建议你再检查下你下载的fastreport版本。
请大家请问新版FastReport4控件的操作
fastreport的话很久没用了，但是貌似新版的fastreport的控件设置和2.4的差不多，如果实在是找不到解决方法的话可以去看下2.4版本的。我现在用的是finereport，点击菜单，单元格》控件设置或者右击选择控件设置按钮就可以添加控件，之后会弹出控件设置的界面：
进行相应的设置就可以啦。
Fastreport4数据源内取数问题，最高分，可追加
试试在页面上放一个button按钮，然后在按钮的onclick事件中写：
begin
TfrxMemoView(frxReport1.FindObject(’memo1’)).Memo.Text :=’测试显示内容’;
frxReport1.ShowReport;
end
如何fastreport4 安装到delphi7-CSDN论坛
首先关闭 DELPHI 7 ，直接运行 FASTREPORT 安装包，选择 DELPHI 7 。安装好后，要是面板里没有组件的化，你可以去 菜单-- Componet-----install packages 里 把 关于fastreport 的包前得复选框 手动勾上。
