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

Fallo en componentes cxDBLookupComboBox por la migración a DevExpress 6.

Browse Source 
- No mostraba el valor elegido en el combo al abrir por primera una ficha.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@202 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-01-04 11:16:59 +00:00
parent e542cff9b8
commit 00672ada2c
53 changed files with 438 additions and 319 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
Source/GUIBase/uViewTotales.dfm
View File

@ -1,14 +1,14 @@
inherited frViewTotales: TfrViewTotales
Width = 451
Height = 350
Width = 880
Height = 316
Align = alBottom
ExplicitWidth = 451
ExplicitHeight = 350
ExplicitWidth = 880
ExplicitHeight = 316
object dxLayoutControl1: TdxLayoutControl
AlignWithMargins = True
Left = 0
Top = 0
Width = 451
Width = 880
Height = 217
Margins.Left = 0
Margins.Top = 0
@ -18,6 +18,7 @@ inherited frViewTotales: TfrViewTotales
ParentBackground = True
TabOrder = 0
AutoContentSizes = [acsWidth, acsHeight]
ExplicitWidth = 451
object Bevel1: TBevel
Left = 104
Top = 109
@ -26,14 +27,14 @@ inherited frViewTotales: TfrViewTotales
Shape = bsBottomLine
end
object Bevel3: TBevel
Left = 278
Left = 434
Top = 28
Width = 3
Height = 122
Shape = bsRightLine
end
object Bevel4: TBevel
Left = 390
Left = 546
Top = 109
Width = 192
Height = 9
@ -71,7 +72,7 @@ inherited frViewTotales: TfrViewTotales
Width = 93
end
object ImporteIVA: TcxDBCurrencyEdit
Left = 461
Left = 617
Top = 55
AutoSize = False
DataBinding.DataField = 'IMPORTE_IVA'
@ -102,7 +103,7 @@ inherited frViewTotales: TfrViewTotales
Width = 137
end
object ImporteTotal: TcxDBCurrencyEdit
Left = 391
Left = 547
Top = 129
AutoSize = False
DataBinding.DataField = 'IMPORTE_TOTAL'
@ -164,7 +165,7 @@ inherited frViewTotales: TfrViewTotales
Width = 65
end
object edtIVA: TcxDBSpinEdit
Left = 390
Left = 546
Top = 55
AutoSize = False
DataBinding.DataField = 'IVA'
@ -201,7 +202,7 @@ inherited frViewTotales: TfrViewTotales
Width = 65
end
object ImporteBase: TcxDBCurrencyEdit
Left = 390
Left = 546
Top = 28
AutoSize = False
DataBinding.DataField = 'BASE_IMPONIBLE'
@ -232,7 +233,7 @@ inherited frViewTotales: TfrViewTotales
Width = 92
end
object edtRE: TcxDBSpinEdit
Left = 390
Left = 546
Top = 82
AutoSize = False
DataBinding.DataField = 'RE'
@ -269,7 +270,7 @@ inherited frViewTotales: TfrViewTotales
Width = 65
end
object ImporteRE: TcxDBCurrencyEdit
Left = 461
Left = 617
Top = 82
AutoSize = False
DataBinding.DataField = 'IMPORTE_RE'
@ -365,7 +366,6 @@ inherited frViewTotales: TfrViewTotales
Top = 55
DataBinding.DataField = 'ID_TIPO_IVA'
DataBinding.DataSource = DADataSource
Properties.GridMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'ID'
Properties.ListColumns = <
@ -374,6 +374,7 @@ inherited frViewTotales: TfrViewTotales
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsTiposIVA
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
@ -392,7 +393,7 @@ inherited frViewTotales: TfrViewTotales
Width = 81
end
object bTiposIVA: TButton
Left = 130
Left = 286
Top = 55
Width = 132
Height = 21

2
Source/Modulos/Albaranes de cliente/Views/uViewAlbaranCliente.dfm
View File

@ -329,6 +329,7 @@ inherited frViewAlbaranCliente: TfrViewAlbaranCliente
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsFormaPago
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
@ -401,6 +402,7 @@ inherited frViewAlbaranCliente: TfrViewAlbaranCliente
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsAlmacenes
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D

3
Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesCliente.pas
View File

@ -8,7 +8,7 @@ uses
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
cxGrid,
uBizAlbaranesCliente, cxCurrencyEdit, Forms, uViewFiltroBase, ComCtrls, Tabs,
@ -289,3 +289,4 @@ begin
end;
end.

BIN
Source/Modulos/Albaranes de cliente/Views/uViewAlbaranesDevCliente.pas
View File

Binary file not shown.

BIN
Source/Modulos/Albaranes de cliente/Views/uViewElegirArticulosAlbaranesCliente.pas
View File

Binary file not shown.

1
Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranProveedor.dfm
View File

@ -203,6 +203,7 @@ inherited frViewAlbaranProveedor: TfrViewAlbaranProveedor
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsFormaPago
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D

2
Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesDevProveedor.pas
View File

@ -9,7 +9,7 @@ uses
cxCurrencyEdit, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap,
dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, dxPgsDlg,
dxPSCore, ImgList, PngImageList, ActnList, cxGridCustomPopupMenu,
cxGridPopupMenu, dxPScxCommon, dxPScxGridLnk, uDADataTable, TB2Item, TBX,
cxGridPopupMenu, dxPScxCommon, dxPScxGrid6Lnk, uDADataTable, TB2Item, TBX,
TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, cxGridLevel,
cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxClasses,
cxControls, cxGridCustomView, cxGrid, cxTextEdit;

2
Source/Modulos/Albaranes de proveedor/Views/uViewAlbaranesProveedor.pas
View File

@ -8,7 +8,7 @@ uses
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
cxGrid, uBizAlbaranesProveedor, cxCurrencyEdit, Forms, uViewFiltroBase,
ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, cxTextEdit;

2
Source/Modulos/Albaranes de proveedor/Views/uViewDireccionEntregaAlbaranProv.dfm
View File

@ -41,7 +41,7 @@ inherited frViewDireccionEntregaAlbaranProv: TfrViewDireccionEntregaAlbaranProv
DataBinding.DataField = 'ID_ALMACEN'
DataBinding.DataSource = dsAlbaran
Properties.DropDownListStyle = lsFixedList
Properties.GridMode = True
Properties.ListOptions.SyncMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'ID'
Properties.ListColumns = <

2
Source/Modulos/Albaranes de proveedor/Views/uViewElegirArticulosAlbaranesProveedor.pas
View File

