inherited frConexionBD: TfrConexionBD Visible = True ExplicitWidth = 451 ExplicitHeight = 304 object GroupBox1: TGroupBox Left = 8 Top = 8 Width = 375 Height = 185 Caption = 'Servidor de base de datos' TabOrder = 0 DesignSize = ( 375 185) object Label1: TLabel Left = 18 Top = 30 Width = 100 Height = 13 Caption = 'Nombre del servidor:' end object Label3: TLabel Left = 18 Top = 61 Width = 72 Height = 13 Caption = 'Base de datos:' end object Label4: TLabel Left = 18 Top = 118 Width = 36 Height = 13 Caption = 'Usuario' end object Label5: TLabel Left = 18 Top = 148 Width = 60 Height = 13 Caption = 'Contrase'#241'a:' end object Bevel1: TBevel Left = 16 Top = 88 Width = 343 Height = 10 Anchors = [akLeft, akTop, akRight] Shape = bsBottomLine end object edtServer: TEdit Left = 128 Top = 24 Width = 231 Height = 21 Anchors = [akLeft, akTop, akRight] TabOrder = 0 Text = 'localhost' end object edtUser: TEdit Left = 128 Top = 112 Width = 116 Height = 21 Anchors = [akLeft, akTop, akRight] TabOrder = 2 end object edtPassword: TEdit Left = 128 Top = 144 Width = 116 Height = 21 Anchors = [akLeft, akTop, akRight] PasswordChar = '*' TabOrder = 3 end object edtBD: TEdit Left = 128 Top = 57 Width = 231 Height = 21 TabOrder = 1 end end object bProbar: TButton Left = 240 Top = 200 Width = 143 Height = 25 Caption = 'Probar la conexi'#243'n' TabOrder = 1 OnClick = bProbarClick end object ADOConnection: TADOConnection LoginPrompt = False Mode = cmRead Provider = 'SQLOLEDB.1' Left = 48 Top = 200 end end