Ref.: ppBeforePrint

rbuser

Hello,

As I can associate the event BeforePrint of the ppDetailBand in time of
execution example:

{*******************************************************************}
type
TForm1 = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
procedure Myprocedure(Sender: TObject);
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

{ TForm1 }

procedure TForm1.Myprocedure(Sender: TObject);
begin
ShowMessage('Rum Procedure!');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
Button1.OnClick := Myprocedure;
end;

{*******************************************************************}


Thank you

Ivan B. Moreno

nicocizik

Ivan,

I gave an answer to this question in your previous post. You can follow up
here if you like.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com