AbetoDesign_FactuGES2/Source/Modulos/Albaranes de proveedor/Views/uViewDireccionEntregaAlbaranProv.dfm
2021-02-07 17:20:37 +00:00

156 lines
4.3 KiB
Plaintext

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