Arreglada excepción por fallo en herencia visual.

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@402 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
David Arranz 2009-03-03 16:06:49 +00:00
parent 3f079c124e
commit 94344a883b
28 changed files with 1374 additions and 1040 deletions

View File

@ -58,37 +58,37 @@
<DelphiCompile Include="GUIBase.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\Modulos\Facturas de cliente\Base.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\cxDataD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\cxEditorsD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\cxExportD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\cxLibraryD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\cxTreeListD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxBarD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxBarExtItemsD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxLayoutControlD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxPScxCommonD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\dxThemeD11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\frx11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\frxe11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\fs11.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\JvAppFrmD11R.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\JvGlobusD11R.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\PngComponentsD10.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\PNG_D10.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\rtl.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\tb2k_d10.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\tbx_d10.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\vcl.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\vclactnband.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\vcldb.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\vcljpg.dcp" />
<DCCReference Include="..\Modulos\Facturas de cliente\vclx.dcp" />
<DCCReference Include="..\Modulos\Comisiones\Base.dcp" />
<DCCReference Include="..\Modulos\Comisiones\cxDataD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\cxEditorsD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\cxExportD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\cxLibraryD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\cxTreeListD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxBarD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxBarExtItemsD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxLayoutControlD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxPScxCommonD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\dxThemeD11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\frx11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\frxe11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\fs11.dcp" />
<DCCReference Include="..\Modulos\Comisiones\JvAppFrmD11R.dcp" />
<DCCReference Include="..\Modulos\Comisiones\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Comisiones\JvGlobusD11R.dcp" />
<DCCReference Include="..\Modulos\Comisiones\PngComponentsD10.dcp" />
<DCCReference Include="..\Modulos\Comisiones\PNG_D10.dcp" />
<DCCReference Include="..\Modulos\Comisiones\rtl.dcp" />
<DCCReference Include="..\Modulos\Comisiones\tb2k_d10.dcp" />
<DCCReference Include="..\Modulos\Comisiones\tbx_d10.dcp" />
<DCCReference Include="..\Modulos\Comisiones\vcl.dcp" />
<DCCReference Include="..\Modulos\Comisiones\vclactnband.dcp" />
<DCCReference Include="..\Modulos\Comisiones\vcldb.dcp" />
<DCCReference Include="..\Modulos\Comisiones\vcljpg.dcp" />
<DCCReference Include="..\Modulos\Comisiones\vclx.dcp" />
<DCCReference Include="uDialogBase.pas">
<Form>fDialogBase</Form>
</DCCReference>

Binary file not shown.

View File

