inherited fEditorElegirPersonaContacto: TfEditorElegirPersonaContacto Left = 227 Top = 108 Caption = 'Elegir una direcciones de cliente' ClientHeight = 460 ClientWidth = 661 OldCreateOrder = True Position = poOwnerFormCenter ExplicitWidth = 667 ExplicitHeight = 492 PixelsPerInch = 96 TextHeight = 13 inherited Bevel2: TBevel Width = 661 ExplicitWidth = 661 end inherited Bevel3: TBevel Top = 416 Width = 661 ExplicitTop = 416 ExplicitWidth = 661 end inherited pnlBotones: TPanel Top = 418 Width = 661 TabOrder = 1 ExplicitTop = 418 ExplicitWidth = 661 inherited btnAceptar: TButton Left = 499 Top = 6 ExplicitLeft = 499 ExplicitTop = 6 end inherited btnCancelar: TButton Left = 578 Top = 6 ExplicitLeft = 578 ExplicitTop = 6 end end inherited pnlHeader: TPanel Width = 661 TabOrder = 2 ExplicitWidth = 661 inherited lblTitle: TLabel Width = 611 end inherited lblComments: TLabel Width = 586 Height = 27 Caption = '' ExplicitWidth = 586 end end inherited pnlCuerpo: TPanel Width = 661 Height = 350 TabOrder = 0 ExplicitWidth = 661 ExplicitHeight = 350 object DBCtrlGrid1: TDBCtrlGrid Left = 50 Top = 15 Width = 561 Height = 320 Margins.Left = 10 Margins.Top = 10 Margins.Right = 10 Margins.Bottom = 0 Align = alClient AllowDelete = False AllowInsert = False Color = clBtnFace DataSource = dsPersonas PanelHeight = 106 PanelWidth = 544 ParentColor = False TabOrder = 0 SelectedColor = clHighlight OnDblClick = DBCtrlGrid1DblClick object ePuesto: TDBText Left = 58 Top = 28 Width = 502 Height = 17 DataField = 'PUESTO' DataSource = dsPersonas Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True OnDblClick = ComponenteDblClick end object eTelefono: TDBText Left = 70 Top = 47 Width = 187 Height = 17 DataField = 'TELEFONO' DataSource = dsPersonas Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True OnDblClick = ComponenteDblClick end object eNombre: TDBText Left = 8 Top = 7 Width = 537 Height = 17 DataField = 'NOMBRE' DataSource = dsPersonas Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True OnDblClick = ComponenteDblClick end object Label1: TLabel Left = 15 Top = 28 Width = 37 Height = 13 Caption = 'Puesto:' OnDblClick = ComponenteDblClick end object Label2: TLabel Left = 15 Top = 47 Width = 46 Height = 13 Caption = 'Tel'#233'fono:' OnDblClick = ComponenteDblClick end object Label3: TLabel Left = 281 Top = 47 Width = 47 Height = 13 Caption = 'Tlf. m'#243'vil:' OnDblClick = ComponenteDblClick end object eMovil: TDBText Left = 334 Top = 47 Width = 187 Height = 17 DataField = 'MOVIL' DataSource = dsPersonas Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True OnDblClick = ComponenteDblClick end object Label4: TLabel Left = 16 Top = 66 Width = 48 Height = 13 Caption = 'N'#250'm. fax:' OnDblClick = ComponenteDblClick end object eFax: TDBText Left = 70 Top = 66 Width = 187 Height = 17 DataField = 'FAX' DataSource = dsPersonas Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True OnDblClick = ComponenteDblClick end object Label5: TLabel Left = 281 Top = 66 Width = 32 Height = 13 Caption = 'E-mail:' OnDblClick = ComponenteDblClick end object eEMail: TDBText Left = 334 Top = 66 Width = 187 Height = 17 DataField = 'EMAIL' DataSource = dsPersonas Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [fsBold] ParentFont = False Transparent = True OnDblClick = ComponenteDblClick end end end inherited ActionListDialog: TActionList inherited actAceptar: TAction Caption = '&Seleccionar' OnExecute = actAceptarExecute end inherited actCancelar: TAction OnExecute = actCancelarExecute end end object dsPersonas: TDADataSource Left = 24 Top = 286 end end