inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv Height = 175 ExplicitHeight = 175 object dxLayoutControl1: TdxLayoutControl Left = 0 Top = 0 Width = 445 Height = 175 Align = alClient ParentBackground = True TabOrder = 0 AutoContentSizes = [acsWidth, acsHeight] DesignSize = ( 445 175) object rdxDestino1: TRadioButton Left = 10 Top = 10 Width = 255 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 = 60 Width = 287 Height = 17 Action = actOtro Caption = 'Recibir el albar'#225'n en esta otra direcci'#243'n:' TabOrder = 2 end object cbLista: TcxDBLookupComboBox Left = 25 Top = 33 Anchors = [akLeft, akTop, akRight] DataBinding.DataField = 'ID_ALMACEN' DataBinding.DataSource = dsAlbaran Properties.DropDownListStyle = lsFixedList Properties.GridMode = True 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.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 memDireccion: TcxMemo Left = 25 Top = 83 Anchors = [akLeft, akTop, akRight] Properties.ReadOnly = True Properties.ScrollBars = ssVertical Style.BorderColor = clWindowFrame Style.BorderStyle = ebs3D Style.HotTrack = False Style.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True TabOrder = 3 OnDblClick = memDireccionDblClick Height = 71 Width = 272 end object bModificar: TBitBtn Left = 25 Top = 140 Width = 67 Height = 25 Caption = 'Modificar...' TabOrder = 4 OnClick = bModificarClick 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 = cbLista ControlOptions.ShowBorder = False end object dxLayoutControl1Item2: TdxLayoutItem Caption = 'New Item' ShowCaption = False Control = rdxDestino2 ControlOptions.AutoColor = True ControlOptions.ShowBorder = False end object dxLayoutControl1Group1: TdxLayoutGroup AutoAligns = [aaHorizontal] AlignVert = avClient ShowCaption = False Hidden = True ShowBorder = False object dxLayoutControl1Item4: TdxLayoutItem AutoAligns = [] AlignHorz = ahClient AlignVert = avClient Caption = 'New Item' Offsets.Left = 15 ShowCaption = False Control = memDireccion ControlOptions.ShowBorder = False end object dxLayoutControl1Item1: TdxLayoutItem AutoAligns = [aaVertical] Offsets.Left = 15 ShowCaption = False Control = bModificar ControlOptions.ShowBorder = False end end end end object ActionList1: TActionList Left = 40 Top = 16 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 end object dsAlbaran: TDADataSource Left = 8 Top = 16 end object dsAlmacenes: TDADataSource Left = 8 Top = 48 end end