Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Arreglado el fallo en el cual, al entrar a editar un item, éste ya está en edición y, aunque no se hagan cambios, el programa pregunta si se quieren guardar los cambios.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@427 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-06-04 15:18:45 +00:00
parent 62f9df158b
commit 7a447e2434
2 changed files with 129 additions and 267 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

98
Source/GUIBase/uViewTotales.dfm
View File

@ -1,14 +1,14 @@
inherited frViewTotales: TfrViewTotales inherited frViewTotales: TfrViewTotales
Width = 451 Width = 832
Height = 316 Height = 284
Align = alBottom Align = alBottom
ExplicitWidth = 451 ExplicitWidth = 833
ExplicitHeight = 316 ExplicitHeight = 284
object dxLayoutControl1: TdxLayoutControl object dxLayoutControl1: TdxLayoutControl
AlignWithMargins = True AlignWithMargins = True
Left = 0 Left = 0
Top = 0 Top = 0
Width = 451 Width = 832
Height = 217 Height = 217
Margins.Left = 0 Margins.Left = 0
Margins.Top = 0 Margins.Top = 0
@ -19,7 +19,7 @@ inherited frViewTotales: TfrViewTotales
TabOrder = 0 TabOrder = 0
TabStop = False TabStop = False
AutoContentSizes = [acsWidth, acsHeight] AutoContentSizes = [acsWidth, acsHeight]
ExplicitWidth = 880 ExplicitWidth = 451
object Bevel1: TBevel object Bevel1: TBevel
Left = 104 Left = 104
Top = 109 Top = 109
@ -28,14 +28,14 @@ inherited frViewTotales: TfrViewTotales
Shape = bsBottomLine Shape = bsBottomLine
end end
object Bevel3: TBevel object Bevel3: TBevel
Left = 278 Left = 422
Top = 28 Top = 28
Width = 3 Width = 3
Height = 122 Height = 122
Shape = bsRightLine Shape = bsRightLine
end end
object Bevel4: TBevel object Bevel4: TBevel
Left = 390 Left = 534
Top = 109 Top = 109
Width = 192 Width = 192
Height = 9 Height = 9
@ -62,22 +62,18 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [] Style.Font.Style = []
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 5 TabOrder = 5
Height = 21 Height = 21
Width = 93 Width = 87
end end
object ImporteIVA: TcxDBCurrencyEdit object ImporteIVA: TcxDBCurrencyEdit
Left = 461 Left = 605
Top = 55 Top = 55
AutoSize = False AutoSize = False
DataBinding.DataField = 'IMPORTE_IVA' DataBinding.DataField = 'IMPORTE_IVA'
@ -97,22 +93,18 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [] Style.Font.Style = []
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 9 TabOrder = 9
Height = 21 Height = 21
Width = 137 Width = 20
end end
object ImporteTotal: TcxDBCurrencyEdit object ImporteTotal: TcxDBCurrencyEdit
Left = 391 Left = 535
Top = 129 Top = 129
AutoSize = False AutoSize = False
DataBinding.DataField = 'IMPORTE_TOTAL' DataBinding.DataField = 'IMPORTE_TOTAL'
@ -132,20 +124,16 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [] Style.Font.Style = []
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clActiveCaption Style.TextColor = clActiveCaption
Style.TextStyle = [fsBold] Style.TextStyle = [fsBold]
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 12 TabOrder = 12
Height = 21 Height = 21
Width = 137 Width = 90
end end
object edtDescuento: TcxDBSpinEdit object edtDescuento: TcxDBSpinEdit
Left = 104 Left = 104
@ -167,22 +155,18 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [] Style.Font.Style = []
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.ButtonStyle = bts3D Style.ButtonStyle = bts3D
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 4 TabOrder = 4
Height = 21 Height = 21
Width = 65 Width = 65
end end
object edtIVA: TcxDBSpinEdit object edtIVA: TcxDBSpinEdit
Left = 390 Left = 534
Top = 55 Top = 55
AutoSize = False AutoSize = False
DataBinding.DataField = 'IVA' DataBinding.DataField = 'IVA'
@ -204,26 +188,22 @@ inherited frViewTotales: TfrViewTotales
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.ButtonStyle = bts3D Style.ButtonStyle = bts3D
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 8 TabOrder = 8
Height = 21 Height = 21
Width = 65 Width = 65
end end
object ImporteBase: TcxDBCurrencyEdit object ImporteBase: TcxDBCurrencyEdit
Left = 390 Left = 534
Top = 28 Top = 28
AutoSize = False AutoSize = False
DataBinding.DataField = 'BASE_IMPONIBLE' DataBinding.DataField = 'BASE_IMPONIBLE'
@ -243,22 +223,18 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [fsBold] Style.Font.Style = [fsBold]
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 7 TabOrder = 7
Height = 21 Height = 21
Width = 92 Width = 91
end end
object edtRE: TcxDBSpinEdit object edtRE: TcxDBSpinEdit
Left = 390 Left = 534
Top = 82 Top = 82
AutoSize = False AutoSize = False
DataBinding.DataField = 'RE' DataBinding.DataField = 'RE'
@ -280,26 +256,22 @@ inherited frViewTotales: TfrViewTotales
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.ButtonStyle = bts3D Style.ButtonStyle = bts3D
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 10 TabOrder = 10
Height = 21 Height = 21
Width = 65 Width = 65
end end
object ImporteRE: TcxDBCurrencyEdit object ImporteRE: TcxDBCurrencyEdit
Left = 461 Left = 605
Top = 82 Top = 82
AutoSize = False AutoSize = False
DataBinding.DataField = 'IMPORTE_RE' DataBinding.DataField = 'IMPORTE_RE'
@ -319,19 +291,15 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [] Style.Font.Style = []
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 11 TabOrder = 11
Height = 21 Height = 21
Width = 56 Width = 20
end end
object eImporteNeto: TcxDBCurrencyEdit object eImporteNeto: TcxDBCurrencyEdit
Left = 104 Left = 104
@ -354,19 +322,15 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [fsBold] Style.Font.Style = [fsBold]
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 0 TabOrder = 0
Height = 21 Height = 21
Width = 147 Width = 158
end end
object ePorte: TcxDBCurrencyEdit object ePorte: TcxDBCurrencyEdit
Left = 104 Left = 104
@ -388,19 +352,15 @@ inherited frViewTotales: TfrViewTotales
Style.Font.Style = [] Style.Font.Style = []
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.TextColor = clWindowText Style.TextColor = clWindowText
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleDisabled.TextColor = clWindowText StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 6 TabOrder = 6
Height = 21 Height = 21
Width = 147 Width = 158
end end
object eIVA: TcxDBLookupComboBox object eIVA: TcxDBLookupComboBox
Left = 104 Left = 104
@ -422,23 +382,19 @@ inherited frViewTotales: TfrViewTotales
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
Style.ButtonStyle = bts3D Style.ButtonStyle = bts3D
Style.PopupBorderStyle = epbsFrame3D Style.PopupBorderStyle = epbsFrame3D
StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 1 TabOrder = 1
Width = 81 Width = 20
end end
object bTiposIVA: TButton object bTiposIVA: TButton
Left = 130 Left = 274
Top = 55 Top = 55
Width = 132 Width = 132
Height = 21 Height = 21
@ -451,6 +407,8 @@ inherited frViewTotales: TfrViewTotales
Caption = 'Aplicar recargo de equivalencia' Caption = 'Aplicar recargo de equivalencia'
DataBinding.DataField = 'RECARGO_EQUIVALENCIA' DataBinding.DataField = 'RECARGO_EQUIVALENCIA'
DataBinding.DataSource = DADataSource DataBinding.DataSource = DADataSource
Properties.DisplayChecked = '1'
Properties.DisplayUnchecked = '0'
Properties.ImmediatePost = True Properties.ImmediatePost = True
Properties.NullStyle = nssUnchecked Properties.NullStyle = nssUnchecked
Properties.ValueChecked = 1 Properties.ValueChecked = 1
@ -460,18 +418,14 @@ inherited frViewTotales: TfrViewTotales
Style.HotTrack = False Style.HotTrack = False
Style.LookAndFeel.Kind = lfStandard Style.LookAndFeel.Kind = lfStandard
Style.LookAndFeel.NativeStyle = True Style.LookAndFeel.NativeStyle = True
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.Kind = lfStandard StyleDisabled.LookAndFeel.Kind = lfStandard
StyleDisabled.LookAndFeel.NativeStyle = True StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.Kind = lfStandard StyleFocused.LookAndFeel.Kind = lfStandard
StyleFocused.LookAndFeel.NativeStyle = True StyleFocused.LookAndFeel.NativeStyle = True
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.Kind = lfStandard StyleHot.LookAndFeel.Kind = lfStandard
StyleHot.LookAndFeel.NativeStyle = True StyleHot.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.SkinName = ''
TabOrder = 3 TabOrder = 3
Width = 219 Width = 221
end end
object dxLayoutControl1Group_Root: TdxLayoutGroup object dxLayoutControl1Group_Root: TdxLayoutGroup
ShowCaption = False ShowCaption = False

