object fUsuarios: TfUsuarios Left = 490 Top = 417 BorderStyle = bsDialog Caption = 'Administraci'#243'n de usuarios' ClientHeight = 401 ClientWidth = 550 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Grid: TDBGrid Left = 8 Top = 40 Width = 425 Height = 313 DataSource = DADataSource TabOrder = 0 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = clWindowText TitleFont.Height = -11 TitleFont.Name = 'MS Sans Serif' TitleFont.Style = [] end object JvNavPanelHeader1: TJvNavPanelHeader Left = 0 Top = 0 Width = 550 Align = alTop Caption = 'Panel de control' Font.Charset = DEFAULT_CHARSET Font.Color = clWindow Font.Height = -16 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False ColorFrom = 8684164 ColorTo = 8684164 ImageIndex = 0 StyleManager = dmBase.StyleManager ParentStyleManager = False end object Button1: TButton Left = 448 Top = 40 Width = 91 Height = 25 Action = actNuevo TabOrder = 2 end object Button2: TButton Left = 448 Top = 136 Width = 91 Height = 25 Action = actModificar TabOrder = 3 end object Button3: TButton Left = 448 Top = 176 Width = 91 Height = 25 Action = actEliminar TabOrder = 4 end object Button4: TButton Left = 448 Top = 368 Width = 91 Height = 25 Action = actCerrar TabOrder = 5 end object Button5: TButton Left = 448 Top = 96 Width = 91 Height = 25 Action = actCambiarPassword TabOrder = 6 end object DADataSource: TDADataSource Left = 368 Top = 40 end object ActionList: TActionList Left = 8 Top = 360 object actCerrar: TAction Caption = '&Cerrar' OnExecute = actCerrarExecute end object actNuevo: TAction Caption = 'Nuevo usuario' OnUpdate = actNuevoUpdate end object actCambiarPassword: TAction Caption = 'Cambiar contrase'#241'a' OnUpdate = actCambiarPasswordUpdate end object actModificar: TAction Caption = 'Modificar usuario' OnUpdate = actModificarUpdate end object actEliminar: TAction Caption = 'Eliminar usuario' OnUpdate = actEliminarUpdate end end end