Need Help - FR print multiple copies

James Chai

There is a special requirements for my report where it need to be printed as 3 copies.
Each copy needs a special indicator like "ORIGINAL" , "DUPLICATE", "COPY"
I have been trying it for many days but still unable to get it done, can anyone help ?

Thank you so much.

gpi

Use CopyName# report variable

James Chai

gpi wrote: »

Use CopyName# report variable

Hi, I have just tried, but it seem doesn't works

procedure mmWaterMark1OnBeforePrint(Sender: TfrxComponent);
begin
if <CopyName#> = 1 then mmWaterMark1.Text := 'ORIGINAL';
if <CopyName#> = 2 then mmWaterMark1.Text := 'DUPLICATE';
if <CopyName#> = 3 then mmWaterMark1.Text := 'COPY';
end;

gpi

See FRDemo:

- put a memo object with [CopyName#] text inside. It will show a copy name;

- go "Code" tab and write a simple script that will give names to each copy.

begin
  frxGlobalVariables['CopyName0'] := '';             // copy viewed in the preview
  frxGlobalVariables['CopyName1'] := 'First copy';   // 1st printed/exported copy
  frxGlobalVariables['CopyName2'] := 'Second copy';  // 2nd printed copy
  frxGlobalVariables['CopyName3'] := 'Third copy';   // 3rd printed copy
end.

You can also do this in Delphi code;

James Chai

gpi wrote: »

See FRDemo:

- put a memo object with [CopyName#] text inside. It will show a copy name;

- go "Code" tab and write a simple script that will give names to each copy.

begin
  frxGlobalVariables['CopyName0'] := '';             // copy viewed in the preview
  frxGlobalVariables['CopyName1'] := 'First copy';   // 1st printed/exported copy
  frxGlobalVariables['CopyName2'] := 'Second copy';  // 2nd printed copy
  frxGlobalVariables['CopyName3'] := 'Third copy';   // 3rd printed copy
end.

You can also do this in Delphi code;

It is now working, thank you so much!