Tecsitel_FactuGES2/Source/Modulos/Contactos/Views/uViewProveedor.dfm
david b343cdea63 - Ticket #32. Añadir la columna contrato al vendedor.
- En proveedores, la descripción (tipo de material que sirve) se ha cambiado a un combobox para que sea más fácil.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@240 0c75b7a4-871f-7646-8a2f-f78d34cc349f
2008-02-05 10:08:44 +00:00

347 lines
11 KiB
Plaintext

inherited frViewProveedor: TfrViewProveedor
Width = 799
Height = 454
OnCreate = CustomViewCreate
OnDestroy = CustomViewDestroy
ExplicitWidth = 799
ExplicitHeight = 454
inherited dxLayoutControlContacto: TdxLayoutControl
Width = 799
Height = 454
ExplicitWidth = 799
ExplicitHeight = 454
inherited PngSpeedButton1: TPngSpeedButton
Left = 738
ExplicitLeft = 738
end
inherited PngSpeedButton2: TPngSpeedButton
Left = 738
ExplicitLeft = 738
end
inherited PngSpeedButton3: TPngSpeedButton
Left = 738
ExplicitLeft = 738
end
object Label1: TLabel [3]
Left = 438
Top = 307
Width = 342
Height = 26
Caption =
'(Al incluir un proveedor en la tienda, todos los materiales que ' +
'sirve ese proveedor ser'#225'n tambi'#233'n incluidos)'
WordWrap = True
end
inherited eCalle: TcxDBTextEdit
Left = 134
Top = 277
TabOrder = 8
ExplicitLeft = 134
ExplicitTop = 277
ExplicitWidth = 264
Width = 264
end
inherited eProvincia: TcxDBTextEdit
Left = 134
Top = 331
TabOrder = 11
ExplicitLeft = 134
ExplicitTop = 331
ExplicitWidth = 264
Width = 264
end
inherited ePoblacion: TcxDBTextEdit
Left = 134
Top = 304
TabOrder = 9
ExplicitLeft = 134
ExplicitTop = 304
ExplicitWidth = 163
Width = 163
end
inherited eCodigoPostal: TcxDBTextEdit
Left = 343
Top = 304
TabOrder = 10
ExplicitLeft = 343
ExplicitTop = 304
end
inherited eObservaciones: TcxDBMemo
Top = 415
TabOrder = 21
ExplicitTop = 415
ExplicitHeight = 20
Height = 20
end
object cxDBCheckBox1: TcxDBCheckBox [9]
Left = 438
Top = 280
Caption = 'Incluir este proveedor en la tienda web'
DataBinding.DataField = 'TIENDA_WEB'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.MultiLine = True
Properties.NullStyle = nssUnchecked
Properties.ValueChecked = 1
Properties.ValueUnchecked = 0
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 20
Width = 310
end
object cxDBCheckBox2: TcxDBCheckBox [10]
Left = 22
Top = 193
Caption = 'El proveedor est'#225' homologado'
DataBinding.DataField = 'HOMOLOGADO'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked
Properties.ValueChecked = 1
Properties.ValueUnchecked = 0
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 6
Width = 326
end
object eCertificaciones: TcxDBTextEdit [11]
Left = 134
Top = 220
DataBinding.DataField = 'CERTIFICACION'
DataBinding.DataSource = dsContacto
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 7
Width = 227
end
object cbGrupoProveedor: TcxDBComboBox [12]
Left = 134
Top = 136
DataBinding.DataField = 'GRUPO_PROVEEDOR'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.OnInitPopup = cbGrupoProveedorPropertiesInitPopup
Properties.OnValidate = cbGrupoProveedorPropertiesValidate
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
Style.ButtonStyle = bts3D
Style.PopupBorderStyle = epbsFrame3D
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 5
Width = 227
end
object cbDescripcionProveedor: TcxDBComboBox [13]
Left = 134
Top = 82
DataBinding.DataField = 'DESCRIPCION_PROVEEDOR'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.ImmediateUpdateText = True
Properties.OnInitPopup = cbDescripcionProveedorPropertiesInitPopup
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 3
Width = 221
end
object eCodigoAsignado: TcxDBTextEdit [14]
Left = 134
Top = 109
DataBinding.DataField = 'CODIGO_ASIGNADO'
DataBinding.DataSource = dsContacto
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 4
Width = 221
end
inherited eTlfParticular: TcxDBTextEdit
Left = 533
TabOrder = 14
ExplicitLeft = 533
ExplicitWidth = 91
Width = 91
end
inherited eTlfTrabajo: TcxDBTextEdit
Left = 533
TabOrder = 13
ExplicitLeft = 533
ExplicitWidth = 127
Width = 127
end
inherited eTlfMovil: TcxDBTextEdit
Left = 533
TabOrder = 15
ExplicitLeft = 533
ExplicitWidth = 155
Width = 155
end
inherited eFax: TcxDBTextEdit
Left = 533
TabOrder = 16
ExplicitLeft = 533
ExplicitWidth = 121
Width = 121
end
inherited eNombre: TcxDBTextEdit
Left = 134
ExplicitLeft = 134
ExplicitWidth = 221
Width = 221
end
inherited eNIFCIF: TcxDBTextEdit
Left = 217
ExplicitLeft = 217
ExplicitWidth = 205
Width = 205
end
inherited eMailTrabajo: TcxDBHyperLinkEdit
Left = 533
Properties.Prefix = 'mailto:'
TabOrder = 17
ExplicitLeft = 533
ExplicitWidth = 133
Width = 133
end
inherited eMailParticular: TcxDBHyperLinkEdit
Left = 533
Properties.Prefix = 'mailto:'
TabOrder = 18
ExplicitLeft = 533
ExplicitWidth = 133
Width = 133
end
inherited ePaginaWeb: TcxDBHyperLinkEdit
Left = 533
TabOrder = 19
ExplicitLeft = 533
ExplicitWidth = 133
Width = 133
end
inherited eReferencia: TcxDBTextEdit
Left = 134
ExplicitLeft = 134
ExplicitWidth = 38
Width = 38
end
inherited ePersonaContacto: TcxDBTextEdit
Left = 134
Top = 358
TabOrder = 12
ExplicitLeft = 134
ExplicitTop = 358
ExplicitWidth = 256
Width = 256
end
inherited dxLayoutControlContactoGroup_Root: TdxLayoutGroup
inherited dxLayoutControlContactoGroup9: TdxLayoutGroup
inherited dxLayoutControlContactoGroup4: TdxLayoutGroup
inherited dxLayoutControlContactoGroup1: TdxLayoutGroup
object dxLayoutControlContactoItem21: TdxLayoutItem
Caption = 'Proveedor de...:'
Control = cbDescripcionProveedor
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem24: TdxLayoutItem
Caption = 'C'#243'digo de cliente:'
Control = eCodigoAsignado
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem20: TdxLayoutItem
Caption = 'Grupo de proveedor'
Control = cbGrupoProveedor
ControlOptions.ShowBorder = False
end
end
object dxLayoutControlContactoGroup14: TdxLayoutGroup [1]
Caption = 'Homologaci'#243'n'
object dxLayoutControlContactoItem22: TdxLayoutItem
Caption = 'El proveedor est'#225' homologado'
ShowCaption = False
Control = cxDBCheckBox2
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem23: TdxLayoutItem
Caption = 'Tipo de homologaci'#243'n:'
Control = eCertificaciones
ControlOptions.ShowBorder = False
end
end
end
inherited dxLayoutControlContactoGroup6: TdxLayoutGroup
object dxLayoutControlContactoGroup10: TdxLayoutGroup
Caption = 'Tienda web'
Visible = False
object dxLayoutControlContactoItem19: TdxLayoutItem
ShowCaption = False
Control = cxDBCheckBox1
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem16: TdxLayoutItem
ShowCaption = False
Control = Label1
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
end
end
end
end
end
inherited dsContacto: TDADataSource
Left = 32
Top = 88
end
end