inherited frViewDireccionEntregaPedidoProv: TfrViewDireccionEntregaPedidoProv
  Width = 586
  Height = 476
  ExplicitWidth = 586
  ExplicitHeight = 476
  object dxLayoutControl1: TdxLayoutControl
    Left = 0
    Top = 0
    Width = 586
    Height = 476
    Align = alClient
    ParentBackground = True
    TabOrder = 0
    AutoContentSizes = [acsWidth, acsHeight]
    DesignSize = (
      586
      476)
    object Bevel1: TBevel
      Left = 10
      Top = 434
      Width = 529
      Height = 5
      Shape = bsBottomLine
    end
    object rdxDestino1: TRadioButton
      Left = 10
      Top = 10
      Width = 255
      Height = 17
      Action = actListaAlmacenes
      TabOrder = 0
      TabStop = True
    end
    object rdxDestino2: TRadioButton
      Left = 10
      Top = 110
      Width = 287
      Height = 17
      Action = actOtro
      TabOrder = 4
    end
    object cbListaAlmacenes: TcxDBLookupComboBox
      Left = 25
      Top = 33
      Anchors = [akLeft, akTop, akRight]
      DataBinding.DataField = 'ID_ALMACEN'
      DataBinding.DataSource = dsPedido
      Properties.DropDownListStyle = lsFixedList
      Properties.ImmediatePost = True
      Properties.KeyFieldNames = 'ID'
      Properties.ListColumns = <
        item
          FieldName = 'NOMBRE'
        end>
      Properties.ListOptions.AnsiSort = True
      Properties.ListOptions.GridLines = glNone
      Properties.ListOptions.ShowHeader = False
      Properties.ListOptions.SyncMode = True
      Properties.ListSource = dsAlmacenes
      Properties.PostPopupValueOnTab = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.ButtonStyle = bts3D
      Style.PopupBorderStyle = epbsFrame3D
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 1
      Width = 425
    end
    object bModificar: TBitBtn
      Left = 448
      Top = 403
      Width = 128
      Height = 25
      Caption = 'Modificar la direcci'#243'n...'
      TabOrder = 6
      OnClick = bModificarClick
    end
    object txtDireccion: TStaticText
      Left = 25
      Top = 133
      Width = 551
      Height = 177
      AutoSize = False
      BevelKind = bkFlat
      TabOrder = 5
      OnDblClick = txtDireccionDblClick
    end
    object RadioButton1: TRadioButton
      Left = 10
      Top = 60
      Width = 566
      Height = 17
      Action = actListaObras
      TabOrder = 2
    end
    object cbListaObras: TcxDBLookupComboBox
      Left = 25
      Top = 83
      Anchors = [akLeft, akTop, akRight]
      DataBinding.DataField = 'ID_OBRA'
      DataBinding.DataSource = dsPedido
      Properties.DropDownListStyle = lsFixedList
      Properties.ImmediatePost = True
      Properties.KeyFieldNames = 'ID'
      Properties.ListColumns = <
        item
          FieldName = 'NOMBRE'
        end>
      Properties.ListOptions.AnsiSort = True
      Properties.ListOptions.GridLines = glNone
      Properties.ListOptions.ShowHeader = False
      Properties.ListOptions.SyncMode = True
      Properties.ListSource = dsObras
      Properties.PostPopupValueOnTab = True
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.ButtonStyle = bts3D
      Style.PopupBorderStyle = epbsFrame3D
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 3
      Width = 551
    end
    object edtEntregarA: TcxDBButtonEdit
      Left = 70
      Top = 445
      DataBinding.DataField = 'PERSONA_CONTACTO'
      DataBinding.DataSource = dsPedido
      Properties.Buttons = <
        item
          Default = True
          Kind = bkEllipsis
        end>
      Properties.ReadOnly = True
      Properties.OnButtonClick = edtEntregarAPropertiesButtonClick
      Style.BorderColor = clWindowFrame
      Style.Color = clWindow
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      StyleDisabled.LookAndFeel.Kind = lfStandard
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.Kind = lfStandard
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.Kind = lfStandard
      StyleHot.LookAndFeel.NativeStyle = True
      TabOrder = 7
      Width = 121
    end
    object dxLayoutGroup1: TdxLayoutGroup
      ShowCaption = False
      Hidden = True
      ShowBorder = False
      object dxLayoutItem1: TdxLayoutItem
        Caption = 'New Item'
        ShowCaption = False
        Control = rdxDestino1
        ControlOptions.AutoColor = True
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item3: TdxLayoutItem
        Caption = 'New Item'
        Offsets.Left = 15
        ShowCaption = False
        Control = cbListaAlmacenes
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item4: TdxLayoutItem
        ShowCaption = False
        Control = RadioButton1
        ControlOptions.AutoColor = True
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item6: TdxLayoutItem
        Offsets.Left = 15
        ShowCaption = False
        Control = cbListaObras
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item2: TdxLayoutItem
        Caption = 'New Item'
        ShowCaption = False
        Control = rdxDestino2
        ControlOptions.AutoColor = True
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item5: TdxLayoutItem
        AutoAligns = [aaHorizontal]
        AlignVert = avClient
        Caption = 'StaticText1'
        Offsets.Left = 15
        ShowCaption = False
        Control = txtDireccion
        ControlOptions.AutoColor = True
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item1: TdxLayoutItem
        AutoAligns = [aaVertical]
        AlignHorz = ahRight
        Offsets.Left = 15
        ShowCaption = False
        Control = bModificar
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item8: TdxLayoutItem
        Caption = 'Bevel1'
        ShowCaption = False
        Control = Bevel1
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item7: TdxLayoutItem
        Caption = 'Entregar a:'
        Control = edtEntregarA
        ControlOptions.ShowBorder = False
      end
    end
  end
  object ActionList1: TActionList
    Left = 384
    Top = 8
    object actListaAlmacenes: TAction
      Caption = 'Recibir el pedido en el almac'#233'n:'
      Checked = True
      GroupIndex = 1
      OnExecute = actListaAlmacenesExecute
    end
    object actOtro: TAction
      Caption = 'Recibir el pedido en esta otra direcci'#243'n:'
      GroupIndex = 1
      OnExecute = actOtroExecute
    end
    object actListaObras: TAction
      Caption = 'Recibir el pedido en la obra:'
      GroupIndex = 1
      OnExecute = actListaObrasExecute
    end
  end
  object dsPedido: TDADataSource
    Left = 352
    Top = 8
  end
  object dsAlmacenes: TDADataSource
    Left = 320
    Top = 8
  end
  object dsObras: TDADataSource
    Left = 288
    Top = 8
  end
end