@ -8,7 +8,7 @@ uses
cxDataStorage, cxEdit, DB, cxDBData, cxImageComboBox, cxCurrencyEdit,
cxSpinEdit, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev,
dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, ImgList, PngImageList,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, uBizContactos,
dxPgsDlg, ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock,

2
Source/Modulos/Almacenes/Views/uViewAlmacenes.pas
View File

@ -11,7 +11,7 @@ uses
cxGridBandedTableView, cxGridDBBandedTableView, JvComponent,
JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn,
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
cxGridCustomPopupMenu, cxGridPopupMenu, uViewFiltroBase, TB2Item, TBX,
TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg, uDAInterfaces;

2
Source/Modulos/Articulos/Views/uViewArticulos.pas
View File

@ -11,7 +11,7 @@ uses
cxGridBandedTableView, cxGridDBBandedTableView, JvComponent,
JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn,
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
cxGridCustomPopupMenu, cxGridPopupMenu, cxCurrencyEdit, cxSpinEdit, cxCheckBox,
cxCheckComboBox, cxImageComboBox, TB2Item, TBX, TB2Toolbar, TBXDkPanels,
TB2Dock, uViewFiltroBase, dxPgsDlg, uDAInterfaces;

82
Source/Modulos/Articulos/Views/uViewDetallesArticulos.dfm
View File

@ -1,54 +1,10 @@
inherited frViewDetallesArticulos: TfrViewDetallesArticulos
Width = 930
ParentBiDiMode = False
OnShow = CustomViewShow
inherited ToolBar1: TToolBar
Width = 930
Height = 51
inherited ToolButton4: TToolButton
ExplicitTop = 30
end
inherited ToolButton7: TToolButton
Wrap = False
end
inherited ToolButton11: TToolButton
Left = 334
Top = 30
ExplicitLeft = 334
ExplicitTop = 30
end
inherited ToolButton9: TToolButton
Left = 475
Top = 30
ExplicitLeft = 475
ExplicitTop = 30
end
inherited ToolButton8: TToolButton
Left = 620
Top = 30
Wrap = False
ExplicitLeft = 620
ExplicitTop = 30
end
inherited ToolButton10: TToolButton
Left = 703
Top = 30
ExplicitLeft = 703
ExplicitTop = 30
end
end
inherited cxGrid: TcxGrid
Top = 77
Width = 930
Height = 227
ExplicitTop = 121
ExplicitHeight = 183
inherited cxGridView: TcxGridDBTableView
OptionsSelection.HideFocusRectOnExit = False
OptionsView.ShowEditButtons = gsebForFocusedRecord
inherited cxGridViewTIPO: TcxGridDBColumn
Width = 26
end
object cxGridViewID_ARTICULO: TcxGridDBColumn [3]
DataBinding.FieldName = 'ID_ARTICULO'
Visible = False
@ -75,9 +31,6 @@ inherited frViewDetallesArticulos: TfrViewDetallesArticulos
inherited cxGridViewDESCRIPCION: TcxGridDBColumn
Width = 85
end
inherited cxGridViewCANTIDAD: TcxGridDBColumn
Width = 48
end
object cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn [8]
Caption = 'Unid. medida'
PropertiesClassName = 'TcxComboBoxProperties'
@ -85,10 +38,11 @@ inherited frViewDetallesArticulos: TfrViewDetallesArticulos
Properties.ImmediateUpdateText = True
Properties.OnInitPopup = cxGridViewUNIDAD_MEDIDAPropertiesInitPopup
Visible = False
Options.CellMerging = True
Width = 60
end
inherited cxGridViewIMPORTEUNIDAD: TcxGridDBColumn
Width = 48
Width = 50
end
inherited cxGridViewDESCUENTO: TcxGridDBColumn
HeaderAlignmentHorz = taRightJustify
@ -98,37 +52,7 @@ inherited frViewDetallesArticulos: TfrViewDetallesArticulos
Caption = 'Porte unidad'
end
inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn
Width = 49
end
end
end
inherited TBXDock1: TTBXDock
Top = 51
Width = 930
ExplicitTop = 51
ExplicitWidth = 930
inherited TBXToolbar1: TTBXToolbar
ExplicitWidth = 626
inherited TBXItem5: TTBXItem
Visible = True
end
inherited TBXItem6: TTBXItem
Visible = True
end
inherited TBXItem7: TTBXItem
Visible = True
end
inherited TBXItem9: TTBXItem
Visible = True
end
inherited TBXItem10: TTBXItem
Visible = True
end
inherited TBXItem11: TTBXItem
Visible = True
end
inherited TBXItem8: TTBXItem
Visible = True
Width = 50
end
end
end

22
Source/Modulos/Articulos/Views/uViewDetallesArticulos.pas
View File

@ -44,13 +44,14 @@ type
procedure AnadirArticulosInterno; virtual;
procedure RellenarArticulosInterno; virtual;
function AnadirArticulo(pReferencia: String; TipoReferencia: TEnumReferencia): Boolean; virtual;
function EsTipoEditable(AItem: TcxCustomGridTableItem): Boolean; override;
end;
implementation
{$R *.dfm}
uses
uViewDetallesBase, uUnidadesMedidaController;
uCalculosUtils, uViewDetallesBase, uControllerDetallesBase, uUnidadesMedidaController;
procedure TfrViewDetallesArticulos.actAnadirArticulosExecute(Sender: TObject);
begin
@ -122,7 +123,26 @@ begin
end;
end;
end;
end;
function TfrViewDetallesArticulos.EsTipoEditable(
AItem: TcxCustomGridTableItem): Boolean;
var
IndiceCol : Integer;
begin
Result := True;
if (AItem.Index in [cxGridViewREFERENCIA.Index, cxGridViewREFERENCIA_PROVEEDOR.Index]) then
begin
IndiceCol := cxGridView.GetColumnByFieldName(CAMPO_TIPO).Index;
if ((AItem.GridView.Items[IndiceCol].EditValue = TIPO_DETALLE_SALTO) or
(AItem.GridView.Items[IndiceCol].EditValue = TIPO_DETALLE_SUBTOTAL) or
(AItem.GridView.Items[IndiceCol].EditValue = TIPO_DETALLE_DESCUENTO) or
(AItem.GridView.Items[IndiceCol].EditValue = TIPO_DETALLE_TITULO)) then
Result := False;
end
else
Result := inherited EsTipoEditable(AItem);
end;
procedure TfrViewDetallesArticulos.OnValidateReferencia(Sender: TObject; var DisplayValue: Variant; var ErrorText: TCaption; var Error: Boolean);

