第一种：名称为 Memo31.text 的文本只在第一页打印
procedure Memo1OnBeforePrint(Sender: TfrxComponent);
begin
if
= 1 then
Memo31.text:='xx公司';
end;
begin
end.
-------------------------------分界线----------------------------
第二种：名称为 Memo31.text 的文本第一页不打印，其他页面打印
procedure Memo1OnBeforePrint(Sender: TfrxComponent);
begin
if <> 1 then
Memo31.text:='xx公司';
end;
begin
end.
-------------------------------分界线----------------------------
第三种：名称为 Memo31.text 的文本只在第二页打印
procedure Memo1OnBeforePrint(Sender: TfrxComponent);
begin
if = 2 then
Memo31.text:='xx公司';
end;
begin
end.
售前咨询专员
