how to create an event onbeforeprint in runtime

Comments

• gpi

  October 2011 edited 7:03PM

  If you want to use OnBeforePrint event in Delphi's code - use TfrxReport.OnBeforePrint event
• Fernando Medeiros

  October 2011 edited 7:03PM

  i have the same question...
  
  code:
  

  masterdata := tfrxmasterdata.create(frxreportpage);
    ............
    ...............
  
    masterdata.OnBeforePrint := my_before_print_event(nil);
  

  
  but... do not work [img]style_emoticons/<#EMO_DIR#>/sad.gif" style="vertical-align:middle" emoid=":(" border="0" alt="sad.gif" /> any idea?[/img]
• gpi

  October 2011 edited 7:03PM

  I have the same answer

  wrote:

  If you want to use OnBeforePrint event in Delphi's code - use TfrxReport.OnBeforePrint event

  You can assign TfrxMasterData.OnBeforePrint with script event only
• Fernando Medeiros

  October 2011 edited 7:03PM

  gpi wrote: »

  I have the same answer

  gpi wrote: »

  If you want to use OnBeforePrint event in Delphi's code - use TfrxReport.OnBeforePrint event

  You can assign TfrxMasterData.OnBeforePrint with script event only

  
  thanks gpi,
  but dont work.
• Fernando Medeiros

  October 2011 edited 7:03PM

  my code:
  
  
  
  unit classerelatorio;
  
  interface
  
  uses ....
  
  type
  
  trelatorio = class(tobject)
  
  procedure add_detail;
  ...
  ...
  ...
  private
  procedure masterdata1onbeforeprint(sender: tfrxcomponent);
  public
  end;
  ...
  var
  relatorio : trelatorio;
  
  implementation
  
  uses
  
  ...
  
  procedure trelatorio.add_detail;
  var
  masterdata : tfrxmasterdata;
  begin
  masterdata := tfrxmasterdata.create(frxreportpage);
  masterdata.name := 'masterdata1';
  masterdata.dataset := dataset;
  masterdata.onbeforeprint := 'masterdata1onbeforeprint'; // its correct ???
  end;
  
  procedure masterdata1onbeforeprint(sender:tfrxcomponent);
  begin
  // code....
  end;
  
  
  
  
  
• gpi

  October 2011 edited 7:03PM

  wrote:

  masterdata.onbeforeprint := 'masterdata1onbeforeprint'; // its correct ???

  Yes, but masterdata1onbeforeprint event should be placed in script code, not in Delphi code
• Fernando Medeiros

  October 2011 edited 7:03PM

  Thanks GPI
  
  in the tfsscript ?
  
  any example ?
• galdariah

  October 2011 edited 7:03PM

  When you say script, did you mean this?

  FR.png 45.4K
• gordk St.Catherines On. Canada.

  October 2011 edited 7:03PM

  When building reports from delphi code you can create events for the internal report script and connect them to objects.
  here is a sample.
  

  adding_vars_and_events.zip 885B
• Fernando Medeiros

  October 2011 edited 7:03PM

  thanks gordk...
  Very pleased with your help.
• Fernando Medeiros

  October 2011 edited 7:03PM

  gpi wrote: »

  gpi wrote: »

  masterdata.onbeforeprint := 'masterdata1onbeforeprint'; // its correct ???

  Yes, but masterdata1onbeforeprint event should be placed in script code, not in Delphi code

  
  thank you gpi
  
• Fernando Medeiros

  October 2011 edited 7:03PM

  gordk wrote: »

  When building reports from delphi code you can create events for the internal report script and connect them to objects.
  here is a sample.
  

  
  
  its running [img]style_emoticons/<#EMO_DIR#>/cool.gif" style="vertical-align:middle" emoid="B)" border="0" alt="cool.gif" /> thanks gordk, gpi and galdariah[/img]
• keturpatel India

  May 2012 edited May 2012

  gordk wrote: »

  When building reports from delphi code you can create events for the internal report script and connect them to objects.
  here is a sample.
  

  
  I'm trying to add event to memoview at runtime, but cannot find way to assign event.
  
  I'm using VB6 and creating report at runtime with several memoviews.
  I have added script to report object, which has some variables and procedures.
  
  Now i want to assign one of script procedure to obp event of memoview.
  but cant find way to do so. my fastreport version is 4.9
  
  Please help me.
  Thanks in advance.