27
Source/Modulos/Contactos/Views/uEditorElegirClientes.dfm
View File

@ -51,17 +51,17 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
ExplicitTop = 87
ExplicitWidth = 683
inherited tbxMain: TTBXToolbar
ExplicitWidth = 284
ExplicitWidth = 126
inherited TBXItem36: TTBXItem
Action = actAnchoAuto2
end
end
inherited tbxFiltro: TTBXToolbar
Left = 284
Left = 126
Top = 23
DockPos = 96
DockRow = 1
ExplicitLeft = 284
ExplicitLeft = 126
ExplicitTop = 23
inherited TBXItem34: TTBXItem
Action = actQuitarFiltro2
@ -165,17 +165,9 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
inherited dxLayoutControl1: TdxLayoutControl
Width = 663
ExplicitWidth = 663
inherited txtFiltroTodo: TcxTextEdit
ExplicitWidth = 457
Width = 457
end
inherited edtFechaIniFiltro: TcxDateEdit
ExplicitWidth = 240
Width = 240
end
inherited edtFechaFinFiltro: TcxDateEdit
ExplicitWidth = 332
Width = 332
ExplicitWidth = 232
Width = 232
end
end
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@ -196,15 +188,6 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
ExplicitWidth = 663
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 663
ExplicitWidth = 663
inherited TBXToolbar1: TTBXToolbar
Width = 653
ExplicitWidth = 653
inherited TBXItem2: TTBXItem [0]
end
inherited TBXItem1: TTBXItem [1]
end
end
end
end
inherited dsDataSource: TDADataSource

84
Source/Modulos/Contactos/Views/uEditorEmpleado.dfm
View File

@ -63,6 +63,8 @@ inherited fEditorEmpleado: TfEditorEmpleado
ExplicitWidth = 676
ExplicitHeight = 481
inherited pagGeneral: TTabSheet
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 668
ExplicitHeight = 453
inline frViewEmpleado1: TfrViewEmpleado
@ -106,28 +108,28 @@ inherited fEditorEmpleado: TfEditorEmpleado
ExplicitTop = 162
end
inherited eCalle: TcxDBTextEdit
Top = 189
ExplicitTop = 189
Top = 162
ExplicitTop = 162
ExplicitWidth = 174
Width = 174
end
inherited eProvincia: TcxDBTextEdit
Top = 243
ExplicitTop = 243
Top = 216
ExplicitTop = 216
ExplicitWidth = 174
Width = 174
end
inherited ePoblacion: TcxDBTextEdit
Top = 216
ExplicitTop = 216
Top = 189
ExplicitTop = 189
ExplicitWidth = 108
Width = 108
end
inherited eCodigoPostal: TcxDBTextEdit
Left = 312
Top = 216
Top = 189
ExplicitLeft = 312
ExplicitTop = 216
ExplicitTop = 189
end
inherited eObservaciones: TcxDBMemo
Top = 294
@ -137,6 +139,20 @@ inherited fEditorEmpleado: TfEditorEmpleado
Height = 148
Width = 185
end
inherited eFechaNacimiento: TcxDBDateEdit
Top = 84
ExplicitTop = 84
ExplicitWidth = 80
Width = 80
end
inherited eFechaAltaEmpresa: TcxDBDateEdit
Left = 290
Top = 84
ExplicitLeft = 290
ExplicitTop = 84
ExplicitWidth = 80
Width = 80
end
inherited eTlfParticular: TcxDBTextEdit
Left = 500
Top = 57
@ -153,6 +169,12 @@ inherited fEditorEmpleado: TfEditorEmpleado
ExplicitWidth = 172
Width = 172
end
inherited cbCategoria: TcxDBComboBox
Top = 111
ExplicitTop = 111
ExplicitWidth = 225
Width = 225
end
inherited eTlfMovil: TcxDBTextEdit
Left = 500
Top = 84
@ -175,20 +197,6 @@ inherited fEditorEmpleado: TfEditorEmpleado
ExplicitWidth = 263
Width = 263
end
inherited eFechaNacimiento: TcxDBDateEdit
Top = 84
ExplicitTop = 84
ExplicitWidth = 80
Width = 80
end
inherited eFechaAltaEmpresa: TcxDBDateEdit
Left = 290
Top = 84
ExplicitLeft = 290
ExplicitTop = 84
ExplicitWidth = 80
Width = 80
end
inherited eNIFCIF: TcxDBTextEdit
Left = 219
Top = 30
@ -215,12 +223,6 @@ inherited fEditorEmpleado: TfEditorEmpleado
ExplicitWidth = 165
Width = 165
end
inherited cbCategoria: TcxDBComboBox
Top = 111
ExplicitTop = 111
ExplicitWidth = 225
Width = 225
end
inherited ePaginaWeb: TcxDBHyperLinkEdit
Left = 500
Top = 217
@ -236,8 +238,8 @@ inherited fEditorEmpleado: TfEditorEmpleado
Width = 97
end
inherited ePersonaContacto: TcxDBTextEdit
Top = 162
ExplicitTop = 162
Top = 243
ExplicitTop = 243
ExplicitWidth = 256
Width = 256
end
@ -260,23 +262,9 @@ inherited fEditorEmpleado: TfEditorEmpleado
Width = 668
LookAndFeel = dxLayoutOfficeLookAndFeel
ExplicitWidth = 668
inherited eEntidad: TcxDBTextEdit
ExplicitWidth = 114
Width = 114
end
inherited eSucursal: TcxDBTextEdit
Left = 429
ExplicitLeft = 429
ExplicitWidth = 112
Width = 112
end
inherited eCuenta: TcxDBTextEdit
ExplicitWidth = 194
Width = 194
end
inherited eTitular: TcxDBTextEdit
ExplicitWidth = 194
Width = 194
end
end
end
@ -284,6 +272,10 @@ inherited fEditorEmpleado: TfEditorEmpleado
object pagFormacion: TTabSheet
Caption = 'Formaci'#243'n'
ImageIndex = 2
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object dxLayoutControl1: TdxLayoutControl
Left = 0
Top = 0
@ -401,6 +393,10 @@ inherited fEditorEmpleado: TfEditorEmpleado
object pagExperiencia: TTabSheet
Caption = 'Experiencia'
ImageIndex = 3
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object dxLayoutControl2: TdxLayoutControl
Left = 0
Top = 0

5
Source/Modulos/Contactos/Views/uEditorEmpleado.pas
View File

