如何用delphi的 fastreport 打印memo的内容??
展开全部
procedure TFrmProcMain.frxReportBusiGetValue(const VarName: string;
var Value: Variant);
begin
if VarName = 'ProcRemark' then
begin
Value := Memo.Text;
end;
end;
在界面上放置袜唯一个控件:frxReport,然岩悄后在onGetValue事件中写入上面的代码。
双击frxReport控件,打开打印界面设计的界面,放置一个text object 的编粗好渣辑框,在text标签页下面输入:[ProcRemark]。就可以打印了
var Value: Variant);
begin
if VarName = 'ProcRemark' then
begin
Value := Memo.Text;
end;
end;
在界面上放置袜唯一个控件:frxReport,然岩悄后在onGetValue事件中写入上面的代码。
双击frxReport控件,打开打印界面设计的界面,放置一个text object 的编粗好渣辑框,在text标签页下面输入:[ProcRemark]。就可以打印了
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询