@ -1,7 +1,7 @@
inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 332
Top = 147
Caption = 'Nuevo albaran de cliente'
Caption = 'Nuevo alb'#225'ran de cliente'
ClientHeight = 585
ClientWidth = 765
OnClose = CustomEditorClose
@ -11,7 +11,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader
Width = 765
Caption = 'Nuevo albaran de cliente'
Caption = 'Nuevo albar'#225'n de cliente'
ExplicitWidth = 765
inherited Image1: TImage
Left = 738
@ -144,20 +144,29 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
ExplicitWidth = 765
end
end
inherited StatusBar: TJvStatusBar
Top = 566
Width = 765
Panels = <
item
Width = 200
end>
ExplicitTop = 566
ExplicitWidth = 765
end
inherited pgPaginas: TPageControl
Width = 759
Height = 406
Height = 376
TabOrder = 1
OnChanging = pgPaginasChanging
ExplicitLeft = 3
ExplicitTop = 79
ExplicitTop = 109
ExplicitWidth = 759
ExplicitHeight = 406
ExplicitHeight = 376
inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 751
ExplicitHeight = 378
ExplicitHeight = 348
end
object pagContenido: TTabSheet
Caption = 'Contenido'
@ -166,7 +175,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 0
Top = 0
Width = 751
Height = 378
Height = 348
Align = alClient
BiDiMode = bdLeftToRight
Font.Charset = DEFAULT_CHARSET
@ -179,16 +188,52 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
TabOrder = 0
ReadOnly = False
ExplicitWidth = 751
ExplicitHeight = 378
ExplicitHeight = 348
inherited ToolBar1: TToolBar
Width = 751
ExplicitWidth = 751
inherited UpDown1: TUpDown
Left = 237
ExplicitLeft = 237
end
inherited ToolButton13: TToolButton
Left = 254
ExplicitLeft = 254
end
inherited ToolButton6: TToolButton
Left = 262
ExplicitLeft = 262
end
inherited ToolButton7: TToolButton
Left = 296
ExplicitLeft = 296
end
inherited ToolButton8: TToolButton
Left = 330
ExplicitLeft = 330
end
inherited ToolButton12: TToolButton
Left = 364
ExplicitLeft = 364
end
inherited ToolButton9: TToolButton
Left = 372
ExplicitLeft = 372
end
inherited ToolButton10: TToolButton
Left = 406
ExplicitLeft = 406
end
inherited ToolButton11: TToolButton
Left = 440
ExplicitLeft = 440
end
end
inherited cxGrid: TcxGrid
Width = 751
Height = 306
Height = 276
ExplicitWidth = 751
ExplicitHeight = 306
ExplicitHeight = 276
end
inherited TBXDock1: TTBXDock
Width = 751
@ -206,7 +251,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Left = 0
Top = 0
Width = 751
Height = 378
Height = 348
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
@ -217,7 +262,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
TabOrder = 0
ReadOnly = False
ExplicitWidth = 751
ExplicitHeight = 378
ExplicitHeight = 348
inherited pnlSup: TPanel
Width = 751
ExplicitWidth = 751
@ -227,9 +272,9 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
end
inherited GroupBox1: TGroupBox
Width = 751
Height = 350
Height = 320
ExplicitWidth = 751
ExplicitHeight = 350
ExplicitHeight = 320
inherited eIncidencias: TcxDBMemo
ExplicitWidth = 734
ExplicitHeight = 323
@ -240,16 +285,6 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
end
end
end
inherited StatusBar: TJvStatusBar
Top = 566
Width = 765
Panels = <
item
Width = 200
end>
ExplicitTop = 566
ExplicitWidth = 765
end
inline frViewTotales1: TfrViewTotales [4]
Left = 0
Top = 488
@ -262,7 +297,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
TabOrder = 5
ReadOnly = False
ExplicitTop = 488
ExplicitWidth = 765
@ -274,12 +309,6 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
LookAndFeel = dxLayoutOfficeLookAndFeel1
ExplicitWidth = 765
ExplicitHeight = 78
inherited Bevel1: TBevel
Left = 93
Top = 92
ExplicitLeft = 93
ExplicitTop = 92
end
inherited Bevel3: TBevel
Left = 368
Top = 11
@ -292,26 +321,28 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
end
inherited Bevel4: TBevel
Left = 484
Top = 92
Top = 53
Width = 210
ExplicitLeft = 484
ExplicitTop = 92
ExplicitTop = 53
ExplicitWidth = 210
end
inherited ImporteDto: TcxDBCurrencyEdit
Left = 164
Top = 112
Top = 38
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 164
ExplicitTop = 112
ExplicitTop = 38
ExplicitWidth = 188
Width = 188
end
inherited ImporteIVA: TcxDBCurrencyEdit
Left = 555
Top = 38
Top = 88
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
@ -319,37 +350,37 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 555
ExplicitTop = 38
ExplicitTop = 88
ExplicitWidth = 182
Width = 182
end
inherited ImporteTotal: TcxDBCurrencyEdit
Left = 485
Top = 112
Top = 142
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 485
ExplicitTop = 112
ExplicitTop = 142
ExplicitWidth = 252
Width = 252
end
inherited edtDescuento: TcxDBSpinEdit
Left = 93
Top = 112
Top = 38
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 112
ExplicitTop = 38
end
inherited edtIVA: TcxDBSpinEdit
Left = 484
Top = 38
Top = 88
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
@ -357,7 +388,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 484
ExplicitTop = 38
ExplicitTop = 88
end
inherited ImporteBase: TcxDBCurrencyEdit
Left = 484
@ -374,7 +405,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
end
inherited edtRE: TcxDBSpinEdit
Left = 484
Top = 65
Top = 115
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
@ -382,11 +413,11 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 484
ExplicitTop = 65
ExplicitTop = 115
end
inherited ImporteRE: TcxDBCurrencyEdit
Left = 555
Top = 65
Top = 115
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
@ -394,7 +425,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 555
ExplicitTop = 65
ExplicitTop = 115
ExplicitWidth = 182
Width = 182
end
@ -413,7 +444,7 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
end
inherited ePorte: TcxDBCurrencyEdit
Left = 93
Top = 139
Top = 65
Properties.OnValidate = frViewTotales1ePortePropertiesValidate
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
@ -421,65 +452,67 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 139
ExplicitWidth = 259
Width = 259
end
inherited eIVA: TcxDBLookupComboBox
Left = 93
Top = 38
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 38
ExplicitWidth = 121
Width = 121
end
inherited bTiposIVA: TButton
Left = 220
Top = 38
ExplicitLeft = 220
ExplicitTop = 38
end
inherited cbRecargoEquivalencia: TcxDBCheckBox
Left = 93
Top = 65
DataBinding.DataField = ''
DataBinding.DataSource = nil
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 65
ExplicitWidth = 259
Width = 259
end
inherited eIVA: TcxDBLookupComboBox
Left = 93
Top = 92
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 92
ExplicitWidth = 121
Width = 121
end
inherited bTiposIVA: TButton
Left = 220
Top = 92
ExplicitLeft = 220
ExplicitTop = 92
end
inherited cbRecargoEquivalencia: TcxDBCheckBox
Left = 93
Top = 119
DataBinding.DataField = ''
DataBinding.DataSource = nil
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 119
ExplicitWidth = 259
Width = 259
end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup
inherited dxLayoutControl1Group1: TdxLayoutGroup
ShowCaption = False
ShowBorder = False
inherited dxLayoutControl1Group2: TdxLayoutGroup
inherited dxLayoutControl1Group7: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Group6: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Item16: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Item10: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Group7: TdxLayoutGroup
Visible = False
end
end
inherited dxLayoutControl1Group5: TdxLayoutGroup
inherited dxLayoutControl1Group3: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
inherited dxLayoutControl1Group11: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
inherited dxLayoutControl1Group9: TdxLayoutGroup
Visible = False
@ -487,29 +520,30 @@ inherited fEditorAlbaranCliente: TfEditorAlbaranCliente
inherited dxLayoutControl1Group8: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
end
end
end
end
end
inherited EditorActionList: TActionList [5]
inherited PnlComentario: TPanel [5]
Width = 765
ExplicitWidth = 765
inherited lbComentario: TLabel
Width = 755
Height = 25
end
end
inherited EditorActionList: TActionList [9]
Left = 32
Top = 96
end
inherited SmallImages: TPngImageList [6]
end
inherited LargeImages: TPngImageList [7]
end
inherited JvFormStorage: TJvFormStorage [8]
end
inherited dsDataTable: TDADataSource [10]
Left = 24
Top = 136
end
inherited JvAppRegistryStorage: TJvAppRegistryStorage [11]
end
object dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList
Left = 144
Top = 280

View File

@ -139,10 +139,6 @@ inherited fEditorAlbaranDevCliente: TfEditorAlbaranDevCliente
inherited frViewTotales1: TfrViewTotales
inherited dxLayoutControl1: TdxLayoutControl
LookAndFeel = dxLayoutOfficeLookAndFeel1
inherited Bevel1: TBevel
Width = 73
ExplicitWidth = 73
end
inherited Bevel3: TBevel
Left = 331
Height = 54
@ -156,62 +152,106 @@ inherited fEditorAlbaranDevCliente: TfEditorAlbaranDevCliente
ExplicitWidth = 285
end
inherited ImporteDto: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 93
Width = 93
end
inherited ImporteIVA: TcxDBCurrencyEdit
Left = 518
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 518
ExplicitWidth = 214
Width = 214
end
inherited ImporteTotal: TcxDBCurrencyEdit
Left = 448
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 448
ExplicitWidth = 284
Width = 284
end
inherited edtDescuento: TcxDBSpinEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
end
inherited edtIVA: TcxDBSpinEdit
Left = 447
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 447
end
inherited ImporteBase: TcxDBCurrencyEdit
Left = 447
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 447
ExplicitWidth = 285
Width = 285
end
inherited edtRE: TcxDBSpinEdit
Left = 447
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 447
end
inherited ImporteRE: TcxDBCurrencyEdit
Left = 518
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 518
ExplicitWidth = 214
Width = 214
end
inherited eImporteNeto: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 147
Width = 147
end
inherited ePorte: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 147
Width = 147
end
inherited eIVA: TcxDBLookupComboBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 81
Width = 81
end
@ -220,6 +260,10 @@ inherited fEditorAlbaranDevCliente: TfEditorAlbaranDevCliente
ExplicitLeft = 183
end
inherited cbRecargoEquivalencia: TcxDBCheckBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 219
Width = 219
end