@ -1,4 +1,4 @@
unit uEditorEmpleado;
unit uEditorEmpleado;
interface
@ -11,7 +11,8 @@ uses
uViewEmpleado, uBizContactos,
uIEditorEmpleado, pngimage, TBXStatusBars, JvExComCtrls, JvStatusBar,
uViewDetallesGenerico, uViewContactoDatosBancarios, dxLayoutLookAndFeels,
dxLayoutControl, cxContainer, cxEdit, cxTextEdit, cxMemo, cxDBEdit, cxControls;
dxLayoutControl, cxContainer, cxEdit, cxTextEdit, cxMemo, cxDBEdit, cxControls,
uDAInterfaces;
type
TfEditorEmpleado = class(TfEditorContacto, IEditorEmpleado)

2
Source/Modulos/Contactos/Views/uViewClienteDatosComerciales.dfm
View File

@ -109,6 +109,7 @@ inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsFormaPago
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
@ -148,6 +149,7 @@ inherited frViewClienteDatosComerciales: TfrViewClienteDatosComerciales
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsTiposIVA
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D

19
Source/Modulos/Contactos/Views/uViewClientes.dfm
View File

@ -1,5 +1,11 @@
inherited frViewClientes: TfrViewClientes
Width = 793
Height = 592
ExplicitWidth = 793
ExplicitHeight = 592
inherited cxGrid: TcxGrid
Width = 793
Height = 464
inherited cxGridView: TcxGridDBTableView
DataController.Summary.FooterSummaryItems = <
item
@ -59,8 +65,10 @@ inherited frViewClientes: TfrViewClientes
end
end
inherited frViewFiltroBase1: TfrViewFiltroBase
Width = 793
inherited TBXDockablePanel1: TTBXDockablePanel
inherited dxLayoutControl1: TdxLayoutControl
Width = 793
inherited txtFiltroTodo: TcxTextEdit
ExplicitWidth = 273
Width = 273
@ -70,15 +78,26 @@ inherited frViewClientes: TfrViewClientes
Width = 121
end
inherited edtFechaFinFiltro: TcxDateEdit
Left = 335
ExplicitLeft = 335
ExplicitWidth = 284
Width = 284
end
end
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 793
inherited tbxBotones: TTBXToolbar
Width = 783
end
end
end
end
inherited pnlAgrupaciones: TTBXDockablePanel
Top = 566
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 793
inherited TBXToolbar1: TTBXToolbar
Width = 783
Visible = False
end
end

BIN
Source/Modulos/Contactos/Views/uViewClientes.pas
View File

Binary file not shown.

4
Source/Modulos/Contactos/Views/uViewContactos.dfm
View File

@ -99,8 +99,8 @@ inherited frViewContactos: TfrViewContactos
Width = 557
ExplicitWidth = 557
inherited edtFechaFinFiltro: TcxDateEdit
ExplicitWidth = 284
Width = 284
ExplicitWidth = 307
Width = 307
end
end
inherited TBXAlignmentPanel1: TTBXAlignmentPanel

6
Source/Modulos/Contactos/Views/uViewContactos.pas
View File

@ -11,10 +11,10 @@ uses
cxGridBandedTableView, cxGridDBBandedTableView, JvComponent,
JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn,
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk,
udatamoduleclientes, cxGridCustomPopupMenu, cxGridPopupMenu, uViewFiltroBase,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon,
uDataModuleClientes, cxGridCustomPopupMenu, cxGridPopupMenu, uViewFiltroBase,
ComCtrls, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, dxPgsDlg,
uDAInterfaces;
uDAInterfaces, dxPScxGrid6Lnk;
type
IViewContactos = interface(IViewGrid)

2
Source/Modulos/Contactos/Views/uViewEmpleados.pas
View File

@ -8,7 +8,7 @@ uses
cxDataStorage, cxEdit, DB, cxDBData, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg,
dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, ImgList, PngImageList, cxGridCustomPopupMenu,
cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk, uDADataTable,
cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, uDADataTable,
cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg, ActnList, TB2Item,
TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, uDAInterfaces;

2
Source/Modulos/Contactos/Views/uViewProveedorDatosComerciales.dfm
View File

@ -62,6 +62,7 @@ inherited frViewProveedorDatosComerciales: TfrViewProveedorDatosComerciales
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsFormaPago
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
@ -100,6 +101,7 @@ inherited frViewProveedorDatosComerciales: TfrViewProveedorDatosComerciales
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsTiposIVA
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D

2
Source/Modulos/Contactos/Views/uViewProveedores.pas
View File

@ -8,7 +8,7 @@ uses
cxDataStorage, cxEdit, DB, cxDBData, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg,
dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, ImgList, PngImageList, cxGridCustomPopupMenu,
cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk, uDADataTable,
cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, uDADataTable,
cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg, ActnList, TB2Item,
TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, cxImageComboBox,

2
Source/Modulos/Facturas de proveedor/Views/FacturasProveedor_view.dproj
View File

@ -90,7 +90,7 @@
</Project>
<!-- EurekaLog First Line
[Exception Log]
EurekaLog Version=6006
EurekaLog Version=6011
Activate=0
Activate Handle=1
Save Log File=1

172
Source/Modulos/Facturas de proveedor/Views/uEditorFacturaProveedor.dfm
View File

