unit uViewBarraSeleccion; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uViewBase, StdCtrls, ActnList, ExtCtrls, JvExStdCtrls, JvButton, JvCtrls, JvFooter, JvExExtCtrls, JvComponent, JvExtComponent; type TfrViewBarraSeleccion = class(TfrViewBase) JvFooter1: TJvFooter; bSeleccionar: TJvFooterBtn; bCancelar: TJvFooterBtn; BarraSeleccionActionList: TActionList; actSeleccionar: TAction; actCancelar: TAction; private { Private declarations } public { Public declarations } end; implementation {$R *.dfm} end.