298
Source/Modulos/Facturas de cliente/Views/uEditorFacturaCliente.dfm
View File

@ -104,26 +104,14 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente
815 815
316) 316)
inherited eReferencia: TcxDBTextEdit inherited eReferencia: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 343 ExplicitWidth = 343
Width = 343 Width = 343
end end
inherited edtFecha: TcxDBDateEdit inherited edtFecha: TcxDBDateEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 343 ExplicitWidth = 343
Width = 343 Width = 343
end end
inherited memObservaciones: TcxDBMemo inherited memObservaciones: TcxDBMemo
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 445 ExplicitWidth = 445
ExplicitHeight = 163 ExplicitHeight = 163
Height = 163 Height = 163
@ -136,60 +124,36 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente
ExplicitWidth = 298 ExplicitWidth = 298
inherited dxLayoutControl1: TdxLayoutControl inherited dxLayoutControl1: TdxLayoutControl
Width = 298 Width = 298
ExplicitWidth = 332 ExplicitWidth = 298
inherited edtlNombre: TcxDBTextEdit inherited edtlNombre: TcxDBTextEdit
DataBinding.DataSource = frViewFacturaCliente1.DADataSource DataBinding.DataSource = frViewFacturaCliente1.DADataSource
Properties.OnChange = frViewClienteFacturaedtlNombrePropertiesChange Properties.OnChange = frViewClienteFacturaedtlNombrePropertiesChange
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 224 ExplicitWidth = 224
Width = 224 Width = 224
end end
inherited edtNIFCIF: TcxDBTextEdit inherited edtNIFCIF: TcxDBTextEdit
DataBinding.DataSource = frViewFacturaCliente1.DADataSource DataBinding.DataSource = frViewFacturaCliente1.DADataSource
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 224 ExplicitWidth = 224
Width = 224 Width = 224
end end
inherited edtCalle: TcxDBTextEdit inherited edtCalle: TcxDBTextEdit
DataBinding.DataSource = frViewFacturaCliente1.DADataSource DataBinding.DataSource = frViewFacturaCliente1.DADataSource
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 224 ExplicitWidth = 224
Width = 224 Width = 224
end end
inherited edtPoblacion: TcxDBTextEdit inherited edtPoblacion: TcxDBTextEdit
DataBinding.DataSource = frViewFacturaCliente1.DADataSource DataBinding.DataSource = frViewFacturaCliente1.DADataSource
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 106 ExplicitWidth = 106
Width = 106 Width = 106
end end
inherited edtProvincia: TcxDBTextEdit inherited edtProvincia: TcxDBTextEdit
DataBinding.DataSource = frViewFacturaCliente1.DADataSource DataBinding.DataSource = frViewFacturaCliente1.DADataSource
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 224 ExplicitWidth = 224
Width = 224 Width = 224
end end
inherited edtCodigoPostal: TcxDBTextEdit inherited edtCodigoPostal: TcxDBTextEdit
Left = 206 Left = 206
DataBinding.DataSource = frViewFacturaCliente1.DADataSource DataBinding.DataSource = frViewFacturaCliente1.DADataSource
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 206 ExplicitLeft = 206
end end
inherited Button3: TBitBtn inherited Button3: TBitBtn
@ -199,10 +163,6 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente
end end
end end
inherited cbFormaPago: TcxDBLookupComboBox inherited cbFormaPago: TcxDBLookupComboBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 205 ExplicitWidth = 205
Width = 205 Width = 205
end end
@ -239,100 +199,96 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente
Height = 51 Height = 51
ExplicitWidth = 815 ExplicitWidth = 815
ExplicitHeight = 51 ExplicitHeight = 51
inherited ToolButton3: TToolButton inherited ToolButton4: TToolButton [1]
Wrap = False Left = 109
end end
inherited ToolButton4: TToolButton inherited ToolButton14: TToolButton [2]
Left = 278 Left = 165
Top = 0
ExplicitLeft = 278
ExplicitTop = 0
end
inherited ToolButton14: TToolButton
Left = 334
Top = 0 Top = 0
Wrap = False Wrap = False
ExplicitLeft = 334 ExplicitLeft = 165
ExplicitTop = 0 ExplicitTop = 0
end end
inherited FontName: TJvFontComboBox inherited FontName: TJvFontComboBox [3]
Left = 399 Left = 230
Top = 0 Top = 0
ExplicitLeft = 399 ExplicitLeft = 230
ExplicitTop = 0 ExplicitTop = 0
end end
inherited FontSize: TEdit inherited FontSize: TEdit [4]
Left = 544 Left = 375
Top = 0 Top = 0
Width = 72 Width = 72
ExplicitLeft = 544 ExplicitLeft = 375
ExplicitTop = 0 ExplicitTop = 0
ExplicitWidth = 72 ExplicitWidth = 72
end end
inherited UpDown1: TUpDown inherited UpDown1: TUpDown [5]
Left = 616 Left = 447
Top = 0 Top = 0
ExplicitLeft = 616 ExplicitLeft = 447
ExplicitTop = 0 ExplicitTop = 0
end end
inherited ToolButton13: TToolButton inherited ToolButton13: TToolButton [6]
Left = 0
Top = 0
Wrap = True
ExplicitLeft = 0
ExplicitTop = 0
ExplicitHeight = 27
end end
inherited ToolButton6: TToolButton inherited ToolButton6: TToolButton [7]
Left = 0 Left = 0
Top = 27 Top = 30
ExplicitLeft = 0 ExplicitLeft = 0
ExplicitTop = 27 ExplicitTop = 30
end end
inherited ToolButton7: TToolButton inherited ToolButton7: TToolButton [8]
Left = 66 Left = 66
Top = 27 Top = 30
ExplicitLeft = 66 ExplicitLeft = 66
ExplicitTop = 27 ExplicitTop = 30
end end
inherited ToolButton8: TToolButton inherited ToolButton2: TToolButton [9]
Left = 133 Left = 133
Top = 27
ExplicitLeft = 133
ExplicitTop = 27
end end
inherited ToolButton12: TToolButton inherited ToolButton8: TToolButton [10]
Left = 216 Left = 247
Top = 27 Top = 30
ExplicitLeft = 216 ExplicitLeft = 247
ExplicitTop = 27 ExplicitTop = 30
end end
inherited ToolButton9: TToolButton inherited ToolButton3: TToolButton [11]
Left = 224 Left = 330
Top = 27 Top = 30
ExplicitLeft = 224 ExplicitLeft = 330
ExplicitTop = 27 ExplicitTop = 30
end end
inherited ToolButton10: TToolButton inherited ToolButton12: TToolButton [12]
Left = 369 Left = 385
Top = 27 Top = 30
ExplicitLeft = 369 ExplicitLeft = 385
ExplicitTop = 27 ExplicitTop = 30
end end
inherited ToolButton11: TToolButton inherited ToolButton9: TToolButton [13]
Left = 494 Left = 393
Top = 27 ExplicitLeft = 393
ExplicitLeft = 494 end
ExplicitTop = 27 inherited ToolButton10: TToolButton [14]
Left = 538
Top = 30
ExplicitLeft = 538
ExplicitTop = 30
end
inherited ToolButton11: TToolButton [15]
Left = 663
Top = 30
Wrap = False
ExplicitLeft = 663
ExplicitTop = 30
end end
end end
inherited cxGrid: TcxGrid inherited cxGrid: TcxGrid
Top = 77 Top = 77
Width = 815 Width = 815
Height = 239 Height = 239
ExplicitTop = 72 ExplicitTop = 77
ExplicitWidth = 815 ExplicitWidth = 815
ExplicitHeight = 244 ExplicitHeight = 239
end end
inherited TBXDock1: TTBXDock inherited TBXDock1: TTBXDock
Top = 51 Top = 51
@ -343,6 +299,15 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente
ExplicitWidth = 702 ExplicitWidth = 702
end end
end end
inherited cxGridPopupMenu: TcxGridPopupMenu
PopupMenus = <
item
GridView = frViewDetallesFacturaCliente1.cxGridView
HitTypes = [gvhtNone, gvhtCell, gvhtRecord, gvhtRowIndicator]
Index = 0
PopupMenu = frViewDetallesFacturaCliente1.GridGeneralPopupMenu
end>
end
end end
end end
end end
@ -384,171 +349,114 @@ inherited fEditorFacturaCliente: TfEditorFacturaCliente
ExplicitWidth = 73 ExplicitWidth = 73
end end
inherited Bevel3: TBevel inherited Bevel3: TBevel
Left = 441 Left = 375
Top = 30 Top = 30
Height = 122 Height = 122
ExplicitLeft = 441 ExplicitLeft = 375
ExplicitTop = 30 ExplicitTop = 30
ExplicitHeight = 122 ExplicitHeight = 122
end end
inherited Bevel4: TBevel inherited Bevel4: TBevel
Left = 553 Left = 487
Top = 111 Top = 111
Width = 186 Width = 192
ExplicitLeft = 553 ExplicitLeft = 487
ExplicitTop = 111 ExplicitTop = 111
ExplicitWidth = 186 ExplicitWidth = 192
end end
inherited ImporteDto: TcxDBCurrencyEdit inherited ImporteDto: TcxDBCurrencyEdit
Top = 131 Top = 131
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 131 ExplicitTop = 131
ExplicitWidth = 250 ExplicitWidth = 184
Width = 250 Width = 184
end end
inherited ImporteIVA: TcxDBCurrencyEdit inherited ImporteIVA: TcxDBCurrencyEdit
Left = 624 Left = 558
Top = 57 Top = 57
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = '' ExplicitLeft = 558
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 624
ExplicitTop = 57 ExplicitTop = 57
ExplicitWidth = 183 ExplicitWidth = 249
Width = 183 Width = 249
end end
inherited ImporteTotal: TcxDBCurrencyEdit inherited ImporteTotal: TcxDBCurrencyEdit
Left = 554 Left = 488
Top = 131 Top = 131
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = '' ExplicitLeft = 488
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 554
ExplicitTop = 131 ExplicitTop = 131
ExplicitWidth = 253 ExplicitWidth = 319
Width = 253 Width = 319
end end
inherited edtDescuento: TcxDBSpinEdit inherited edtDescuento: TcxDBSpinEdit
Top = 131 Top = 131
Properties.OnValidate = frViewTotales1edtDescuentoPropertiesValidate
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 131 ExplicitTop = 131
end end
inherited edtIVA: TcxDBSpinEdit inherited edtIVA: TcxDBSpinEdit
Left = 553 Left = 487
Top = 57 Top = 57
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = '' ExplicitLeft = 487
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 553
ExplicitTop = 57 ExplicitTop = 57
end end
inherited ImporteBase: TcxDBCurrencyEdit inherited ImporteBase: TcxDBCurrencyEdit
Left = 553 Left = 487
Top = 30 Top = 30
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = '' ExplicitLeft = 487
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 553
ExplicitTop = 30 ExplicitTop = 30
ExplicitWidth = 254 ExplicitWidth = 320
Width = 254 Width = 320
end end
inherited edtRE: TcxDBSpinEdit inherited edtRE: TcxDBSpinEdit
Left = 553 Left = 487
Top = 84 Top = 84
Properties.AssignedValues.MinValue = True
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = '' ExplicitLeft = 487
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 553
ExplicitTop = 84 ExplicitTop = 84
end end
inherited ImporteRE: TcxDBCurrencyEdit inherited ImporteRE: TcxDBCurrencyEdit
Left = 624 Left = 558
Top = 84 Top = 84
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = '' ExplicitLeft = 558
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 624
ExplicitTop = 84 ExplicitTop = 84
ExplicitWidth = 183 ExplicitWidth = 249
Width = 183 Width = 249
end end
inherited eImporteNeto: TcxDBCurrencyEdit inherited eImporteNeto: TcxDBCurrencyEdit
Top = 30 Top = 30
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 30 ExplicitTop = 30
ExplicitWidth = 321 ExplicitWidth = 255
Width = 321 Width = 255
end end
inherited ePorte: TcxDBCurrencyEdit inherited ePorte: TcxDBCurrencyEdit
Top = 158 Top = 158
DataBinding.DataSource = dsDataTable
Properties.OnValidate = frViewTotales1ePortePropertiesValidate
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
OnEditing = frViewTotales1ePorteEditing
ExplicitTop = 158 ExplicitTop = 158
ExplicitWidth = 321 ExplicitWidth = 255
Width = 321 Width = 255
end end
inherited eIVA: TcxDBLookupComboBox inherited eIVA: TcxDBLookupComboBox
Top = 57 Top = 57
Properties.OnValidate = frViewTotales1eIVAPropertiesValidate
Style.Color = clInfoBk
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 57 ExplicitTop = 57
ExplicitWidth = 183 ExplicitWidth = 117
Width = 183 Width = 117
end end
inherited bTiposIVA: TButton inherited bTiposIVA: TButton
Left = 293 Left = 227
Top = 57 Top = 57
OnClick = frViewTotales1bTiposIVAClick ExplicitLeft = 227
ExplicitLeft = 293
ExplicitTop = 57 ExplicitTop = 57
end end
inherited cbRecargoEquivalencia: TcxDBCheckBox inherited cbRecargoEquivalencia: TcxDBCheckBox
Top = 84 Top = 84
Properties.OnEditValueChanged = frViewTotales1cbRecargoEquivalenciaPropertiesEditValueChanged
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitTop = 84 ExplicitTop = 84
ExplicitWidth = 321 ExplicitWidth = 255
Width = 321 Width = 255
end end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup inherited dxLayoutControl1Group_Root: TdxLayoutGroup
inherited dxLayoutControl1Group1: TdxLayoutGroup inherited dxLayoutControl1Group1: TdxLayoutGroup