@ -7,7 +7,7 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor
Position = poScreenCenter
OnClose = CustomEditorClose
ExplicitWidth = 796
ExplicitHeight = 600
ExplicitHeight = 607
PixelsPerInch = 96
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader
@ -69,21 +69,21 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor
end
end
inherited pgPaginas: TPageControl
Width = 788
Height = 315
Width = 782
Height = 309
OnChanging = pgPaginasChanging
ExplicitWidth = 788
ExplicitHeight = 315
ExplicitWidth = 782
ExplicitHeight = 309
inherited pagGeneral: TTabSheet
ExplicitLeft = 4
ExplicitTop = 24
ExplicitWidth = 780
ExplicitHeight = 287
ExplicitWidth = 774
ExplicitHeight = 281
inline frViewFacturaProveedor1: TfrViewFacturaProveedor
Left = 0
Top = 0
Width = 780
Height = 287
Width = 774
Height = 281
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
@ -93,13 +93,13 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor
ParentFont = False
TabOrder = 0
ReadOnly = False
ExplicitWidth = 780
ExplicitHeight = 287
ExplicitWidth = 774
ExplicitHeight = 281
inherited dxLayoutControl1: TdxLayoutControl
Width = 780
Height = 287
ExplicitWidth = 780
ExplicitHeight = 287
Width = 774
Height = 281
ExplicitWidth = 774
ExplicitHeight = 281
inherited eReferencia: TcxDBTextEdit
ExplicitWidth = 159
Width = 159
@ -119,13 +119,13 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor
Width = 78
end
inherited bFormasPago: TButton
Left = 234
ExplicitLeft = 234
Left = 231
ExplicitLeft = 231
end
inherited frViewProveedorFactura: TfrViewDatosYSeleccionProveedor
Left = 394
Left = 391
Width = 350
ExplicitLeft = 394
ExplicitLeft = 391
ExplicitWidth = 350
inherited dxLayoutControl1: TdxLayoutControl
Width = 350
@ -155,13 +155,13 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor
Width = 327
end
inherited edtCodigoPostal: TcxDBTextEdit
Left = 272
Left = 269
DataBinding.DataSource = frViewFacturaProveedor1.DADataSource
ExplicitLeft = 272
ExplicitLeft = 269
end
inherited Button3: TBitBtn
Left = 156
ExplicitLeft = 156
Left = 153
ExplicitLeft = 153
end
end
end
@ -174,8 +174,8 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor
inline frViewDetallesFacturaProveedor1: TfrViewDetallesFacturaProveedor
Left = 0
Top = 0
Width = 780
Height = 287
Width = 774
Height = 281
Align = alClient
BiDiMode = bdLeftToRight
Font.Charset = DEFAULT_CHARSET
@ -187,79 +187,105 @@ inherited fEditorFacturaProveedor: TfEditorFacturaProveedor
ParentFont = False
TabOrder = 0
ReadOnly = False
ExplicitWidth = 780
ExplicitHeight = 287
ExplicitWidth = 774
ExplicitHeight = 281
inherited ToolBar1: TToolBar
Width = 780
ExplicitWidth = 780
inherited ToolButton4: TToolButton
Width = 774
Height = 51
ExplicitWidth = 774
ExplicitHeight = 51
inherited ToolButton3: TToolButton
Wrap = False
end
inherited ToolButton14: TToolButton
inherited ToolButton4: TToolButton [3]
Left = 278
Top = 0
ExplicitLeft = 278
ExplicitTop = 0
end
inherited ToolButton14: TToolButton [4]
Left = 334
Top = 0
Wrap = True
ExplicitLeft = 334
ExplicitTop = 0
end
inherited FontName: TJvFontComboBox
Left = 399
Top = 0
ExplicitLeft = 399
ExplicitTop = 0
end
inherited FontSize: TEdit [6]
Left = 544
Top = 0
Width = 57
ExplicitLeft = 544
ExplicitTop = 0
ExplicitWidth = 57
end
inherited UpDown1: TUpDown [7]
Left = 601
Top = 0
ExplicitLeft = 601
ExplicitTop = 0
end
inherited ToolButton13: TToolButton [8]
end
inherited ToolButton6: TToolButton [9]
Left = 0
ExplicitLeft = 0
end
inherited FontSize: TEdit
Left = 145
Width = 57
ExplicitLeft = 145
ExplicitWidth = 57
inherited ToolButton7: TToolButton [10]
Left = 66
Top = 30
ExplicitLeft = 66
ExplicitTop = 30
end
inherited UpDown1: TUpDown
Left = 202
ExplicitLeft = 202
inherited ToolButton8: TToolButton [11]
Left = 133
Top = 30
ExplicitLeft = 133
ExplicitTop = 30
end
inherited ToolButton13: TToolButton
Left = 219
ExplicitLeft = 219
end
inherited ToolButton6: TToolButton
Left = 227
ExplicitLeft = 227
end
inherited ToolButton7: TToolButton
Left = 261
ExplicitLeft = 261
end
inherited ToolButton8: TToolButton
Left = 295
ExplicitLeft = 295
end
inherited ToolButton12: TToolButton
Left = 329
ExplicitLeft = 329
inherited ToolButton12: TToolButton [12]
Left = 216
Top = 30
ExplicitLeft = 216
ExplicitTop = 30
end
inherited ToolButton9: TToolButton
Left = 337
ExplicitLeft = 337
Left = 224
Top = 30
ExplicitLeft = 224
ExplicitTop = 30
end
inherited ToolButton10: TToolButton
Left = 371
ExplicitLeft = 371
inherited ToolButton10: TToolButton [14]
Left = 369
Top = 30
ExplicitLeft = 369
ExplicitTop = 30
end
inherited ToolButton11: TToolButton
Left = 405
ExplicitLeft = 405
inherited ToolButton11: TToolButton [15]
Left = 494
Top = 30
ExplicitLeft = 494
ExplicitTop = 30
end
end
inherited cxGrid: TcxGrid
Width = 780
Height = 215
ExplicitWidth = 780
ExplicitHeight = 215
Top = 77
Width = 774
Height = 204
ExplicitTop = 72
ExplicitWidth = 774
ExplicitHeight = 209
end
inherited TBXDock1: TTBXDock
Width = 780
Top = 51
Width = 774
ExplicitWidth = 780
inherited TBXToolbar1: TTBXToolbar
ExplicitWidth = 548
ExplicitWidth = 626
end
end
end

2
Source/Modulos/Facturas de proveedor/Views/uViewElegirArticulosFacturasProveedor.pas
View File

@ -8,7 +8,7 @@ uses
cxDataStorage, cxEdit, DB, cxDBData, cxImageComboBox, cxCurrencyEdit,
cxSpinEdit, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev,
dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, ImgList, PngImageList,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg,
ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase,

3
Source/Modulos/Facturas de proveedor/Views/uViewFacturaProveedor.dfm
View File

@ -86,7 +86,7 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor
Top = 111
DataBinding.DataField = 'ID_FORMA_PAGO'
DataBinding.DataSource = DADataSource
Properties.GridMode = True
Properties.ListOptions.SyncMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'ID'
Properties.ListColumns = <
@ -95,6 +95,7 @@ inherited frViewFacturaProveedor: TfrViewFacturaProveedor
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsFormaPago
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D

2
Source/Modulos/Facturas de proveedor/Views/uViewFacturasProveedor.pas
View File

