Tecsitel_FactuGES2/Source/Modulos/Contactos/Views/uViewEmpleado.dfm
david d07c52d7a4 Repaso al módulo de contactos:
- Duplicar habilitado y funcionando
- Se ha ocultado la impresión del listado de contactos.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@173 0c75b7a4-871f-7646-8a2f-f78d34cc349f
2007-12-16 21:37:26 +00:00

254 lines
7.6 KiB
Plaintext

inherited frViewEmpleado: TfrViewEmpleado
Height = 391
OnCreate = CustomViewCreate
OnDestroy = CustomViewDestroy
ExplicitHeight = 391
inherited dxLayoutControlContacto: TdxLayoutControl
Height = 391
ExplicitHeight = 391
inherited eCalle: TcxDBTextEdit
Left = 121
Top = 166
TabOrder = 6
ExplicitLeft = 121
ExplicitTop = 166
ExplicitWidth = 260
Width = 260
end
inherited eProvincia: TcxDBTextEdit
Left = 121
Top = 220
TabOrder = 9
ExplicitLeft = 121
ExplicitTop = 220
ExplicitWidth = 260
Width = 260
end
inherited ePoblacion: TcxDBTextEdit
Left = 121
Top = 193
TabOrder = 7
ExplicitLeft = 121
ExplicitTop = 193
ExplicitWidth = 159
Width = 159
end
inherited eCodigoPostal: TcxDBTextEdit
Left = 348
Top = 193
TabOrder = 8
ExplicitLeft = 348
ExplicitTop = 193
end
inherited eObservaciones: TcxDBMemo
Top = 304
TabOrder = 18
ExplicitTop = 304
ExplicitHeight = 148
Height = 148
end
inherited eTlfParticular: TcxDBTextEdit
Left = 538
TabOrder = 12
ExplicitLeft = 538
ExplicitWidth = 91
Width = 91
end
inherited eTlfTrabajo: TcxDBTextEdit
Left = 538
TabOrder = 11
ExplicitLeft = 538
ExplicitWidth = 127
Width = 127
end
object eFechaNacimiento: TcxDBDateEdit [10]
Left = 121
Top = 82
DataBinding.DataField = 'FECHA_NACIMIENTO'
DataBinding.DataSource = dsContacto
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 = 3
Width = 121
end
object eFechaAltaEmpresa: TcxDBDateEdit [11]
Left = 262
Top = 82
DataBinding.DataField = 'FECHA_ALTA_EMPRESA'
DataBinding.DataSource = dsContacto
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 = 4
Width = 235
end
inherited eTlfMovil: TcxDBTextEdit
Left = 538
TabOrder = 13
ExplicitLeft = 538
ExplicitWidth = 155
Width = 155
end
inherited eFax: TcxDBTextEdit
Left = 538
TabOrder = 14
ExplicitLeft = 538
ExplicitWidth = 121
Width = 121
end
inherited eNombre: TcxDBTextEdit
Left = 121
ExplicitLeft = 121
ExplicitWidth = 263
Width = 263
end
object cbCategoria: TcxDBComboBox [15]
Left = 121
Top = 109
DataBinding.DataField = 'CATEGORIA'
DataBinding.DataSource = dsContacto
Properties.ImmediatePost = True
Properties.OnInitPopup = cbCategoriaPropertiesInitPopup
Properties.OnValidate = cbCategoriaPropertiesValidate
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 = 225
end
inherited eNIFCIF: TcxDBTextEdit
Left = 255
ExplicitLeft = 255
ExplicitWidth = 100
Width = 100
end
inherited eMailTrabajo: TcxDBHyperLinkEdit
Left = 538
Properties.Prefix = 'mailto:'
TabOrder = 15
ExplicitLeft = 538
ExplicitWidth = 129
Width = 129
end
inherited eMailParticular: TcxDBHyperLinkEdit
Left = 538
Properties.Prefix = 'mailto:'
TabOrder = 16
ExplicitLeft = 538
ExplicitWidth = 165
Width = 165
end
inherited ePaginaWeb: TcxDBHyperLinkEdit
Left = 538
TabOrder = 17
ExplicitLeft = 538
ExplicitWidth = 165
Width = 165
end
inherited eReferencia: TcxDBTextEdit
Left = 121
ExplicitLeft = 121
ExplicitWidth = 38
Width = 38
end
inherited ePersonaContacto: TcxDBTextEdit
Left = 121
Top = 247
TabOrder = 10
ExplicitLeft = 121
ExplicitTop = 247
ExplicitWidth = 256
Width = 256
end
inherited dxLayoutControlContactoGroup_Root: TdxLayoutGroup
inherited dxLayoutControlContactoGroup9: TdxLayoutGroup
inherited dxLayoutControlContactoGroup4: TdxLayoutGroup
inherited dxLayoutControlContactoGroup1: TdxLayoutGroup
inherited dxLayoutControlContactoGroup16: TdxLayoutGroup
inherited dxLayoutControlContactoItem14: TdxLayoutItem
Caption = 'DNI:'
end
end
inherited dxLayoutControlContactoItem13: TdxLayoutItem
Caption = 'Nombre y apellidos:'
end
object dxLayoutControlContactoGroup10: TdxLayoutGroup
ShowCaption = False
Hidden = True
LayoutDirection = ldHorizontal
ShowBorder = False
object dxLayoutControlContactoItem16: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Fecha nacimiento:'
Control = eFechaNacimiento
ControlOptions.ShowBorder = False
end
object dxLayoutControlContactoItem19: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahClient
Caption = 'Fecha de alta:'
Control = eFechaAltaEmpresa
ControlOptions.ShowBorder = False
end
end
object dxLayoutControlContactoItem20: TdxLayoutItem
Caption = 'Categor'#237'a:'
Control = cbCategoria
ControlOptions.ShowBorder = False
end
end
inherited dxLayoutControlContactoGroup3: TdxLayoutGroup
inherited dxLayoutControlContactoItem167: TdxLayoutItem
Visible = False
end
end
end
inherited dxLayoutControlContactoGroup6: TdxLayoutGroup
inherited dxLayoutControlContactoGroup2: TdxLayoutGroup
inherited dxLayoutControlContactoItem10: TdxLayoutItem
Caption = 'Tlf. trabajo:'
end
inherited dxLayoutControlContactoItem9: TdxLayoutItem
Caption = 'Tlf. particular:'
end
inherited dxLayoutControlContactoItem12: TdxLayoutItem
Visible = False
end
end
inherited dxLayoutControlContactoGroup5: TdxLayoutGroup
Visible = False
end
end
end
end
end
inherited dsContacto: TDADataSource
Left = 32
Top = 80
end
end