inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv Width = 569 Height = 225 OnShow = CustomViewShow ExplicitWidth = 569 ExplicitHeight = 225 object dxLayoutControl1: TdxLayoutControl Left = 0 Top = 0 Width = 569 Height = 225 Align = alClient ParentBackground = True TabOrder = 0 TabStop = False AutoContentSizes = [acsWidth, acsHeight] DesignSize = ( 569 225) 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 bModificar: TBitBtn Left = 431 Top = 190 Width = 128 Height = 25 Caption = 'Modificar la direcci'#243'n...' TabOrder = 4 OnClick = bModificarClick end object txtDireccion: TStaticText Left = 10 Top = 83 Width = 549 Height = 110 AutoSize = False BevelKind = bkFlat TabOrder = 3 OnDblClick = txtDireccionDblClick 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 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 = 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