@ -9,7 +9,7 @@ uses
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
dxPSFillPatterns, dxPSEdgePatterns, cxImageComboBox, cxTextEdit, ImgList,
PngImageList, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
dxPSCore, dxPScxCommon, dxPScxGridLnk, ActnList, uDADataTable,
dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, ActnList, uDADataTable,
cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGrid,
cxImage, Grids, DBGrids, uBizFacturasProveedor, cxGridCustomPopupMenu,
cxGridPopupMenu, cxCalendar, cxCurrencyEdit, uViewFiltroBase, TB2Item, TBX,

2
Source/Modulos/Historico de movimientos/Views/uViewHistoricoMovimientos.pas
View File

@ -10,7 +10,7 @@ uses
cxGridCustomView, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk, cxImage,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, cxImage,
cxImageComboBox, ImgList, PngImageList, cxTextEdit, Grids, DBGrids, cxDBLookupComboBox,
cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid,
uBizHistoricoMovimientos, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX,

2
Source/Modulos/Inventario/Views/uViewDetalleReservas.pas
View File

@ -10,7 +10,7 @@ uses
cxGridCustomView, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk, cxImage,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, cxImage,
cxImageComboBox, ImgList, PngImageList, cxTextEdit, Grids, DBGrids, cxDBLookupComboBox,
cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid,
uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX,

2
Source/Modulos/Inventario/Views/uViewElegirArticulosCatalogo.pas
View File

@ -8,7 +8,7 @@ uses
cxDataStorage, cxEdit, DB, cxDBData, cxImageComboBox, cxCurrencyEdit,
cxSpinEdit, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev,
dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, ImgList, PngImageList,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg,
ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase;

2
Source/Modulos/Inventario/Views/uViewEntradaSalidaArticulos.pas
View File

@ -11,7 +11,7 @@ uses
cxGridDBTableView, cxGrid, cxDBLookupComboBox, uViewGrid, StdCtrls,
dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap,
dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uAlmacenesController, uBizAlmacenes, TB2Item, TBX, TB2Dock, TB2Toolbar,
uDataModuleInventario, cxRichEdit, cxTextEdit, dxPgsDlg, TBXDkPanels,
uViewFiltroBase, cxSpinEdit;

2
Source/Modulos/Inventario/Views/uViewInventario.pas
View File

@ -10,7 +10,7 @@ uses
cxGridCustomView, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk, cxImage,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, cxImage,
cxImageComboBox, ImgList, PngImageList, cxTextEdit, Grids, DBGrids, cxDBLookupComboBox,
cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid,
uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX,

2
Source/Modulos/Pedidos a proveedor/Views/uViewDireccionEntregaPedidoProv.dfm
View File

@ -39,7 +39,7 @@ inherited frViewDireccionEntregaPedidoProv: TfrViewDireccionEntregaPedidoProv
DataBinding.DataField = 'ID_ALMACEN'
DataBinding.DataSource = dsPedido
Properties.DropDownListStyle = lsFixedList
Properties.GridMode = True
Properties.ListOptions.SyncMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'ID'
Properties.ListColumns = <

2
Source/Modulos/Pedidos a proveedor/Views/uViewElegirArticulosPedidosProveedor.pas
View File

@ -8,7 +8,7 @@ uses
cxDataStorage, cxEdit, DB, cxDBData, cxImageComboBox, cxCurrencyEdit,
cxSpinEdit, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev,
dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, ImgList, PngImageList,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg,
ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase,

1
Source/Modulos/Pedidos a proveedor/Views/uViewPedidoProveedor.dfm
View File

@ -236,6 +236,7 @@ inherited frViewPedidoProveedor: TfrViewPedidoProveedor
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsFormaPago
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D

2
Source/Modulos/Pedidos a proveedor/Views/uViewPedidosProveedor.pas
View File

@ -8,7 +8,7 @@ uses
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
cxGrid,
uBizPedidosProveedor, cxCurrencyEdit, Forms, uViewFiltroBase, ActnList,

BIN
Source/Modulos/Presupuestos de cliente/Views/PresupuestosCliente_view.res
View File

Binary file not shown.

94
Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm
View File

@ -181,59 +181,111 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente
ExplicitHeight = 386
inherited ToolBar1: TToolBar
Width = 735
Height = 51
ExplicitWidth = 735
ExplicitHeight = 51
inherited ToolButton3: TToolButton
Wrap = False
end
inherited ToolButton4: TToolButton
Left = 278
Top = 0
ExplicitLeft = 278
ExplicitTop = 0
end
inherited ToolButton14: TToolButton
Left = 334
Top = 0
Wrap = False
ExplicitLeft = 334
ExplicitTop = 0
end
inherited FontName: TJvFontComboBox
Left = 399
Top = 0
ExplicitLeft = 399
ExplicitTop = 0
end
inherited FontSize: TEdit
Left = 544
Top = 0
Width = 57
ExplicitLeft = 544
ExplicitTop = 0
ExplicitWidth = 57
end
inherited UpDown1: TUpDown
Left = 236
ExplicitLeft = 236
Left = 601
Top = 0
ExplicitLeft = 601
ExplicitTop = 0
end
inherited ToolButton13: TToolButton
Left = 253
ExplicitLeft = 253
Left = 0
Top = 0
Wrap = True
ExplicitLeft = 0
ExplicitTop = 0
ExplicitHeight = 30
end
inherited ToolButton6: TToolButton
Left = 261
ExplicitLeft = 261
Left = 0
Top = 30
ExplicitLeft = 0
ExplicitTop = 30
end
inherited ToolButton7: TToolButton
Left = 295
ExplicitLeft = 295
Left = 66
Top = 30
ExplicitLeft = 66
ExplicitTop = 30
end
inherited ToolButton8: TToolButton
Left = 329
ExplicitLeft = 329
Left = 133
Top = 30
ExplicitLeft = 133
ExplicitTop = 30
end
inherited ToolButton12: TToolButton
Left = 363
ExplicitLeft = 363
Left = 216
Top = 30
ExplicitLeft = 216
ExplicitTop = 30
end
inherited ToolButton9: TToolButton
Left = 371
ExplicitLeft = 371
Left = 224
Top = 30
ExplicitLeft = 224
ExplicitTop = 30
end
inherited ToolButton10: TToolButton
Left = 405
ExplicitLeft = 405
Left = 369
Top = 30
ExplicitLeft = 369
ExplicitTop = 30
end
inherited ToolButton11: TToolButton
Left = 439
ExplicitLeft = 439
Left = 494
Top = 30
ExplicitLeft = 494
ExplicitTop = 30
end
end
inherited cxGrid: TcxGrid
Top = 77
Width = 735
Height = 314
Height = 309
ExplicitTop = 77
ExplicitWidth = 735
ExplicitHeight = 314
ExplicitHeight = 309
end
inherited TBXDock1: TTBXDock
Top = 51
Width = 735
ExplicitTop = 51
ExplicitWidth = 735
inherited TBXToolbar1: TTBXToolbar
ExplicitWidth = 548
ExplicitWidth = 626
end
end
end

