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

- 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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

@ -1,54 +1,10 @@
inherited frViewDetallesArticulos: TfrViewDetallesArticulos inherited frViewDetallesArticulos: TfrViewDetallesArticulos
Width = 930
ParentBiDiMode = False ParentBiDiMode = False
OnShow = CustomViewShow 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 inherited cxGrid: TcxGrid
Top = 77
Width = 930
Height = 227
ExplicitTop = 121
ExplicitHeight = 183
inherited cxGridView: TcxGridDBTableView inherited cxGridView: TcxGridDBTableView
OptionsSelection.HideFocusRectOnExit = False OptionsSelection.HideFocusRectOnExit = False
OptionsView.ShowEditButtons = gsebForFocusedRecord OptionsView.ShowEditButtons = gsebForFocusedRecord
inherited cxGridViewTIPO: TcxGridDBColumn
Width = 26
end
object cxGridViewID_ARTICULO: TcxGridDBColumn [3] object cxGridViewID_ARTICULO: TcxGridDBColumn [3]
DataBinding.FieldName = 'ID_ARTICULO' DataBinding.FieldName = 'ID_ARTICULO'
Visible = False Visible = False
@ -75,9 +31,6 @@ inherited frViewDetallesArticulos: TfrViewDetallesArticulos
inherited cxGridViewDESCRIPCION: TcxGridDBColumn inherited cxGridViewDESCRIPCION: TcxGridDBColumn
Width = 85 Width = 85
end end
inherited cxGridViewCANTIDAD: TcxGridDBColumn
Width = 48
end
object cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn [8] object cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn [8]
Caption = 'Unid. medida' Caption = 'Unid. medida'
PropertiesClassName = 'TcxComboBoxProperties' PropertiesClassName = 'TcxComboBoxProperties'
@ -85,10 +38,11 @@ inherited frViewDetallesArticulos: TfrViewDetallesArticulos
Properties.ImmediateUpdateText = True Properties.ImmediateUpdateText = True
Properties.OnInitPopup = cxGridViewUNIDAD_MEDIDAPropertiesInitPopup Properties.OnInitPopup = cxGridViewUNIDAD_MEDIDAPropertiesInitPopup
Visible = False Visible = False
Options.CellMerging = True
Width = 60 Width = 60
end end
inherited cxGridViewIMPORTEUNIDAD: TcxGridDBColumn inherited cxGridViewIMPORTEUNIDAD: TcxGridDBColumn
Width = 48 Width = 50
end end
inherited cxGridViewDESCUENTO: TcxGridDBColumn inherited cxGridViewDESCUENTO: TcxGridDBColumn
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
@ -98,37 +52,7 @@ inherited frViewDetallesArticulos: TfrViewDetallesArticulos
Caption = 'Porte unidad' Caption = 'Porte unidad'
end end
inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn inherited cxGridViewIMPORTETOTAL: TcxGridDBColumn
Width = 49 Width = 50
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
end end
end end
end end

View File

@ -44,13 +44,14 @@ type
procedure AnadirArticulosInterno; virtual; procedure AnadirArticulosInterno; virtual;
procedure RellenarArticulosInterno; virtual; procedure RellenarArticulosInterno; virtual;
function AnadirArticulo(pReferencia: String; TipoReferencia: TEnumReferencia): Boolean; virtual; function AnadirArticulo(pReferencia: String; TipoReferencia: TEnumReferencia): Boolean; virtual;
function EsTipoEditable(AItem: TcxCustomGridTableItem): Boolean; override;
end; end;
implementation implementation
{$R *.dfm} {$R *.dfm}
uses uses
uViewDetallesBase, uUnidadesMedidaController; uCalculosUtils, uViewDetallesBase, uControllerDetallesBase, uUnidadesMedidaController;
procedure TfrViewDetallesArticulos.actAnadirArticulosExecute(Sender: TObject); procedure TfrViewDetallesArticulos.actAnadirArticulosExecute(Sender: TObject);
begin begin
@ -122,7 +123,26 @@ begin
end; end;
end; 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; end;
procedure TfrViewDetallesArticulos.OnValidateReferencia(Sender: TObject; var DisplayValue: Variant; var ErrorText: TCaption; var Error: Boolean); procedure TfrViewDetallesArticulos.OnValidateReferencia(Sender: TObject; var DisplayValue: Variant; var ErrorText: TCaption; var Error: Boolean);

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

@ -10,7 +10,7 @@ uses
cxGridCustomView, cxGridCustomTableView, cxGridTableView, cxGridCustomView, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl, cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, 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, cxImageComboBox, ImgList, PngImageList, cxTextEdit, Grids, DBGrids, cxDBLookupComboBox,
cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid, cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid,
uBizHistoricoMovimientos, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX, uBizHistoricoMovimientos, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX,

View File

@ -10,7 +10,7 @@ uses
cxGridCustomView, cxGridCustomTableView, cxGridTableView, cxGridCustomView, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl, cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, 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, cxImageComboBox, ImgList, PngImageList, cxTextEdit, Grids, DBGrids, cxDBLookupComboBox,
cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid, cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid,
uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX, uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX,

View File

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

View File

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

View File

@ -10,7 +10,7 @@ uses
cxGridCustomView, cxGridCustomTableView, cxGridTableView, cxGridCustomView, cxGridCustomTableView, cxGridTableView,
cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl, cxGridDBTableView, cxGrid, StdCtrls, ExtCtrls, cxLabel, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, 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, cxImageComboBox, ImgList, PngImageList, cxTextEdit, Grids, DBGrids, cxDBLookupComboBox,
cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid, cxButtonEdit, cxGridCustomPopupMenu, cxGridPopupMenu, uViewGrid,
uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX, uBizInventario, uBizAlmacenes, cxSpinEdit, uViewFiltroBase, TB2Item, TBX,

View File

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

View File

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

View File

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

View File

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

View File

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

View File

@ -1,8 +1,89 @@
inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente inherited frViewDetallesPresupuestoCliente: TfrViewDetallesPresupuestoCliente
Width = 969 inherited ToolBar1: TToolBar
Height = 375 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 inherited cxGrid: TcxGrid
Width = 969 Top = 99
Height = 298 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
end end

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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