Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
cde55cdfcd
Tecsitel_FactuGES2/Source/Modulos/Obras/Views/uViewObra.dfm
david e94ba43e81 - Proveedores: indicar si es subcontrata o no. 
- Contactos: lista de personal asociado a un contacto (en clientes y proveedores).
- Obras: poder indicar una subcontrata
- Pedidos a proveedor: usar obras como destino del pedido.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@350 0c75b7a4-871f-7646-8a2f-f78d34cc349f
2008-03-24 20:50:41 +00:00

458 lines
15 KiB
Plaintext
Raw Blame History

inherited frViewObra: TfrViewObra
Width = 838
Height = 585
Align = alClient
AutoSize = True
ExplicitWidth = 451
ExplicitHeight = 304
object dxLayoutControlObra: TdxLayoutControl
Left = 0
Top = 0
Width = 838
Height = 585
Align = alClient
ParentBackground = True
TabOrder = 0
AutoContentSizes = [acsWidth, acsHeight]
ExplicitWidth = 451
ExplicitHeight = 304
DesignSize = (
838
585)
object eNombre: TcxDBTextEdit
Left = 130
Top = 34
Anchors = [akLeft, akTop, akRight]
DataBinding.DataField = 'NOMBRE'
DataBinding.DataSource = DADataSource
Properties.ValidateOnEnter = True
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.Color = 14745599
Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 0
Width = 204
end
object ePersonaContacto: TcxDBTextEdit
Left = 130
Top = 61
Anchors = [akLeft, akTop, akRight]
DataBinding.DataField = 'PERSONA_CONTACTO'
DataBinding.DataSource = DADataSource
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 = 1
Width = 204
end
object eTlfTelefono: TcxDBTextEdit
Left = 130
Top = 199
DataBinding.DataField = 'TELEFONO'
DataBinding.DataSource = DADataSource
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 = 6
Width = 173
end
object eTlfMovil: TcxDBTextEdit
Left = 130
Top = 226
DataBinding.DataField = 'MOVIL'
DataBinding.DataSource = DADataSource
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 = 7
Width = 173
end
object eFax: TcxDBTextEdit
Left = 130
Top = 253
DataBinding.DataField = 'FAX'
DataBinding.DataSource = DADataSource
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 = 8
Width = 173
end
object eCalle: TcxDBTextEdit
Left = 130
Top = 118
DataBinding.DataField = 'CALLE'
DataBinding.DataSource = DADataSource
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 = 2
Width = 278
end
object ePoblacion: TcxDBTextEdit
Left = 130
Top = 145
DataBinding.DataField = 'POBLACION'
DataBinding.DataSource = DADataSource
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 = 177
end
object eCodigoPostal: TcxDBTextEdit
Left = 333
Top = 145
DataBinding.DataField = 'CODIGO_POSTAL'
DataBinding.DataSource = DADataSource
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 = 65
end
object eProvincia: TcxDBTextEdit
Left = 130
Top = 172
DataBinding.DataField = 'PROVINCIA'
DataBinding.DataSource = DADataSource
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 = 5
Width = 278
end
object eObservaciones: TcxDBMemo
Left = 22
Top = 355
DataBinding.DataField = 'OBSERVACIONES'
DataBinding.DataSource = DADataSource
Properties.ScrollBars = ssVertical
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
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 = 11
Height = 86
Width = 630
end
inline frViewSubcontrataObra1: TfrViewSubcontrataObra
Left = 424
Top = 169
Width = 409
Height = 150
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 10
ReadOnly = False
ExplicitLeft = 424
ExplicitTop = 169
ExplicitWidth = 409
ExplicitHeight = 150
inherited dxLayoutControl1: TdxLayoutControl
Width = 409
inherited edtlNombre: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtNIFCIF: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtCalle: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtPoblacion: TcxDBTextEdit
ExplicitWidth = 158
Width = 158
end
inherited edtProvincia: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtCodigoPostal: TcxDBTextEdit
Left = 300
ExplicitLeft = 300
end
inherited Button3: TBitBtn
Left = 159
ExplicitLeft = 159
end
inherited edtPersonaContacto: TcxDBTextEdit
ExplicitWidth = 585
Width = 585
end
inherited edtReferenciaAsignada: TcxDBTextEdit
Left = 261
ExplicitLeft = 261
end
inherited edtTlf: TcxDBTextEdit
ExplicitWidth = 169
Width = 169
end
end
inherited DADataSource: TDADataSource
Left = 240
Top = 16
end
inherited ActionList1: TActionList
Left = 264
Top = 16
end
inherited PngImageList: TPngImageList
Left = 296
Top = 16
end
end
inline frViewClienteAsociadoObra1: TfrViewClienteAsociadoObra
Left = 424
Top = 34
Width = 392
Height = 99
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 9
ReadOnly = False
ExplicitLeft = 424
ExplicitTop = 34
ExplicitWidth = 392
ExplicitHeight = 99
inherited dxLayoutControl1: TdxLayoutControl
Width = 392
Height = 99
ExplicitWidth = 420
ExplicitHeight = 247
inherited edtlNombre: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtNIFCIF: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtCalle: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtPoblacion: TcxDBTextEdit
ExplicitWidth = 158
Width = 158
end
inherited edtProvincia: TcxDBTextEdit
ExplicitWidth = 276
Width = 276
end
inherited edtCodigoPostal: TcxDBTextEdit
Left = 284
ExplicitLeft = 284
end
inherited Button3: TBitBtn
Left = 174
ExplicitLeft = 174
end
end
end
object dxLayoutControlObraGroup_Root: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControlObraItem12: TdxLayoutItem
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
object dxLayoutControlObraGroup2: TdxLayoutGroup
ShowCaption = False
Hidden = True
LayoutDirection = ldHorizontal
ShowBorder = False
object dxLayoutControlObraGroup4: TdxLayoutGroup
AutoAligns = []
AlignHorz = ahClient
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControlObraGroup1: TdxLayoutGroup
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Datos generales de la obra'
object dxLayoutControlObraItem3: TdxLayoutItem
Caption = 'Nombre:'
Control = eNombre
ControlOptions.ShowBorder = False
end
object dxLayoutControlObraItem4: TdxLayoutItem
Caption = 'Persona de contacto:'
Control = ePersonaContacto
ControlOptions.ShowBorder = False
end
end
object dxLayoutControlObraGroup3: TdxLayoutGroup
Caption = 'Direcci'#243'n y tel'#233'fonos'
object dxLayoutControlObraItem10: TdxLayoutItem
Caption = 'Calle:'
Control = eCalle
ControlOptions.ShowBorder = False
end
object dxLayoutControlObraGroup5: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControlObraGroup6: TdxLayoutGroup
ShowCaption = False
Hidden = True
LayoutDirection = ldHorizontal
ShowBorder = False
object dxLayoutControlObraItem2: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Poblaci'#243'n:'
Control = ePoblacion
ControlOptions.ShowBorder = False
end
object dxLayoutControlObraItem7: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'C. P.:'
Control = eCodigoPostal
ControlOptions.ShowBorder = False
end
end
object dxLayoutControlObraItem9: TdxLayoutItem
Caption = 'Provincia:'
Control = eProvincia
ControlOptions.ShowBorder = False
end
object dxLayoutControlObraItem1: TdxLayoutItem
Caption = 'Tel'#233'fono:'
Control = eTlfTelefono
ControlOptions.ShowBorder = False
end
object dxLayoutControlObraItem5: TdxLayoutItem
Caption = 'M'#243'vil:'
Control = eTlfMovil
ControlOptions.ShowBorder = False
end
object dxLayoutControlObraItem6: TdxLayoutItem
Caption = 'N'#250'mero de fax:'
Control = eFax
ControlOptions.ShowBorder = False
end
end
end
end
object dxLayoutControlObraGroup10: TdxLayoutGroup
AutoAligns = [aaVertical]
AlignHorz = ahClient
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControlObraGroup7: TdxLayoutGroup
AutoAligns = []
AlignHorz = ahClient
Caption = 'Cliente asociado'
object dxLayoutControlObraItem13: TdxLayoutItem
Caption = 'New Item'
ShowCaption = False
Control = frViewClienteAsociadoObra1
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
end
object dxLayoutControlObraGroup9: TdxLayoutGroup
Caption = 'Subcontrata'
object dxLayoutControlObraItem8: TdxLayoutItem
Control = frViewSubcontrataObra1
ControlOptions.AutoColor = True
ControlOptions.ShowBorder = False
end
end
end
end
object dxLayoutControlObraGroup8: TdxLayoutGroup
AutoAligns = [aaHorizontal]
AlignVert = avClient
Caption = 'Observaciones'
object dxLayoutControlObraItem11: TdxLayoutItem
AutoAligns = [aaHorizontal]
AlignVert = avClient
Caption = 'Observaciones'
ShowCaption = False
Control = eObservaciones
ControlOptions.ShowBorder = False
end
end
end
end
object DADataSource: TDADataSource
Left = 336
Top = 64
end
end
Reference in New Issue View Git Blame Copy Permalink