89
Source/Modulos/Presupuestos de cliente/Views/uViewDetallesPresupuestoCliente.dfm
View File

@ -1,8 +1,89 @@
inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente
Width = 969
Height = 375
inherited ToolBar1: TToolBar
Height = 73
ExplicitHeight = 73
inherited ToolButton3: TToolButton
Wrap = False
end
inherited ToolButton4: TToolButton
Left = 278
Top = 0
ExplicitLeft = 278
ExplicitTop = 0
end
inherited ToolButton14: TToolButton
Left = 334
Top = 0
ExplicitLeft = 334
ExplicitTop = 0
end
inherited FontName: TJvFontComboBox
Top = 22
ExplicitTop = 22
end
inherited FontSize: TEdit
Top = 22
ExplicitTop = 22
end
inherited UpDown1: TUpDown
Top = 22
ExplicitTop = 22
end
inherited ToolButton13: TToolButton
Top = 22
ExplicitTop = 22
end
inherited ToolButton6: TToolButton
Top = 22
ExplicitTop = 22
end
inherited ToolButton7: TToolButton
Top = 22
ExplicitTop = 22
end
inherited ToolButton8: TToolButton
Top = 22
ExplicitTop = 22
end
inherited ToolButton12: TToolButton
Left = 0
Top = 22
Wrap = True
ExplicitLeft = 0
ExplicitTop = 22
ExplicitHeight = 30
end
inherited ToolButton9: TToolButton
Left = 0
Top = 52
ExplicitLeft = 0
ExplicitTop = 52
end
inherited ToolButton10: TToolButton
Left = 145
Top = 52
ExplicitLeft = 145
ExplicitTop = 52
end
inherited ToolButton11: TToolButton
Left = 270
Top = 52
ExplicitLeft = 270
ExplicitTop = 52
end
end
inherited cxGrid: TcxGrid
Width = 969
Height = 298
Top = 99
Height = 205
ExplicitTop = 99
ExplicitHeight = 205
inherited cxGridView: TcxGridDBTableView
OptionsView.ShowEditButtons = gsebNever
end
end
inherited TBXDock1: TTBXDock
Top = 73
ExplicitTop = 73
ExplicitWidth = 451
end
end

2
Source/Modulos/Presupuestos de cliente/Views/uViewElegirArticulosPresupuestosCliente.pas
View File

@ -8,7 +8,7 @@ uses
cxDataStorage, cxEdit, DB, cxDBData, cxImageComboBox, cxCurrencyEdit,
cxSpinEdit, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev,
dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, ImgList, PngImageList,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg,
ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase,

1
Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestoCliente.dfm
View File

@ -155,6 +155,7 @@ inherited frViewPresupuestoCliente: TfrViewPresupuestoCliente
end>
Properties.ListOptions.GridLines = glNone
Properties.ListOptions.ShowHeader = False
Properties.ListOptions.SyncMode = True
Properties.ListSource = dsFormaPago
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D

51
Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.dfm
View File

@ -8,7 +8,7 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
Height = 351
RootLevelOptions.DetailTabsPosition = dtpTop
OnActiveTabChanged = cxGridActiveTabChanged
ExplicitWidth = 596
ExplicitWidth = 931
ExplicitHeight = 351
inherited cxGridView: TcxGridDBTableView
OnMouseMove = cxGridViewMouseMove
@ -37,10 +37,10 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
object cxGridViewID: TcxGridDBColumn
DataBinding.FieldName = 'ID'
OnCustomDrawCell = cxGridViewIDCustomDrawCell
BestFitMaxWidth = 22
MinWidth = 22
BestFitMaxWidth = 15
MinWidth = 15
Options.HorzSizing = False
Width = 22
Width = 15
IsCaptionAssigned = True
end
object cxGridViewINCIDENCIASACTIVAS: TcxGridDBColumn
@ -61,39 +61,40 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
end>
Properties.LargeImages = PngImageList
Properties.ShowDescriptions = False
BestFitMaxWidth = 22
MinWidth = 22
BestFitMaxWidth = 20
Options.HorzSizing = False
Width = 22
Width = 20
end
object cxGridViewREFERENCIA: TcxGridDBColumn
DataBinding.FieldName = 'REFERENCIA'
BestFitMaxWidth = 25
Width = 68
Width = 25
end
object cxGridViewSITUACION: TcxGridDBColumn
Caption = 'Situaci'#243'n'
DataBinding.FieldName = 'SITUACION'
Width = 48
BestFitMaxWidth = 25
Width = 25
end
object cxGridViewFECHA_PRESUPUESTO: TcxGridDBColumn
Caption = 'Fecha presupuesto'
DataBinding.FieldName = 'FECHA_PRESUPUESTO'
BestFitMaxWidth = 45
BestFitMaxWidth = 25
SortIndex = 0
SortOrder = soDescending
Width = 68
Width = 25
end
object cxGridViewFECHA_DECISION: TcxGridDBColumn
Caption = 'Fecha decisi'#243'n'
DataBinding.FieldName = 'FECHA_DECISION'
BestFitMaxWidth = 45
Width = 60
BestFitMaxWidth = 25
Width = 25
end
object cxGridViewNIF_CIF: TcxGridDBColumn
Caption = 'NIF/CIF'
DataBinding.FieldName = 'NIF_CIF'
Width = 54
BestFitMaxWidth = 25
Width = 25
end
object cxGridViewNOMBRE: TcxGridDBColumn
Caption = 'Nombre'
@ -103,6 +104,7 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
object cxGridViewCLIENTE_FINAL: TcxGridDBColumn
Caption = 'Cliente final'
DataBinding.FieldName = 'CLIENTE_FINAL'
BestFitMaxWidth = 80
Width = 137
end
object cxGridViewIMPORTE_TOTAL: TcxGridDBColumn
@ -110,14 +112,17 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
DataBinding.FieldName = 'IMPORTE_TOTAL'
PropertiesClassName = 'TcxCurrencyEditProperties'
Properties.Alignment.Horz = taRightJustify
BestFitMaxWidth = 60
FooterAlignmentHorz = taRightJustify
HeaderAlignmentHorz = taRightJustify
Width = 89
Width = 60
end
object cxGridViewFACTURA: TcxGridDBColumn
Caption = 'Ref. factura'
DataBinding.FieldName = 'FACTURA'
Visible = False
BestFitMaxWidth = 25
Width = 25
end
end
object cxGridDBTableView1: TcxGridDBTableView [1]
@ -142,12 +147,12 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
end
inherited frViewFiltroBase1: TfrViewFiltroBase
Width = 931
ExplicitWidth = 596
ExplicitWidth = 931
inherited TBXDockablePanel1: TTBXDockablePanel
ExplicitWidth = 596
ExplicitWidth = 931
inherited dxLayoutControl1: TdxLayoutControl
Width = 931
ExplicitWidth = 596
ExplicitWidth = 931
inherited txtFiltroTodo: TcxTextEdit
ExplicitWidth = 273
Width = 273
@ -165,10 +170,10 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
end
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 931
ExplicitWidth = 596
ExplicitWidth = 931
inherited tbxBotones: TTBXToolbar
Width = 921
ExplicitWidth = 586
ExplicitWidth = 921
end
end
end
@ -177,13 +182,13 @@ inherited frViewPresupuestosCliente: TfrViewPresupuestosCliente
Top = 453
Visible = True
ExplicitTop = 453
ExplicitWidth = 596
ExplicitWidth = 931
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
Width = 931
ExplicitWidth = 596
ExplicitWidth = 931
inherited TBXToolbar1: TTBXToolbar
Width = 921
ExplicitWidth = 586
ExplicitWidth = 921
object TBXSeparatorItem2: TTBXSeparatorItem
end
object TBXItem3: TTBXItem