View File

@ -10,7 +10,7 @@ uses
JvStatusBar, uViewIncidencias, uCustomView, uViewBase, uViewDetallesBase,
uViewDetallesDTO, uViewDetallesArticulos, uViewDetallesAlbaranCliente, TBX,
TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent,
JvNavigationPane, uIEditorAlbaranDevCliente, uDAInterfaces;
JvNavigationPane, uIEditorAlbaranDevCliente, uDAInterfaces, StdCtrls;
type
TfEditorAlbaranDevCliente = class(TfEditorAlbaranCliente, IEditorAlbaranDevCliente)

View File

@ -123,6 +123,12 @@ inherited fEditorAlbaranDevProveedor: TfEditorAlbaranDevProveedor
end
end
inherited pgPaginas: TPageControl
inherited pagGeneral: TTabSheet
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
end
inherited pagInicidencias: TTabSheet
inherited frViewIncidenciasCli: TfrViewIncidencias
inherited GroupBox1: TGroupBox
@ -139,35 +145,113 @@ inherited fEditorAlbaranDevProveedor: TfEditorAlbaranDevProveedor
inherited frViewTotales1: TfrViewTotales
inherited dxLayoutControl1: TdxLayoutControl
LookAndFeel = dxLayoutOfficeLookAndFeel1
inherited Bevel3: TBevel
Height = 30
ExplicitHeight = 30
end
inherited Bevel4: TBevel
Width = 21
ExplicitWidth = 21
end
inherited ImporteDto: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 93
Width = 93
end
inherited ImporteIVA: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 137
Width = 137
end
inherited ImporteTotal: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 137
Width = 137
end
inherited edtDescuento: TcxDBSpinEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
end
inherited edtIVA: TcxDBSpinEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
end
inherited ImporteBase: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 92
Width = 92
end
inherited edtRE: TcxDBSpinEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
end
inherited ImporteRE: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 56
Width = 56
end
inherited eImporteNeto: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 147
Width = 147
end
inherited ePorte: TcxDBCurrencyEdit
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 147
Width = 147
end
inherited eIVA: TcxDBLookupComboBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 81
Width = 81
end
inherited cbRecargoEquivalencia: TcxDBCheckBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 219
Width = 219
end
inherited dxLayoutControl1Group_Root: TdxLayoutGroup
inherited dxLayoutControl1Group1: TdxLayoutGroup

View File

@ -11,7 +11,7 @@ uses
uViewDetallesArticulos, uViewDetallesAlbaranProveedor, uCustomView, uViewBase,
uViewAlbaranProveedor, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
JvExControls, JvComponent, JvNavigationPane, uIEditorAlbaranDevProveedor,
uDAInterfaces;
uDAInterfaces, StdCtrls;
type
TfEditorAlbaranDevProveedor = class(TfEditorAlbaranProveedor, IEditorAlbaranDevProveedor)

View File

