Добавление события компаненте в Run-time

salexn

Как добавить события компоненте в Run-timeю Например мне нужно линию печатать в самом низу, но только после того как просчитается высота бэнда. В design -time нельзя , т.к. отчет динамический. На всю ширину также нельзя, т.к. должна быть линия определенной длины. Че делать

-=Serg=-

А теперь разъясните подробнее и по-русски

salexn

По-русски :-)
1. Я создаю отчет в run-time, т.е. при помощи кода.
2. Возникла необходимость для некоторых TfrxView добавить событие на OnBeforePrint.
Как это сделать? Во 2-м Fast можно было сделать просто Script.Add( some code...). Здесь так не получается.

AlexTZ

frxReport1.Script.Text := 'procedure Memo1BeforePrint(Sender: TfrxComponent); begin ... end; begin end.';
TfrxMemoView(frxReport1.FindObject('Memo1')).OnBeforePrint := 'Memo1BeforePrint';