2
Source/Modulos/Presupuestos de cliente/Views/uViewPresupuestosCliente.pas
View File

@ -8,7 +8,7 @@ uses
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxImageComboBox, ImgList, Controls, PngImageList,
cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGridLnk,
cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
uDADataTable, cxGridLevel, cxClasses, cxControls, cxGridCustomView, Classes,
cxGrid,
uBizPresupuestosCliente, cxCurrencyEdit, Forms, uViewFiltroBase, ActnList, TB2Item,

2
Source/Modulos/Recibos de cliente/Views/uViewRecibosCliente.pas
View File

@ -9,7 +9,7 @@ uses
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
dxPSFillPatterns, dxPSEdgePatterns, cxImageComboBox, cxTextEdit, ImgList,
PngImageList, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
dxPSCore, dxPScxCommon, dxPScxGridLnk, ActnList, uDADataTable,
dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, ActnList, uDADataTable,
cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGrid,
cxImage, Grids, DBGrids, uBizRecibosCliente, cxGridCustomPopupMenu,
cxGridPopupMenu, cxCalendar, cxCurrencyEdit, uViewFiltroBase, TB2Item, TBX,

2
Source/Modulos/Recibos de proveedor/Views/uViewRecibosProveedor.pas
View File

@ -9,7 +9,7 @@ uses
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
dxPSFillPatterns, dxPSEdgePatterns, cxImageComboBox, cxTextEdit, ImgList,
PngImageList, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
dxPSCore, dxPScxCommon, dxPScxGridLnk, ActnList, uDADataTable,
dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, ActnList, uDADataTable,
cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGrid,
cxImage, Grids, DBGrids, uBizRecibosProveedor, cxGridCustomPopupMenu,
cxGridPopupMenu, cxCalendar, cxCurrencyEdit, uViewFiltroBase, TB2Item, TBX,

2
Source/Modulos/Remesas de cliente/Views/uViewRecibosRemesaCliente_2.pas
View File

@ -9,7 +9,7 @@ uses
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
dxPSFillPatterns, dxPSEdgePatterns, cxImageComboBox, cxTextEdit, ImgList,
PngImageList, cxGridCustomTableView, cxGridTableView, cxGridDBTableView,
dxPSCore, dxPScxCommon, dxPScxGridLnk, ActnList, uDADataTable,
dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, ActnList, uDADataTable,
cxGridLevel, cxClasses, cxControls, cxGridCustomView, cxGrid,
cxImage, Grids, DBGrids, uBizRecibosCliente, cxGridCustomPopupMenu,
cxGridPopupMenu, cxCalendar, cxCurrencyEdit, ComCtrls, ToolWin, dxPgsDlg,

2
Source/Modulos/Remesas de cliente/Views/uViewRemesaCliente.dfm
View File

@ -88,7 +88,7 @@ inherited frViewRemesaCliente: TfrViewRemesaCliente
Top = 57
DataBinding.DataField = 'ID_DATOS_BANCO'
DataBinding.DataSource = dsDataTable
Properties.GridMode = True
Properties.ListOptions.SyncMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'ID'
Properties.ListColumns = <

2
Source/Modulos/Remesas de cliente/Views/uViewRemesasCliente.pas
View File

@ -11,7 +11,7 @@ uses
cxGridBandedTableView, cxGridDBBandedTableView, JvComponent,
JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn,
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
cxGridCustomPopupMenu, cxGridPopupMenu, cxCurrencyEdit, cxSpinEdit, cxCheckBox,
cxCheckComboBox, cxImageComboBox, TB2Item, TBX, TB2Toolbar, TBXDkPanels,
TB2Dock, uViewFiltroBase, dxPgsDlg;

2
Source/Modulos/Remesas de proveedor/Views/uViewRemesaProveedor.dfm
View File

@ -88,7 +88,7 @@ inherited frViewRemesaProveedor: TfrViewRemesaProveedor
Top = 57
DataBinding.DataField = 'ID_DATOS_BANCO'
DataBinding.DataSource = dsDataTable
Properties.GridMode = True
Properties.ListOptions.SyncMode = True
Properties.ImmediatePost = True
Properties.KeyFieldNames = 'ID'
Properties.ListColumns = <

2
Source/Modulos/Remesas de proveedor/Views/uViewRemesasProveedor.pas
View File

@ -11,7 +11,7 @@ uses
cxGridBandedTableView, cxGridDBBandedTableView, JvComponent,
JvFormAutoSize, PngImageList, ImgList, dxPSGlbl, dxPSUtl, dxPSEngn,
dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk,
dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk,
cxGridCustomPopupMenu, cxGridPopupMenu, cxCurrencyEdit, cxSpinEdit, cxCheckBox,
cxCheckComboBox, cxImageComboBox, TB2Item, TBX, TB2Toolbar, TBXDkPanels,
TB2Dock, uViewFiltroBase, dxPgsDlg;