Tecsitel_FactuGES2/Source/Modulos/Pedidos a proveedor/Views/uViewDireccionEntregaPedidoProv.dfm

inherited frViewDireccionEntregaPedidoProv: TfrViewDireccionEntregaPedidoProv
  Width = 484
  Height = 240
  ExplicitWidth = 484
  ExplicitHeight = 240
  object dxLayoutControl1: TdxLayoutControl
    Left = 0
    Top = 0
    Width = 484
    Height = 240
    Align = alClient
    ParentBackground = True
    TabOrder = 0
    TabStop = False
    AutoContentSizes = [acsWidth, acsHeight]
    DesignSize = (
      484
      240)
    object Bevel1: TBevel
      Left = 10
      Top = 178
      Width = 566
      Height = 2
      Shape = bsTopLine
    end
    object lblObra: TLabel
      Left = 247
      Top = 37
      Width = 15
      Height = 13
      Align = alClient
      Caption = '     '
    end
    object rdxDestino1: TRadioButton
      Left = 10
      Top = 12
      Width = 175
      Height = 17
      Action = actListaAlmacenes
      TabOrder = 0
      TabStop = True
    end
    object rdxDestino3: TRadioButton
      Left = 10
      Top = 63
      Width = 566
      Height = 17
      Action = actOtro
      TabOrder = 3
    end
    object cbListaAlmacenes: TcxDBLookupComboBox
      Left = 206
      Top = 10
      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
      Properties.OnValidate = cbListaAlmacenesPropertiesValidate
      Style.BorderColor = clWindowFrame
      Style.BorderStyle = ebs3D
      Style.HotTrack = False
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      Style.PopupBorderStyle = epbsFrame3D
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.LookAndFeel.SkinName = ''
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.SkinName = ''
      StyleHot.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.SkinName = ''
      TabOrder = 1
      Width = 551
    end
    object bModificar: TBitBtn
      Left = 346
      Top = 142
      Width = 128
      Height = 25
      Caption = 'Modificar la direcci'#243'n...'
      TabOrder = 5
      OnClick = bModificarClick
    end
    object txtDireccion: TStaticText
      Left = 25
      Top = 86
      Width = 882
      Height = 47
      AutoSize = False
      BevelKind = bkFlat
      TabOrder = 4
      OnDblClick = txtDireccionDblClick
    end
    object rdxDestino2: TRadioButton
      Left = 10
      Top = 37
      Width = 231
      Height = 17
      Action = actListaObras
      TabOrder = 2
    end
    object edtEntregarA: TcxDBButtonEdit
      Left = 10
      Top = 209
      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.BorderStyle = ebs3D
      Style.Color = clWindow
      Style.LookAndFeel.Kind = lfStandard
      Style.LookAndFeel.NativeStyle = True
      Style.LookAndFeel.SkinName = ''
      Style.ButtonStyle = bts3D
      StyleDisabled.LookAndFeel.Kind = lfStandard
      StyleDisabled.LookAndFeel.NativeStyle = True
      StyleDisabled.LookAndFeel.SkinName = ''
      StyleFocused.LookAndFeel.Kind = lfStandard
      StyleFocused.LookAndFeel.NativeStyle = True
      StyleFocused.LookAndFeel.SkinName = ''
      StyleHot.LookAndFeel.Kind = lfStandard
      StyleHot.LookAndFeel.NativeStyle = True
      StyleHot.LookAndFeel.SkinName = ''
      TabOrder = 6
      Width = 334
    end
    object dxLayoutGroup1: TdxLayoutGroup
      ShowCaption = False
      Hidden = True
      ShowBorder = False
      object dxLayoutControl1Group1: TdxLayoutGroup
        ShowCaption = False
        Hidden = True
        ShowBorder = False
        object dxLayoutControl1Group2: TdxLayoutGroup
          ShowCaption = False
          Hidden = True
          LayoutDirection = ldHorizontal
          ShowBorder = False
          object dxLayoutItem1: TdxLayoutItem
            AutoAligns = [aaHorizontal]
            AlignVert = avCenter
            Caption = 'New Item'
            ShowCaption = False
            Control = rdxDestino1
            ControlOptions.AutoColor = True
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Item3: TdxLayoutItem
            AutoAligns = [aaVertical]
            AlignHorz = ahClient
            Caption = 'New Item'
            Offsets.Left = 15
            ShowCaption = False
            Control = cbListaAlmacenes
            ControlOptions.ShowBorder = False
          end
        end
        object dxLayoutControl1Group3: TdxLayoutGroup
          ShowCaption = False
          Hidden = True
          LayoutDirection = ldHorizontal
          ShowBorder = False
          object dxLayoutControl1Item4: TdxLayoutItem
            AutoAligns = [aaHorizontal]
            AlignVert = avCenter
            ShowCaption = False
            Control = rdxDestino2
            ControlOptions.AutoColor = True
            ControlOptions.ShowBorder = False
          end
          object dxLayoutControl1Item6: TdxLayoutItem
            Caption = 'Label1'
            ShowCaption = False
            Control = lblObra
            ControlOptions.AutoColor = True
            ControlOptions.ShowBorder = False
          end
        end
      end
      object dxLayoutControl1Item2: TdxLayoutItem
        AutoAligns = [aaHorizontal]
        Caption = 'New Item'
        Offsets.Top = 3
        ShowCaption = False
        Control = rdxDestino3
        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'
        Offsets.Bottom = 5
        Offsets.Top = 5
        ShowCaption = False
        Control = Bevel1
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item7: TdxLayoutItem
        Caption = 'Entregar este pedido a la persona de contacto:'
        CaptionOptions.Layout = clTop
        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 direcci'#243'n de 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