@ -144,20 +144,30 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
ExplicitWidth = 765
end
end
inherited StatusBar: TJvStatusBar
Top = 600
Width = 765
Panels = <
item
Width = 200
end>
ExplicitTop = 600
ExplicitWidth = 765
end
inherited pgPaginas: TPageControl
Width = 759
Height = 454
Height = 424
ActivePage = pagInicidencias
TabOrder = 1
OnChanging = pgPaginasChanging
ExplicitLeft = 3
ExplicitTop = 79
ExplicitTop = 109
ExplicitWidth = 759
ExplicitHeight = 454
ExplicitHeight = 424
inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 751
ExplicitHeight = 426
ExplicitHeight = 396
end
object pagContenido: TTabSheet
Caption = 'Contenido'
@ -166,7 +176,7 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
Left = 0
Top = 0
Width = 751
Height = 426
Height = 396
Align = alClient
BiDiMode = bdLeftToRight
Font.Charset = DEFAULT_CHARSET
@ -179,14 +189,14 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
TabOrder = 0
ReadOnly = False
ExplicitWidth = 751
ExplicitHeight = 426
ExplicitHeight = 396
inherited ToolBar1: TToolBar
Width = 751
ExplicitWidth = 751
end
inherited cxGrid: TcxGrid
Width = 751
Height = 354
Height = 324
ExplicitWidth = 751
ExplicitHeight = 354
inherited cxGridView: TcxGridDBTableView
@ -207,15 +217,11 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
object pagInicidencias: TTabSheet
Caption = 'Incidencias'
ImageIndex = 2
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
inline frViewIncidenciasCli: TfrViewIncidencias
Left = 0
Top = 0
Width = 751
Height = 426
Height = 396
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
@ -226,19 +232,19 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
TabOrder = 0
ReadOnly = False
ExplicitWidth = 751
ExplicitHeight = 426
ExplicitHeight = 396
inherited pnlSup: TPanel
Width = 751
ExplicitWidth = 757
ExplicitWidth = 751
inherited eIncidenciaActiva: TcxDBCheckBox
ExplicitHeight = 21
end
end
inherited GroupBox1: TGroupBox
Width = 751
Height = 398
Height = 368
ExplicitWidth = 751
ExplicitHeight = 398
ExplicitHeight = 368
inherited eIncidencias: TcxDBMemo
ExplicitWidth = 734
ExplicitHeight = 371
@ -249,16 +255,6 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
end
end
end
inherited StatusBar: TJvStatusBar
Top = 600
Width = 765
Panels = <
item
Width = 200
end>
ExplicitTop = 600
ExplicitWidth = 765
end
inline frViewTotales1: TfrViewTotales [4]
Left = 0
Top = 536
@ -271,7 +267,7 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
TabOrder = 5
ReadOnly = False
ExplicitTop = 536
ExplicitWidth = 765
@ -280,14 +276,6 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
Width = 765
LookAndFeel = dxLayoutOfficeLookAndFeel1
ExplicitWidth = 765
inherited Bevel1: TBevel
Left = 93
Top = 92
Width = 73
ExplicitLeft = 93
ExplicitTop = 92
ExplicitWidth = 73
end
inherited Bevel3: TBevel
Left = 379
Top = 11
@ -298,59 +286,83 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
end
inherited Bevel4: TBevel
Left = 491
Top = 92
Top = 53
Width = 21
ExplicitLeft = 491
ExplicitTop = 92
ExplicitTop = 53
ExplicitWidth = 21
end
inherited ImporteDto: TcxDBCurrencyEdit
Left = 164
Top = 112
Top = 38
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 164
ExplicitTop = 112
ExplicitTop = 38
ExplicitWidth = 93
Width = 93
end
inherited ImporteIVA: TcxDBCurrencyEdit
Left = 562
Top = 38
Top = 88
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 562
ExplicitTop = 38
ExplicitTop = 88
ExplicitWidth = 137
Width = 137
end
inherited ImporteTotal: TcxDBCurrencyEdit
Left = 492
Top = 112
Top = 142
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 492
ExplicitTop = 112
ExplicitTop = 142
ExplicitWidth = 137
Width = 137
end
inherited edtDescuento: TcxDBSpinEdit
Left = 93
Top = 112
Top = 38
Properties.OnValidate = frViewTotales1edtDescuentoPropertiesValidate
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 112
ExplicitTop = 38
end
inherited edtIVA: TcxDBSpinEdit
Left = 491
Top = 38
Top = 88
Properties.OnValidate = frViewTotales1edtIVAPropertiesValidate
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 491
ExplicitTop = 38
ExplicitTop = 88
end
inherited ImporteBase: TcxDBCurrencyEdit
Left = 491
Top = 11
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 491
ExplicitTop = 11
ExplicitWidth = 92
@ -358,28 +370,40 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
end
inherited edtRE: TcxDBSpinEdit
Left = 491
Top = 65
Top = 115
DataBinding.DataField = ''
DataBinding.DataSource = nil
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 491
ExplicitTop = 65
ExplicitTop = 115
end
inherited ImporteRE: TcxDBCurrencyEdit
Left = 562
Top = 65
Top = 115
DataBinding.DataField = ''
DataBinding.DataSource = nil
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 562
ExplicitTop = 65
ExplicitTop = 115
ExplicitWidth = 56
Width = 56
end
inherited eImporteNeto: TcxDBCurrencyEdit
Left = 93
Top = 11
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 11
ExplicitWidth = 147
@ -387,36 +411,48 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
end
inherited ePorte: TcxDBCurrencyEdit
Left = 93
Top = 139
Top = 65
Properties.OnValidate = frViewTotales1ePortePropertiesValidate
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 139
ExplicitTop = 65
ExplicitWidth = 147
Width = 147
end
inherited eIVA: TcxDBLookupComboBox
Left = 93
Top = 38
Top = 92
DataBinding.DataField = ''
DataBinding.DataSource = nil
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 38
ExplicitTop = 92
ExplicitWidth = 81
Width = 81
end
inherited bTiposIVA: TButton
Left = 231
Top = 38
Top = 92
ExplicitLeft = 231
ExplicitTop = 38
ExplicitTop = 92
end
inherited cbRecargoEquivalencia: TcxDBCheckBox
Left = 93
Top = 65
Top = 119
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 93
ExplicitTop = 65
ExplicitTop = 119
ExplicitWidth = 219
Width = 219
end
@ -428,26 +464,28 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
inherited dxLayoutControl1Item8: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Group7: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Group6: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Item16: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Item10: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Group7: TdxLayoutGroup
Visible = False
end
end
inherited dxLayoutControl1Group5: TdxLayoutGroup
inherited dxLayoutControl1Item13: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Group3: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
inherited dxLayoutControl1Group11: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
inherited dxLayoutControl1Group9: TdxLayoutGroup
Visible = False
@ -455,28 +493,29 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
inherited dxLayoutControl1Group8: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
end
end
end
end
end
inherited EditorActionList: TActionList [5]
inherited PnlComentario: TPanel [5]
Width = 765
ExplicitWidth = 765
inherited lbComentario: TLabel
Width = 755
Height = 25
end
end
inherited EditorActionList: TActionList [9]
inherited actConfPagina: TAction
Visible = False
end
end
inherited SmallImages: TPngImageList [6]
end
inherited LargeImages: TPngImageList [7]
end
inherited JvFormStorage: TJvFormStorage [8]
end
inherited dsDataTable: TDADataSource [10]
end
inherited JvAppRegistryStorage: TJvAppRegistryStorage [11]
end
object dxLayoutLookAndFeelList1: TdxLayoutLookAndFeelList
Left = 336
Top = 176

View File

@ -54,11 +54,11 @@
<DelphiCompile Include="Articulos_view.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\..\..\..\Output\Debug\Servidor\Articulos_controller.dcp" />
<DCCReference Include="..\..\..\..\Output\Debug\Servidor\Articulos_model.dcp" />
<DCCReference Include="..\..\..\..\Output\Debug\Servidor\Contactos_view.dcp" />
<DCCReference Include="..\..\..\..\Output\Debug\Servidor\Familias_controller.dcp" />
<DCCReference Include="..\..\..\..\Output\Debug\Servidor\GUIBase.dcp" />
<DCCReference Include="..\..\Presupuestos de cliente\Articulos_controller.dcp" />
<DCCReference Include="..\..\Presupuestos de cliente\Articulos_model.dcp" />
<DCCReference Include="..\..\Presupuestos de cliente\Contactos_view.dcp" />
<DCCReference Include="..\..\Presupuestos de cliente\Familias_controller.dcp" />
<DCCReference Include="..\..\Presupuestos de cliente\GUIBase.dcp" />
<DCCReference Include="uArticulosViewRegister.pas" />
<DCCReference Include="uEditorArticulo.pas">
<Form>fEditorArticulo</Form>

View File

