Tecsitel_FactuGES2/Source/Modulos/Albaranes de proveedor/Views/uViewDireccionEntregaAlbaranProv.dfm

inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv
  Width = 785
  Height = 515
  ExplicitWidth = 785
  ExplicitHeight = 515
  object dxLayoutControl1: TdxLayoutControl
    Left = 0
    Top = 0
    Width = 785
    Height = 515
    Align = alClient
    ParentBackground = True
    TabOrder = 0
    TabStop = False
    AutoContentSizes = [acsWidth, acsHeight]
    DesignSize = (
      785
      515)
    object rdxDestino1: TRadioButton
      Left = 10
      Top = 10
      Width = 765
      Height = 17
      Action = actLista
      Caption = 'Recibir el albar'#225'n en el almac'#233'n:'
      TabOrder = 0
      TabStop = True
    end
    object rdxDestino2: TRadioButton
      Left = 10
      Top = 110
      Width = 765
      Height = 17
      Action = actOtro
      Caption = 'Recibir el albar'#225'n en esta otra direcci'#243'n:'
      TabOrder = 4
    end
    object cbLista: TcxDBLookupComboBox
      Left = 10
      Top = 33
      Anchors = [akLeft, akTop, akRight]
      DataBinding.DataField = 'ID_ALMACEN'
      DataBinding.DataSource = dsAlbaran
      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.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 = 765
    end
    object bModificar: TBitBtn
      Left = 647
      Top = 480
      Width = 128
      Height = 25
      Caption = 'Modificar la direcci'#243'n...'
      TabOrder = 6
      OnClick = bModificarClick
    end
    object txtDireccion: TStaticText
      Left = 10
      Top = 133
      Width = 765
      Height = 341
      AutoSize = False
      BevelKind = bkFlat
      TabOrder = 5
      OnDblClick = txtDireccionDblClick
    end
    object cbListaObras: TcxDBLookupComboBox
      Left = 10
      Top = 83
      Anchors = [akLeft, akTop, akRight]
      DataBinding.DataField = 'ID_ALMACEN'
      DataBinding.DataSource = dsAlbaran
      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
      Properties.OnValidate = cbListaObrasPropertiesValidate
      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 = 3
      Width = 765
    end
    object RadioButton1: TRadioButton
      Left = 10
      Top = 60
      Width = 765
      Height = 17
      Action = actListaObras
      TabOrder = 2
    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'
        ShowCaption = False
        Control = cbLista
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item6: TdxLayoutItem
        ShowCaption = False
        Control = RadioButton1
        ControlOptions.AutoColor = True
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item5: TdxLayoutItem
        Control = cbListaObras
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item2: TdxLayoutItem
        Caption = 'New Item'
        ShowCaption = False
        Control = rdxDestino2
        ControlOptions.AutoColor = True
        ControlOptions.ShowBorder = False
      end
      object dxLayoutControl1Item4: TdxLayoutItem
        AutoAligns = [aaHorizontal]
        AlignVert = avClient
        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
    end
  end
  object ActionList1: TActionList
    Left = 224
    Top = 8
    object actLista: TAction
      Caption = 'Recibir el pedido en el almac'#233'n:'
      Checked = True
      GroupIndex = 1
      OnExecute = actListaExecute
    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 albar'#225'n en la obra:'
      GroupIndex = 1
      OnExecute = actListaObrasExecute
    end
  end
  object dsAlbaran: TDADataSource
    Left = 264
    Top = 8
  end
  object dsAlmacenes: TDADataSource
    Left = 304
    Top = 8
  end
  object dsObras: TDADataSource
    Left = 344
    Top = 8
  end
end