TBandInfoEvent = procedure (Sender: TObject; Control: TControl; var Insets: TRect; var PreferredSize, RowCount: Integer) of object;
(Sender: TObject; Control: TControl; var Insets: TRect; var PreferredSize, RowCount: Integer) ( TBandInfoEvent)();
ExtCtrls
This is type ExtCtrls.TBandInfoEvent.