Selecting Paper Bins for Each Page
Hi ,
I am printing a multiple page report and trying to change bin on fly. it
works with simple example , But when I try to print a complex report it does
not happen - OnStartPage I am assigning the Bin but by the time I reach
OnEndPage I see the Default BinName. Any Clue will be appriciated
* I am loading the Templete on run time.
Thanks
Lavlesh Lamba
I am printing a multiple page report and trying to change bin on fly. it
works with simple example , But when I try to print a complex report it does
not happen - OnStartPage I am assigning the Bin but by the time I reach
OnEndPage I see the Default BinName. Any Clue will be appriciated
* I am loading the Templete on run time.
Thanks
Lavlesh Lamba
This discussion has been closed.
Comments
When loading templates you will need to use the template events to change
the report settings for each template. Check out the article below for more
information on using the included template events.
----------------------------------------------
Tech Tip: Using Template Events
----------------------------------------------
The Report.Template object has several events that can be used for
customizing what happens when a report is loaded or saved:
- OnLoadStart
- OnLoadEnd
- OnNew
- OnSaveStart
- OnSaveEnd
The OnLoadEnd and OnNew events are often used to perform actions related to
report and data initialization.
The OnSaveEnd event is often used to save additional descriptive ("meta")
data to the database each time the report is saved.
Example:
The Report.Template events are public and therefore must be assigned at
run-time.
1. In the private section of your form declaration you can declare an
event-handler method:
TForm = class(TForm)
private
procedure myTemplateOnLoadEndEvent(Sender: TObject);
public
end;
2. In the Form.OnCreate event, you can assign the event-handler to the
event:
procedure TForm1.FormCreate(Sender: TObject);
begin
ppReport1.Template.OnLoadEnd := myTemplateOnLoadEndEvent;
end;
3. Implement the event-handler method:
procedure TForm1.myTemplateOnLoadEndEvent(Sender: TObject);
begin
{add code here to initialize the report or data, etc. }
ppReport1.PrinterSetup.MarginTop := 0.5;
end;
--
Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com