FastReport4.0中的Memo对象中显示固定文字,当文字个数为奇数时不能显示,为偶数时可以显示
我只是加了这些代码来显示一些变量
procedure TfrmHistory.btnPrintClick(Sender: TObject);
begin
frxReport1.ShowReport;
end;procedure TfrmHistory.frxReport1GetValue(const VarName: String;
var Value: Variant);
begin
if CompareText(VarName, 'HistoryTime') = 0 then
Value := StringGrid1_SelectedRowArray[0]; //StringGrid1_SelectedRowArray这是一个字符串型数组
if CompareText(varName,'TS_Name')=0 then
Value:=SelectedBatteryGroupRecord.TS_Name; //SelectedBatteryGroupRecord.TS_Name这是一个字符串变量
if CompareText(VarName,'BatteryGroup_Name')=0 then
Value:=; //SelectedBatteryGroupRecord.BatGroup_Name;//这也是一个字符串变量
end;
代码中这些变量都能正常显示。报表中其它显示固定文本的Memo,当文本字数为奇数时就显示不出来,是怎么回来?
我只是加了这些代码来显示一些变量
procedure TfrmHistory.btnPrintClick(Sender: TObject);
begin
frxReport1.ShowReport;
end;procedure TfrmHistory.frxReport1GetValue(const VarName: String;
var Value: Variant);
begin
if CompareText(VarName, 'HistoryTime') = 0 then
Value := StringGrid1_SelectedRowArray[0]; //StringGrid1_SelectedRowArray这是一个字符串型数组
if CompareText(varName,'TS_Name')=0 then
Value:=SelectedBatteryGroupRecord.TS_Name; //SelectedBatteryGroupRecord.TS_Name这是一个字符串变量
if CompareText(VarName,'BatteryGroup_Name')=0 then
Value:=; //SelectedBatteryGroupRecord.BatGroup_Name;//这也是一个字符串变量
end;
代码中这些变量都能正常显示。报表中其它显示固定文本的Memo,当文本字数为奇数时就显示不出来,是怎么回来?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货