@ -113,19 +113,28 @@ inherited fEditorComision: TfEditorComision
end
end
end
inherited StatusBar: TJvStatusBar
Top = 664
Width = 747
Panels = <
item
Width = 200
end>
ExplicitTop = 664
ExplicitWidth = 747
end
inherited pgPaginas: TPageControl
Width = 741
Height = 536
Height = 506
MultiLine = True
ExplicitLeft = 3
ExplicitTop = 79
ExplicitTop = 109
ExplicitWidth = 741
ExplicitHeight = 536
ExplicitHeight = 506
inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 733
ExplicitHeight = 508
ExplicitHeight = 478
inline frViewComision1: TfrViewComision
Left = 0
Top = 0
@ -151,20 +160,36 @@ inherited fEditorComision: TfEditorComision
733
110)
inherited eReferencia: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 164
Width = 164
end
inherited eDescripcion: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 108
Width = 108
end
inherited edtFecha: TcxDBDateEdit
Left = 414
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 414
ExplicitWidth = 170
Width = 170
end
inherited cbAgente: TcxDBLookupComboBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 319
Width = 319
end
@ -174,7 +199,7 @@ inherited fEditorComision: TfEditorComision
Left = 0
Top = 110
Width = 733
Height = 398
Height = 368
Align = alClient
ParentBackground = True
TabOrder = 1
@ -219,23 +244,17 @@ inherited fEditorComision: TfEditorComision
inherited ToolBar1: TToolBar
Width = 607
ExplicitWidth = 607
inherited ToolButton1: TToolButton
ExplicitWidth = 113
inherited ToolButton3: TToolButton
ExplicitWidth = 98
end
inherited ToolButton4: TToolButton
ExplicitWidth = 113
end
inherited ToolButton2: TToolButton
ExplicitWidth = 113
end
inherited ToolButton7: TToolButton
ExplicitWidth = 113
inherited ToolButton8: TToolButton
ExplicitWidth = 99
end
end
end
inline frViewVendedoresComision1: TfrViewVendedoresComision
Left = 22
Top = 232
Top = 202
Width = 662
Height = 150
Align = alBottom
@ -248,7 +267,7 @@ inherited fEditorComision: TfEditorComision
TabOrder = 1
ReadOnly = False
ExplicitLeft = 22
ExplicitTop = 232
ExplicitTop = 202
ExplicitWidth = 662
inherited cxGrid: TcxGrid
Width = 662
@ -276,17 +295,11 @@ inherited fEditorComision: TfEditorComision
inherited ToolBar1: TToolBar
Width = 662
ExplicitWidth = 662
inherited ToolButton1: TToolButton
ExplicitWidth = 113
inherited ToolButton3: TToolButton
ExplicitWidth = 98
end
inherited ToolButton4: TToolButton
ExplicitWidth = 113
end
inherited ToolButton2: TToolButton
ExplicitWidth = 113
end
inherited ToolButton7: TToolButton
ExplicitWidth = 113
inherited ToolButton8: TToolButton
ExplicitWidth = 99
end
end
end
@ -324,16 +337,6 @@ inherited fEditorComision: TfEditorComision
end
end
end
inherited StatusBar: TJvStatusBar
Top = 664
Width = 747
Panels = <
item
Width = 200
end>
ExplicitTop = 664
ExplicitWidth = 747
end
inline frViewTotales1: TfrViewTotales [4]
Left = 0
Top = 618
@ -346,7 +349,7 @@ inherited fEditorComision: TfEditorComision
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
TabOrder = 5
ReadOnly = False
ExplicitTop = 618
ExplicitWidth = 747
@ -354,14 +357,6 @@ inherited fEditorComision: TfEditorComision
inherited dxLayoutControl1: TdxLayoutControl
Width = 747
ExplicitWidth = 747
inherited Bevel1: TBevel
Left = 92
Top = 91
Width = 73
ExplicitLeft = 92
ExplicitTop = 91
ExplicitWidth = 73
end
inherited Bevel3: TBevel
Left = 370
Top = 10
@ -372,62 +367,86 @@ inherited fEditorComision: TfEditorComision
end
inherited Bevel4: TBevel
Left = 482
Top = 91
Top = 52
Width = 192
ExplicitLeft = 482
ExplicitTop = 91
ExplicitTop = 52
ExplicitWidth = 192
end
inherited ImporteDto: TcxDBCurrencyEdit
Left = 163
Top = 111
Top = 37
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 163
ExplicitTop = 111
ExplicitTop = 37
ExplicitWidth = 93
Width = 93
end
inherited ImporteIVA: TcxDBCurrencyEdit
Left = 553
Top = 37
Top = 87
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 553
ExplicitTop = 37
ExplicitTop = 87
ExplicitWidth = 137
Width = 137
end
inherited ImporteTotal: TcxDBCurrencyEdit
Left = 483
Top = 111
Top = 141
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 483
ExplicitTop = 111
ExplicitTop = 141
ExplicitWidth = 137
Width = 137
end
inherited edtDescuento: TcxDBSpinEdit
Left = 92
Top = 111
Top = 37
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 111
ExplicitTop = 37
end
inherited edtIVA: TcxDBSpinEdit
Left = 482
Top = 37
Top = 87
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 482
ExplicitTop = 37
ExplicitTop = 87
end
inherited ImporteBase: TcxDBCurrencyEdit
Left = 482
Top = 10
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 482
ExplicitTop = 10
ExplicitWidth = 92
@ -435,19 +454,27 @@ inherited fEditorComision: TfEditorComision
end
inherited edtRE: TcxDBSpinEdit
Left = 482
Top = 64
Top = 114
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 482
ExplicitTop = 64
ExplicitTop = 114
end
inherited ImporteRE: TcxDBCurrencyEdit
Left = 553
Top = 64
Top = 114
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 553
ExplicitTop = 64
ExplicitTop = 114
ExplicitWidth = 56
Width = 56
end
@ -455,7 +482,11 @@ inherited fEditorComision: TfEditorComision
Left = 92
Top = 10
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 10
ExplicitWidth = 147
@ -463,35 +494,47 @@ inherited fEditorComision: TfEditorComision
end
inherited ePorte: TcxDBCurrencyEdit
Left = 92
Top = 138
Top = 64
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 138
ExplicitTop = 64
ExplicitWidth = 147
Width = 147
end
inherited eIVA: TcxDBLookupComboBox
Left = 92
Top = 37
Top = 91
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 37
ExplicitTop = 91
ExplicitWidth = 81
Width = 81
end
inherited bTiposIVA: TButton
Left = 222
Top = 37
Top = 91
ExplicitLeft = 222
ExplicitTop = 37
ExplicitTop = 91
end
inherited cbRecargoEquivalencia: TcxDBCheckBox
Left = 92
Top = 64
Top = 118
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 64
ExplicitTop = 118
ExplicitWidth = 219
Width = 219
end
@ -507,8 +550,13 @@ inherited fEditorComision: TfEditorComision
Visible = False
end
inherited dxLayoutControl1Group3: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
inherited dxLayoutControl1Group11: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
inherited dxLayoutControl1Group9: TdxLayoutGroup
Visible = False
@ -516,20 +564,20 @@ inherited fEditorComision: TfEditorComision
inherited dxLayoutControl1Group8: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
end
end
end
end
end
inherited EditorActionList: TActionList [5]
Left = 96
Top = 168
inherited PnlComentario: TPanel [5]
Width = 747
inherited lbComentario: TLabel
Width = 737
Height = 25
end
end
inherited SmallImages: TPngImageList [6]
inherited SmallImages: TPngImageList
PngImages = <
item
PngImage.Data = {
@ -1872,10 +1920,14 @@ inherited fEditorComision: TfEditorComision
Left = 528
Top = 32
end
inherited JvAppRegistryStorage: TJvAppRegistryStorage [10]
inherited JvAppRegistryStorage: TJvAppRegistryStorage
Left = 560
Top = 32
end
inherited EditorActionList: TActionList [11]
Left = 96
Top = 168
end
inherited StatusBarImages: TPngImageList
Left = 120
Top = 112

View File

@ -5,7 +5,7 @@ interface
uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls,
Buttons, ExtCtrls, Mask, DBCtrls, DB, uDADataTable,
cxControls, cxContainer, cxEdit, cxTextEdit, cxDBEdit,
uIEditorDireccionEntregaPedidoProveedor, uBizPedidosProveedor;
uIEditorDireccionEntregaPedidoProveedor, uBizPedidosProveedor, uDAInterfaces;
type
TfEditorDireccionEntregaPedidoProveedor = class(TForm, IEditorDireccionEntregaPedidoProveedor)

View File

@ -9,7 +9,8 @@ uses
StdActns, ActnList, uCustomView, uViewBase, uViewBarraSeleccion, ComCtrls,
JvExComCtrls, JvStatusBar, TBX, TB2ExtItems, TBXExtItems, TB2Item, TB2Dock,
TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent, JvNavigationPane,
JvgWizardHeader, uIEditorElegirArticulosPedidosProveedor, uBizContactos;
JvgWizardHeader, uIEditorElegirArticulosPedidosProveedor, uBizContactos,
uDAInterfaces;
type
TfEditorElegirArticulosPedidoProveedor = class(TfEditorElegirArticulos, IEditorElegirArticulosPedidosProveedor)

View File

@ -53,7 +53,7 @@ inherited fEditorElegirPedidosProveedor: TfEditorElegirPedidosProveedor
ExplicitWidth = 656
inherited tbxMain: TTBXToolbar
Align = alRight
ExplicitWidth = 126
ExplicitWidth = 269
inherited TBXItem2: TTBXItem
Visible = False
end
@ -71,11 +71,11 @@ inherited fEditorElegirPedidosProveedor: TfEditorElegirPedidosProveedor
end
end
inherited tbxFiltro: TTBXToolbar
Left = 126
Left = 269
Top = 23
DockPos = 115
DockRow = 1
ExplicitLeft = 126
ExplicitLeft = 269
ExplicitTop = 23
inherited TBXItem34: TTBXItem
Action = actQuitarFiltro2
@ -174,7 +174,23 @@ inherited fEditorElegirPedidosProveedor: TfEditorElegirPedidosProveedor
inherited dxLayoutControl1: TdxLayoutControl
Width = 656
ExplicitWidth = 656
inherited txtFiltroTodo: TcxTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
end
inherited edtFechaIniFiltro: TcxDateEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
end
inherited edtFechaFinFiltro: TcxDateEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 404
Width = 404
end

View File

@ -12,7 +12,7 @@ uses
JvNavigationPane, uViewBarraSeleccion, JvgWizardHeader, StdCtrls,
uBizPedidosProveedor, uIEditorElegirPedidosProveedor,
JvExComCtrls, JvStatusBar, uEditorPedidosProveedor, uViewPedidosProveedor,
JSDialog;
JSDialog, uDAInterfaces;
type
TfEditorElegirPedidosProveedor = class(TfEditorPedidosProveedor, IEditorElegirPedidosProveedor)

View File

@ -1,12 +1,5 @@
inherited fEditorPedidosProveedorPreview: TfEditorPedidosProveedorPreview
Caption = 'Previsualizar el pedidos proveedor'
ExplicitWidth = 320
ExplicitHeight = 240
PixelsPerInch = 96
TextHeight = 13
inherited frxReport1: TfrxReport
Datasets = <>
Variables = <>
Style = <>
end
end

View File

@ -9,7 +9,8 @@ uses
TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage,
ExtCtrls, JvExControls, JvComponent, JvNavigationPane, uIEditorPedidosProveedorPreview,
JvExComCtrls, JvStatusBar, frxExportImage, frxExportPDF, frxDCtrl, frxClass,
frxDMPExport, frxGradient, frxChBox, frxCross, frxRich, frxOLE, frxBarcode;
frxDMPExport, frxGradient, frxChBox, frxCross, frxRich, frxOLE, frxBarcode,
frxExportText, frxExportRTF, frxExportMail, frxExportXLS;
type
TfEditorPedidosProveedorPreview = class(TfEditorPreview, IEditorPedidosProveedorPreview)

View File

@ -43,8 +43,6 @@
<Borland.ProjectType>Package</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<Excluded_Packages Name="c:\archivos de programa\borland\delphi10\Bin\dclIntraweb_80_100.bpl">Intraweb 8.0 Design Package for Borland Development Studio 2006</Excluded_Packages>
</Excluded_Packages><Source><Source Name="MainSource">PresupuestosCliente_view.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
</ProjectExtensions>
@ -53,14 +51,13 @@
<DelphiCompile Include="PresupuestosCliente_view.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="Articulos_view.dcp" />
<DCCReference Include="Base.dcp" />
<DCCReference Include="Contactos_controller.dcp" />
<DCCReference Include="GestorInformes_view.dcp" />
<DCCReference Include="GestorInformes_viewcontainsuPresupuestosClienteViewRegisterin.dcp" />
<DCCReference Include="GUIBase.dcp" />
<DCCReference Include="PresupuestosCliente_controller.dcp" />
<DCCReference Include="PresupuestosCliente_model.dcp" />
<DCCReference Include="..\Articulos_view.dcp" />
<DCCReference Include="..\Base.dcp" />
<DCCReference Include="..\Contactos_controller.dcp" />
<DCCReference Include="..\GestorInformes_view.dcp" />
<DCCReference Include="..\GUIBase.dcp" />
<DCCReference Include="..\PresupuestosCliente_controller.dcp" />
<DCCReference Include="..\PresupuestosCliente_model.dcp" />
<DCCReference Include="uEditorElegirArticulosPresupuestoCliente.pas">
<Form>fEditorElegirArticulosPresupuestoCliente</Form>
<DesignClass>TfEditorElegirArticulosPedidoCliente</DesignClass>
@ -83,7 +80,7 @@
</DCCReference>
<DCCReference Include="uPresupuestosClienteViewRegister.pas" />
<DCCReference Include="uViewDatosYSeleccionClientePresupuesto.pas">
<Form>fruViewDatosYSeleccionClientePresupuesto</Form>
<Form>frViewDatosYSeleccionClientePresupuesto</Form>
<DesignClass>TFrame</DesignClass>
</DCCReference>
<DCCReference Include="uViewDetallesPresupuestoCliente.pas">

View File

@ -99,19 +99,28 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
end
end
end
inherited StatusBar: TJvStatusBar
Top = 708
Width = 724
Panels = <
item
Width = 200
end>
ExplicitTop = 708
ExplicitWidth = 724
end
inherited pgPaginas: TPageControl
Width = 718
Height = 580
Height = 550
MultiLine = True
ExplicitLeft = 3
ExplicitTop = 79
ExplicitTop = 109
ExplicitWidth = 718
ExplicitHeight = 580
ExplicitHeight = 550
inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 710
ExplicitHeight = 552
ExplicitHeight = 522
inline frViewRemesaCliente1: TfrViewRemesaCliente
Left = 0
Top = 0
@ -138,24 +147,44 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
710
220)
inherited eReferencia: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 326
Width = 326
end
inherited eDescripcion: TcxDBTextEdit
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 540
Width = 540
end
inherited edtFechaRemesa: TcxDBDateEdit
Left = 521
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 521
ExplicitWidth = 170
Width = 170
end
inherited cbCuentaBancaria: TcxDBLookupComboBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 39
Width = 39
end
inherited cbTipo: TcxDBImageComboBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 121
Width = 121
end
@ -165,11 +194,19 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
inherited dxLayoutControl1: TdxLayoutControl
Width = 429
inherited cbSubCuentas: TcxComboBox
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 376
Width = 376
end
inherited eContabilizar: TcxCheckBox
Left = 453
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 453
ExplicitWidth = 203
Width = 203
@ -189,7 +226,7 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
Left = 0
Top = 210
Width = 710
Height = 342
Height = 312
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
@ -204,14 +241,14 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
ReadOnly = False
ExplicitTop = 210
ExplicitWidth = 710
ExplicitHeight = 342
ExplicitHeight = 312
inherited cxGrid: TcxGrid
Left = 15
Width = 680
Height = 302
Height = 272
ExplicitLeft = 15
ExplicitWidth = 680
ExplicitHeight = 302
ExplicitHeight = 272
inherited cxGridView: TcxGridDBTableView
DataController.Summary.FooterSummaryItems = <
item
@ -239,16 +276,6 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
end
end
end
inherited StatusBar: TJvStatusBar
Top = 708
Width = 724
Panels = <
item
Width = 200
end>
ExplicitTop = 708
ExplicitWidth = 724
end
inline frViewTotales1: TfrViewTotales [4]
Left = 0
Top = 662
@ -261,7 +288,7 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
TabOrder = 4
TabOrder = 5
ReadOnly = False
ExplicitTop = 662
ExplicitWidth = 724
@ -269,14 +296,6 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
inherited dxLayoutControl1: TdxLayoutControl
Width = 724
ExplicitWidth = 724
inherited Bevel1: TBevel
Left = 92
Top = 91
Width = 73
ExplicitLeft = 92
ExplicitTop = 91
ExplicitWidth = 73
end
inherited Bevel3: TBevel
Left = 359
Top = 10
@ -287,62 +306,86 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
end
inherited Bevel4: TBevel
Left = 471
Top = 91
Top = 52
Width = 192
ExplicitLeft = 471
ExplicitTop = 91
ExplicitTop = 52
ExplicitWidth = 192
end
inherited ImporteDto: TcxDBCurrencyEdit
Left = 163
Top = 111
Top = 37
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 163
ExplicitTop = 111
ExplicitTop = 37
ExplicitWidth = 93
Width = 93
end
inherited ImporteIVA: TcxDBCurrencyEdit
Left = 542
Top = 37
Top = 87
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 542
ExplicitTop = 37
ExplicitTop = 87
ExplicitWidth = 137
Width = 137
end
inherited ImporteTotal: TcxDBCurrencyEdit
Left = 472
Top = 111
Top = 141
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 472
ExplicitTop = 111
ExplicitTop = 141
ExplicitWidth = 137
Width = 137
end
inherited edtDescuento: TcxDBSpinEdit
Left = 92
Top = 111
Top = 37
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 111
ExplicitTop = 37
end
inherited edtIVA: TcxDBSpinEdit
Left = 471
Top = 37
Top = 87
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 471
ExplicitTop = 37
ExplicitTop = 87
end
inherited ImporteBase: TcxDBCurrencyEdit
Left = 471
Top = 10
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 471
ExplicitTop = 10
ExplicitWidth = 92
@ -350,19 +393,27 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
end
inherited edtRE: TcxDBSpinEdit
Left = 471
Top = 64
Top = 114
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 471
ExplicitTop = 64
ExplicitTop = 114
end
inherited ImporteRE: TcxDBCurrencyEdit
Left = 542
Top = 64
Top = 114
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 542
ExplicitTop = 64
ExplicitTop = 114
ExplicitWidth = 56
Width = 56
end
@ -370,7 +421,11 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
Left = 92
Top = 10
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 10
ExplicitWidth = 147
@ -378,35 +433,47 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
end
inherited ePorte: TcxDBCurrencyEdit
Left = 92
Top = 138
Top = 64
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
Style.IsFontAssigned = True
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 138
ExplicitTop = 64
ExplicitWidth = 147
Width = 147
end
inherited eIVA: TcxDBLookupComboBox
Left = 92
Top = 37
Top = 91
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 37
ExplicitTop = 91
ExplicitWidth = 81
Width = 81
end
inherited bTiposIVA: TButton
Left = 211
Top = 37
Top = 91
ExplicitLeft = 211
ExplicitTop = 37
ExplicitTop = 91
end
inherited cbRecargoEquivalencia: TcxDBCheckBox
Left = 92
Top = 64
Top = 118
DataBinding.DataField = ''
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 92
ExplicitTop = 64
ExplicitTop = 118
ExplicitWidth = 219
Width = 219
end
@ -422,8 +489,13 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
Visible = False
end
inherited dxLayoutControl1Group3: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
inherited dxLayoutControl1Group11: TdxLayoutGroup
inherited dxLayoutControl1Item12: TdxLayoutItem
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
inherited dxLayoutControl1Group9: TdxLayoutGroup
Visible = False
@ -431,35 +503,20 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
inherited dxLayoutControl1Group8: TdxLayoutGroup
Visible = False
end
inherited dxLayoutControl1Item14: TdxLayoutItem
Visible = False
end
end
end
end
end
end
end
inherited EditorActionList: TActionList [5]
Left = 96
Top = 168
inherited actPrevisualizar: TAction
Enabled = False
Visible = False
end
inherited actImprimir: TAction
Enabled = False
Visible = False
end
object actVolcarDisco: TAction
Category = 'Acciones'
Caption = 'Volcar a disco...'
ImageIndex = 22
OnExecute = actVolcarDiscoExecute
OnUpdate = actVolcarDiscoUpdate
inherited PnlComentario: TPanel [5]
Width = 724
inherited lbComentario: TLabel
Width = 714
Height = 25
end
end
inherited SmallImages: TPngImageList [6]
inherited SmallImages: TPngImageList
PngImages = <
item
PngImage.Data = {
@ -1802,10 +1859,29 @@ inherited fEditorRemesaCliente: TfEditorRemesaCliente
Left = 528
Top = 32
end
inherited JvAppRegistryStorage: TJvAppRegistryStorage [10]
inherited JvAppRegistryStorage: TJvAppRegistryStorage
Left = 560
Top = 32
end
inherited EditorActionList: TActionList [11]
Left = 96
Top = 168
inherited actPrevisualizar: TAction
Enabled = False
Visible = False
end
inherited actImprimir: TAction
Enabled = False
Visible = False
end
object actVolcarDisco: TAction
Category = 'Acciones'
Caption = 'Volcar a disco...'
ImageIndex = 22
OnExecute = actVolcarDiscoExecute
OnUpdate = actVolcarDiscoUpdate
end
end
inherited StatusBarImages: TPngImageList
Left = 120
Top = 112

View File

@ -1,12 +1,5 @@
inherited fEditorRemesaClientePreview: TfEditorRemesaClientePreview
Caption = 'Previsualizar la remesa'
ExplicitWidth = 660
ExplicitHeight = 494
PixelsPerInch = 96
TextHeight = 13
inherited frxReport1: TfrxReport
Datasets = <>
Variables = <>
Style = <>
end
end

View File

@ -10,7 +10,8 @@ uses
JvFormPlacement, ImgList, PngImageList, StdActns, ActnList, ComCtrls,
TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage,
ExtCtrls, JvExControls, JvComponent, JvNavigationPane, uIEditorRemesasClientePreview,
JvExComCtrls, JvStatusBar;
JvExComCtrls, JvStatusBar, frxExportText, frxExportRTF, frxExportMail,
frxExportXLS;
type
TfEditorRemesaClientePreview = class(TfEditorPreview, IEditorRemesasClientePreview)

View File

@ -112,9 +112,6 @@ end;
procedure TfEditorRemesaProveedor.GuardarInterno;
var
bEsNuevo : Boolean;
AIgnorarContabilidad: Integer;
ASubCuenta: Integer;
begin
inherited;
bEsNuevo := False;

View File

@ -2,9 +2,4 @@ inherited fEditorRemesaProveedorPreview: TfEditorRemesaProveedorPreview
Caption = 'Previsualizar la remesa'
PixelsPerInch = 96
TextHeight = 13
inherited frxReport1: TfrxReport
Datasets = <>
Variables = <>
Style = <>
end
end

View File

@ -10,7 +10,8 @@ uses
JvFormPlacement, ImgList, PngImageList, StdActns, ActnList, ComCtrls,
TB2ExtItems, TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage,
ExtCtrls, JvExControls, JvComponent, JvNavigationPane, uIEditorRemesasProveedorPreview,
JvExComCtrls, JvStatusBar;
JvExComCtrls, JvStatusBar, frxExportText, frxExportRTF, frxExportMail,
frxExportXLS;
type
TfEditorRemesaProveedorPreview = class(TfEditorPreview, IEditorRemesasProveedorPreview)

View File

@ -4,6 +4,7 @@ inherited fEditorRemesasProveedor: TfEditorRemesasProveedor
Caption = 'Lista de remesas de pago'
ClientWidth = 820
ExplicitWidth = 828
ExplicitHeight = 240
PixelsPerInch = 96
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader
@ -43,7 +44,7 @@ inherited fEditorRemesasProveedor: TfEditorRemesasProveedor
Width = 820
ExplicitWidth = 820
inherited tbxMain: TTBXToolbar
ExplicitWidth = 403
ExplicitWidth = 546
object TBXSeparatorItem17: TTBXSeparatorItem [12]
end
end

View File

@ -221,7 +221,6 @@ end;
procedure TfEditorRemesasProveedor.EliminarInterno;
var
ACadena : String;
ARemesas: IBizRemesaProveedor;
AllItems: Boolean;
begin

Binary file not shown.

View File

@ -16,7 +16,7 @@ BEGIN
VALUE "FileVersion", "2.2.9.0\0"
VALUE "ProductName", "FactuGES (Servidor)\0"
VALUE "ProductVersion", "2.2.9.0\0"
VALUE "CompileDate", "jueves, 19 de febrero de 2009 15:17\0"
VALUE "CompileDate", "martes, 03 de marzo de 2009 16:40\0"
END
END
BLOCK "VarFileInfo"