AbetoDesign_FactuGES2/Source/Modulos/Contactos/Views/uEditorElegirPersonaContacto.dfm

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