上面的供应商和单号 有时候正常显示,有时候就如图*应商 显示为数字 这是什么问题,请大侠解决下~
procedure TChukuForm.frxReport1GetValue(const VarName: String;
var Value: Variant);
var Mview1,Mview2,Mview3:TfrxMemoview;
Mvalue:String;
begin
Mvalue:=label10.Caption+edit2.Text;
Mview1:=TfrxMemoView(frxreport1.FindObject('Memo3'));
Mview2:=TfrxMemoView(frxreport1.FindObject('Memo5'));
Mview3:=TfrxMemoView(frxreport1.FindObject('Memo7'));
Mview1.Memo.Text:=Mvalue;
Mview2.Memo.Text:=label2.Caption;
Mview3.Memo.Text:=Edit1.Text;
end;
这是代码
6 个解决方案
#1
应该能看到了吧
#2
这次应该清楚了
#3
自顶,希望某位大侠帮帮我啊
#4
没太看懂,帮顶一下
#5
你是想给报表中的MEMO赋值吧,如果是的话应该这样处理
self.frxReport1.LoadFromFile('reports\统计明细表.fr3');
TfrxMemoView(frxReport1.FindObject('Memo13')).Memo.Text:=self.Edit1.Text;
TfrxMemoView(frxReport1.FindObject('Memo15')).Memo.Text:=datetostr(self.DateTimePicker5.Date);
self.frxReport1.ShowReport;
#6
路过。
#1
应该能看到了吧
#2
这次应该清楚了
#3
自顶,希望某位大侠帮帮我啊
#4
没太看懂,帮顶一下
#5
你是想给报表中的MEMO赋值吧,如果是的话应该这样处理
self.frxReport1.LoadFromFile('reports\统计明细表.fr3');
TfrxMemoView(frxReport1.FindObject('Memo13')).Memo.Text:=self.Edit1.Text;
TfrxMemoView(frxReport1.FindObject('Memo15')).Memo.Text:=datetostr(self.DateTimePicker5.Date);
self.frxReport1.ShowReport;
#6
路过。