david
1662789ccc
* Repaso a presupuestos (apariencia de editor ficha). * Limpieza de código repetido en contactos. git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@784 0c75b7a4-871f-7646-8a2f-f78d34cc349f
117 lines
4.7 KiB
ObjectPascal
117 lines
4.7 KiB
ObjectPascal
package Contactos_view;
|
|
|
|
{$R *.res}
|
|
{$ALIGN 8}
|
|
{$ASSERTIONS ON}
|
|
{$BOOLEVAL OFF}
|
|
{$DEBUGINFO ON}
|
|
{$EXTENDEDSYNTAX ON}
|
|
{$IMPORTEDDATA ON}
|
|
{$IOCHECKS ON}
|
|
{$LOCALSYMBOLS ON}
|
|
{$LONGSTRINGS ON}
|
|
{$OPENSTRINGS ON}
|
|
{$OPTIMIZATION ON}
|
|
{$OVERFLOWCHECKS OFF}
|
|
{$RANGECHECKS OFF}
|
|
{$REFERENCEINFO ON}
|
|
{$SAFEDIVIDE OFF}
|
|
{$STACKFRAMES OFF}
|
|
{$TYPEDADDRESS OFF}
|
|
{$VARSTRINGCHECKS ON}
|
|
{$WRITEABLECONST OFF}
|
|
{$MINENUMSIZE 1}
|
|
{$IMAGEBASE $400000}
|
|
{$IMPLICITBUILD OFF}
|
|
|
|
requires
|
|
rtl,
|
|
vcl,
|
|
Base,
|
|
GUIBase,
|
|
ApplicationBase,
|
|
FormasPago_model,
|
|
FormasPago_controller,
|
|
TiposIVA_model,
|
|
TiposIVA_controller,
|
|
Contactos_model,
|
|
Contactos_controller,
|
|
JvGlobusD11R,
|
|
dbrtl,
|
|
DataAbstract_Core_D11,
|
|
vcldb,
|
|
dsnap,
|
|
adortl,
|
|
RemObjects_Core_D11,
|
|
PngComponentsD10,
|
|
PNG_D10,
|
|
vclactnband,
|
|
vclx,
|
|
cxLibraryD11,
|
|
dxThemeD11,
|
|
dxGDIPlusD11,
|
|
cxEditorsD11,
|
|
cxDataD11,
|
|
vcljpg,
|
|
cxGridD11,
|
|
cxPageControlD11,
|
|
cxExtEditorsD11,
|
|
cxExportD11,
|
|
JvCoreD11R,
|
|
Jcl,
|
|
JclVcl,
|
|
bdertl,
|
|
JvSystemD11R,
|
|
GUISDK_D11,
|
|
xmlrtl,
|
|
cfpack_d11,
|
|
designide,
|
|
ccpackD11,
|
|
JvStdCtrlsD11R,
|
|
JvCtrlsD11R,
|
|
dxLayoutControlD11,
|
|
dxComnD11;
|
|
|
|
contains
|
|
uContactosViewRegister in 'uContactosViewRegister.pas',
|
|
uViewContactos in 'uViewContactos.pas' {frViewContactos: TCustomView},
|
|
uViewClientes in 'uViewClientes.pas' {frViewClientes: TCustomView},
|
|
uEditorContactos in 'uEditorContactos.pas' {fEditorContactos: TCustomEditor},
|
|
uEditorClientes in 'uEditorClientes.pas' {fEditorClientes: TCustomEditor},
|
|
uViewContacto in 'uViewContacto.pas' {frViewContacto: TCustomView},
|
|
uEditorCliente in 'uEditorCliente.pas' {fEditorCliente: TCustomEditor},
|
|
uEditorContacto in 'uEditorContacto.pas' {fEditorContacto: TCustomEditor},
|
|
uViewCliente in 'uViewCliente.pas' {frViewCliente: TCustomView},
|
|
uViewDatosYSeleccionProveedor in 'uViewDatosYSeleccionProveedor.pas' {frViewDatosYSeleccionProveedor: TFrame},
|
|
uViewProveedores in 'uViewProveedores.pas' {frViewProveedores: TCustomView},
|
|
uViewEmpleados in 'uViewEmpleados.pas' {frViewEmpleados: TCustomView},
|
|
uEditorProveedores in 'uEditorProveedores.pas' {fEditorProveedores: TCustomEditor},
|
|
uViewProveedor in 'uViewProveedor.pas' {frViewProveedor: TCustomView},
|
|
uViewContactoListaDatosBancarios in 'uViewContactoListaDatosBancarios.pas' {frViewListaDatosBancarios: TFrame},
|
|
uViewEmpleado in 'uViewEmpleado.pas' {frViewEmpleado: TCustomView},
|
|
uEditorProveedor in 'uEditorProveedor.pas' {fEditorProveedor: TCustomEditor},
|
|
uEditorElegirClientes in 'uEditorElegirClientes.pas' {fEditorElegirClientes: TCustomEditor},
|
|
uViewDatosYSeleccionCliente in 'uViewDatosYSeleccionCliente.pas' {frViewDatosYSeleccionCliente: TFrame},
|
|
uEditorElegirProveedores in 'uEditorElegirProveedores.pas' {fEditorElegirProveedores: TCustomEditor},
|
|
uViewDireccionesEntrega in 'uViewDireccionesEntrega.pas' {frViewDireccionesEntrega: TFrame},
|
|
uViewClienteDescuentos in 'uViewClienteDescuentos.pas' {frViewClienteDescuentos: TFrame},
|
|
uEditorDatoBancario in 'uEditorDatoBancario.pas' {fEditorDatoBancario},
|
|
uEditorElegirPersonaContacto in 'uEditorElegirPersonaContacto.pas' {fEditorElegirPersonaContacto: TfEditorElegirDireccionEntrega},
|
|
uViewContactoDatosBancarios in 'uViewContactoDatosBancarios.pas' {frViewClienteDatosBancarios: TFrame},
|
|
uViewProveedorDatosComerciales in 'uViewProveedorDatosComerciales.pas' {frViewProveedorDatosComerciales: TFrame},
|
|
uViewClienteDatosComerciales in 'uViewClienteDatosComerciales.pas' {frViewClienteDatosComerciales: TFrame},
|
|
uEditorGruposCliente in 'uEditorGruposCliente.pas' {fEditorGruposCliente: TCustomEditor},
|
|
uEditorEmpleado in 'uEditorEmpleado.pas' {fEditorEmpleado: TCustomEditor},
|
|
uEditorEmpleados in 'uEditorEmpleados.pas' {fEditorEmpleados: TCustomEditor},
|
|
uEditorGruposProveedor in 'uEditorGruposProveedor.pas' {fEditorGruposProveedor: TCustomEditor},
|
|
uEditorGruposEmpleado in 'uEditorGruposEmpleado.pas' {fEditorGruposEmpleado: TCustomEditor},
|
|
uEditorFichasEmpleadoReport in 'uEditorFichasEmpleadoReport.pas' {fEditorFichasEmpleadoReport: TCustomEditor},
|
|
uEditorEtiquetasContactosReport in 'uEditorEtiquetasContactosReport.pas' {fEditorEtiquetasContactosReport: TCustomEditor},
|
|
uEditorDireccion in 'uEditorDireccion.pas' {fEditorDireccion: TCustomEditor},
|
|
uEditorPersonal in 'uEditorPersonal.pas' {fEditorPersonal: TCustomEditor},
|
|
uViewPersonalContacto in 'uViewPersonalContacto.pas' {frViewPersonalContacto: TFrame},
|
|
uEditorElegirDireccionEntrega in 'uEditorElegirDireccionEntrega.pas' {fEditorElegirDireccionEntrega: TCustomEditor},
|
|
uViewDatosYSeleccionClienteBase in 'uViewDatosYSeleccionClienteBase.pas' {frViewDatosYSeleccionClienteBase: TFrame};
|
|
|
|
end.
|