diff --git a/Source/Base/Base.dproj b/Source/Base/Base.dproj index aa2988cf..05d6194b 100644 --- a/Source/Base/Base.dproj +++ b/Source/Base/Base.dproj @@ -44,6 +44,8 @@ Package FalseTrueFalseLibreria base de FactuGESFalseFalseFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.01.0.0.0 + + Microsoft Office 2000 Sample Automation Server Wrapper Components Microsoft Office XP Sample Automation Server Wrapper Components Base.dpk @@ -53,58 +55,58 @@ MainSource - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
fConfigurarConexion
TForm diff --git a/Source/Base/Base.res b/Source/Base/Base.res index 1641339f..8b251f31 100644 Binary files a/Source/Base/Base.res and b/Source/Base/Base.res differ diff --git a/Source/GUIBase/GUIBase.dproj b/Source/GUIBase/GUIBase.dproj index 9ddbcd4b..8c4344bf 100644 --- a/Source/GUIBase/GUIBase.dproj +++ b/Source/GUIBase/GUIBase.dproj @@ -58,18 +58,6 @@ MainSource - - - - - - - - - - - - @@ -93,17 +81,29 @@ - - - - - - - - - - - + + + + + + + + + + + + + + + + + + + + + + +
fDialogBase
diff --git a/Source/GUIBase/GUIBase.res b/Source/GUIBase/GUIBase.res index 8b251f31..1641339f 100644 Binary files a/Source/GUIBase/GUIBase.res and b/Source/GUIBase/GUIBase.res differ diff --git a/Source/GUIBase/uViewDocumentos.pas b/Source/GUIBase/uViewDocumentos.pas index 73dec6e6..bd8561f0 100644 --- a/Source/GUIBase/uViewDocumentos.pas +++ b/Source/GUIBase/uViewDocumentos.pas @@ -37,17 +37,18 @@ type function DarFicherosSeleccionados: TStringList; protected + FHayModificaciones: Boolean; FListaFicheros: TStringList; property Directorio: Variant read GetDirectorio; + property ListaFicheros: TStringList read FListaFicheros write FListaFicheros; + + function GetModified: Boolean; override; + procedure SetModified(const Value : Boolean); override; //Son los metodos que se sobreescribiran en la vista hija procedure Sincronizar; virtual; abstract; function RecuperarFicheroServidor(const NombreFichero: String; const DirectorioDestino: String): Boolean; virtual; abstract; procedure RefrescarVisualizador; virtual; - - public - property ListaFicheros: TStringList read FListaFicheros; - end; var @@ -69,7 +70,9 @@ procedure TfrViewDocumentos.actAnadirExecute(Sender: TObject); var openDialog : TOpenDialog; ANombreFichero : String; - i : Integer; + ANombreSeleccionado : String; + BCopiar: Boolean; + i, j : Integer; begin openDialog := TOpenDialog.Create(self); try @@ -90,12 +93,24 @@ begin begin for i:=0 to openDialog.Files.Count - 1 do begin - ANombreFichero := openDialog.Files.Strings[i]; - if Length(ANombreFichero) > 0 then - CopiarFichero(ANombreFichero, (Directorio + ExtractFileName(ANombreFichero))); + ANombreSeleccionado := openDialog.Files.Strings[i]; + if Length(ANombreSeleccionado) > 0 then + begin + BCopiar := True; + ANombreFichero := ExtractFileName(ANombreSeleccionado); + if FListaFicheros.Find(ANombreFichero, j) then + begin + ANombreFichero := 'Copia de ' + ANombreFichero; + BCopiar := (Application.MessageBox(PChar('Ya existe un archivo con ese nombre, ¿Desea añadirlo con el nombre ' + ANombreFichero + '?'), 'Atención', MB_YESNO) = IDYES); + end; - //Lo añadimos a la lista de documentos local - FListaFicheros.Add(ExtractFileName(ANombreFichero)) + if BCopiar then + begin + CopiarFichero(ANombreSeleccionado, (Directorio + ANombreFichero)); + //Lo añadimos a la lista de documentos local + FListaFicheros.Add(ANombreFichero); + end; + end; end; end; @@ -104,6 +119,7 @@ begin //Now, We compact the process memory: SetProcessWorkingSetSize(GetCurrentProcess, $FFFFFFFF, $FFFFFFFF); RefrescarVisualizador; + FHayModificaciones := True; end; end; @@ -131,6 +147,7 @@ begin finally FreeAndNil(FicherosSeleccionados); RefrescarVisualizador; + FHayModificaciones := True; end; end; @@ -140,6 +157,7 @@ begin FListaFicheros.Clear; FDirectorio := Null; RefrescarVisualizador; + FHayModificaciones := True; end; procedure TfrViewDocumentos.actModificarExecute(Sender: TObject); @@ -166,7 +184,8 @@ begin Application.MessageBox('No se pudo editar el fichero', 'Error', MB_ICONEXCLAMATION); end; finally - FreeAndNil(FicherosSeleccionados) + FreeAndNil(FicherosSeleccionados); + FHayModificaciones := True; end; end; @@ -175,6 +194,7 @@ begin inherited; FDirectorio := Null; FListaFicheros := Nil; + FHayModificaciones:= False; end; procedure TfrViewDocumentos.CustomViewDestroy(Sender: TObject); @@ -207,10 +227,21 @@ begin Result := FDirectorio; end; +function TfrViewDocumentos.GetModified: Boolean; +begin + Result := FHayModificaciones; +end; + procedure TfrViewDocumentos.RefrescarVisualizador; begin ListaDocumentos.Clear; ListaDocumentos.Items.AddStrings(FListaFicheros); end; +procedure TfrViewDocumentos.SetModified(const Value: Boolean); +begin + inherited; + FHayModificaciones := Value; +end; + end. diff --git a/Source/Modulos/Gestion de documentos/Controller/GestorDocumentos_controller.drc b/Source/Modulos/Gestion de documentos/Controller/GestorDocumentos_controller.drc index e2ad2f66..6c5d874d 100644 --- a/Source/Modulos/Gestion de documentos/Controller/GestorDocumentos_controller.drc +++ b/Source/Modulos/Gestion de documentos/Controller/GestorDocumentos_controller.drc @@ -13,4 +13,4 @@ BEGIN END /* C:\Codigo Tecsitel\Source\Modulos\Gestion de documentos\Controller\GestorDocumentos_Controller.res */ -/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf4BD.tmp */ +/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf67.tmp */ diff --git a/Source/Modulos/Gestion de documentos/Data/GestorDocumentos_data.drc b/Source/Modulos/Gestion de documentos/Data/GestorDocumentos_data.drc index 4a77b735..0ae44f90 100644 --- a/Source/Modulos/Gestion de documentos/Data/GestorDocumentos_data.drc +++ b/Source/Modulos/Gestion de documentos/Data/GestorDocumentos_data.drc @@ -14,4 +14,4 @@ END /* C:\Codigo Tecsitel\Source\Modulos\Gestion de documentos\Data\uDataModuleGestorDocumentos.dfm */ /* C:\Codigo Tecsitel\Source\Modulos\Gestion de documentos\Data\GestorDocumentos_data.res */ -/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf4BB.tmp */ +/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf65.tmp */ diff --git a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm index cab7c3b3..987cf014 100644 --- a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm +++ b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.dfm @@ -202,111 +202,99 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente Height = 46 ExplicitWidth = 735 ExplicitHeight = 46 + inherited ToolButton3: TToolButton + Wrap = False + end inherited ToolButton4: TToolButton - Left = 109 - Top = 0 - ExplicitLeft = 109 - ExplicitTop = 0 - end - inherited FontName: TJvFontComboBox [2] - Left = 165 - Top = 0 - ExplicitLeft = 165 - ExplicitTop = 0 - end - inherited FontSize: TEdit [3] - Left = 310 - Top = 0 - Width = 200 - ExplicitLeft = 310 - ExplicitTop = 0 - ExplicitWidth = 200 - end - inherited UpDown1: TUpDown [4] - Left = 510 - Top = 0 - ExplicitLeft = 510 - ExplicitTop = 0 - end - inherited ToolButton3: TToolButton [5] - Left = 527 + Left = 278 Top = 0 Wrap = True - ExplicitLeft = 527 + ExplicitLeft = 278 ExplicitTop = 0 end - inherited ToolButton2: TToolButton [6] - Top = 22 - Wrap = True - end inherited ToolButton14: TToolButton Left = 0 - Top = 44 + Wrap = False ExplicitLeft = 0 - ExplicitTop = 44 end - inherited ToolButton13: TToolButton [8] + inherited FontName: TJvFontComboBox Left = 65 - Top = 44 - ExplicitLeft = 65 - ExplicitTop = 44 + Top = 22 + ExplicitTop = 22 end - inherited ToolButton6: TToolButton [9] - Left = 73 - Top = 44 - ExplicitLeft = 73 - ExplicitTop = 44 + inherited FontSize: TEdit + Top = 22 + Width = 200 + ExplicitTop = 22 + ExplicitWidth = 200 end - inherited ToolButton7: TToolButton [10] - Left = 139 - Top = 44 - ExplicitLeft = 139 - ExplicitTop = 44 + inherited UpDown1: TUpDown + Left = 345 + Top = 22 + ExplicitLeft = 345 + ExplicitTop = 22 end - inherited ToolButton8: TToolButton [11] - Left = 206 - Top = 44 - ExplicitLeft = 206 - ExplicitTop = 44 + inherited ToolButton13: TToolButton + Left = 362 + Top = 22 + ExplicitLeft = 362 + ExplicitTop = 22 end - inherited ToolButton12: TToolButton [12] - Left = 289 - Top = 44 - Wrap = False - ExplicitLeft = 289 - ExplicitTop = 44 - ExplicitHeight = 22 + inherited ToolButton6: TToolButton + Left = 370 + Top = 22 + ExplicitLeft = 370 + ExplicitTop = 22 end - inherited ToolButton9: TToolButton [13] - Left = 297 - Top = 44 - ExplicitLeft = 297 - ExplicitTop = 44 + inherited ToolButton7: TToolButton + Left = 436 + Top = 22 + ExplicitLeft = 436 + ExplicitTop = 22 end - inherited ToolButton10: TToolButton [14] - Left = 442 - Top = 44 - Wrap = False - ExplicitLeft = 442 - ExplicitTop = 44 + inherited ToolButton8: TToolButton + Left = 503 + Top = 22 + ExplicitLeft = 503 + ExplicitTop = 22 + end + inherited ToolButton12: TToolButton + Left = 0 + Top = 22 + Wrap = True + ExplicitLeft = 0 + ExplicitTop = 22 + ExplicitHeight = 27 + end + inherited ToolButton9: TToolButton + Left = 0 + Top = 49 + ExplicitLeft = 0 + ExplicitTop = 49 + end + inherited ToolButton10: TToolButton + Left = 145 + Top = 49 + ExplicitLeft = 145 + ExplicitTop = 49 end inherited ToolButton11: TToolButton - Left = 567 - Top = 44 - ExplicitLeft = 567 - ExplicitTop = 44 + Left = 270 + Top = 49 + ExplicitLeft = 270 + ExplicitTop = 49 end end inherited cxGrid: TcxGrid - Top = 72 + Top = 99 Width = 735 - Height = 314 + Height = 287 ExplicitTop = 72 ExplicitWidth = 735 ExplicitHeight = 314 end inherited TBXDock1: TTBXDock - Top = 46 + Top = 73 Width = 735 ExplicitTop = 46 ExplicitWidth = 735 @@ -866,8 +854,10 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente inherited Bevel1: TBevel Left = 93 Top = 92 + Width = 73 ExplicitLeft = 93 ExplicitTop = 92 + ExplicitWidth = 73 end inherited Bevel3: TBevel Left = 368 @@ -890,7 +880,11 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente inherited ImporteDto: TcxDBCurrencyEdit Left = 164 Top = 112 + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 164 ExplicitTop = 112 ExplicitWidth = 188 @@ -899,7 +893,11 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente inherited ImporteIVA: TcxDBCurrencyEdit Left = 556 Top = 38 + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 556 ExplicitTop = 38 ExplicitWidth = 182 @@ -908,7 +906,11 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente inherited ImporteTotal: TcxDBCurrencyEdit Left = 486 Top = 112 + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 486 ExplicitTop = 112 ExplicitWidth = 252 @@ -917,21 +919,33 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente inherited edtDescuento: TcxDBSpinEdit Left = 93 Top = 112 + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 93 ExplicitTop = 112 end inherited edtIVA: TcxDBSpinEdit Left = 485 Top = 38 + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 485 ExplicitTop = 38 end inherited ImporteBase: TcxDBCurrencyEdit Left = 485 Top = 11 + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 485 ExplicitTop = 11 ExplicitWidth = 253 @@ -942,7 +956,11 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente Top = 65 DataBinding.DataField = '' DataBinding.DataSource = nil + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 485 ExplicitTop = 65 end @@ -951,7 +969,11 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente Top = 65 DataBinding.DataField = '' DataBinding.DataSource = nil + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 556 ExplicitTop = 65 ExplicitWidth = 182 @@ -960,7 +982,11 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente inherited eImporteNeto: TcxDBCurrencyEdit Left = 93 Top = 11 + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 93 ExplicitTop = 11 ExplicitWidth = 259 @@ -970,7 +996,11 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente Left = 93 Top = 139 Properties.OnValidate = frViewTotales1ePortePropertiesValidate + Style.LookAndFeel.SkinName = '' Style.IsFontAssigned = True + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 93 ExplicitTop = 139 ExplicitWidth = 259 @@ -981,6 +1011,10 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente Top = 38 DataBinding.DataField = '' DataBinding.DataSource = nil + Style.LookAndFeel.SkinName = '' + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 93 ExplicitTop = 38 ExplicitWidth = 121 @@ -996,6 +1030,10 @@ inherited fEditorPresupuestoCliente: TfEditorPresupuestoCliente Left = 93 Top = 65 DataBinding.DataField = '' + Style.LookAndFeel.SkinName = '' + StyleDisabled.LookAndFeel.SkinName = '' + StyleFocused.LookAndFeel.SkinName = '' + StyleHot.LookAndFeel.SkinName = '' ExplicitLeft = 93 ExplicitTop = 65 ExplicitWidth = 259 diff --git a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas index e9448427..78dca4d8 100644 --- a/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas +++ b/Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestoCliente.pas @@ -89,6 +89,9 @@ type procedure AsignarVista; virtual; procedure PonerTitulos(const ATitulo: string = ''); override; + function GetModified: Boolean; override; + procedure SetModified(const Value : Boolean); override; + public property Controller : IPresupuestosClienteController read GetController write SetController; property Presupuesto: IBizPresupuestoCliente read GetPresupuesto write SetPresupuesto; @@ -223,6 +226,14 @@ begin Result := FController; end; +function TfEditorPresupuestoCliente.GetModified: Boolean; +begin + Result := inherited GetModified; + + if not Result then + Result := frViewDocumentosPresupuestoCliente1.Modified; +end; + function TfEditorPresupuestoCliente.GetPresupuesto: IBizPresupuestoCliente; begin Result := FPresupuesto; @@ -382,6 +393,12 @@ begin end; end; +procedure TfEditorPresupuestoCliente.SetModified(const Value: Boolean); +begin + inherited; + frViewDocumentosPresupuestoCliente1.Modified := Value; +end; + procedure TfEditorPresupuestoCliente.SetPresupuesto(const Value: IBizPresupuestoCliente); begin FPresupuesto := Value; diff --git a/Source/Modulos/Presupuestos de cliente/Views/uViewDocumentosPresupuestoCliente.pas b/Source/Modulos/Presupuestos de cliente/Views/uViewDocumentosPresupuestoCliente.pas index 09a807d3..35fbf91e 100644 --- a/Source/Modulos/Presupuestos de cliente/Views/uViewDocumentosPresupuestoCliente.pas +++ b/Source/Modulos/Presupuestos de cliente/Views/uViewDocumentosPresupuestoCliente.pas @@ -73,7 +73,7 @@ begin FPresupuesto := Value; //Inicializamos la lista de documentos local con los ficheros del servidor if Assigned(FPresupuesto) and Assigned(FController) then - FListaFicheros := Controller.GestorDocumentosController.DarListaDocumentos(Presupuesto.ID); + ListaFicheros := Controller.GestorDocumentosController.DarListaDocumentos(Presupuesto.ID); RefrescarVisualizador; end; @@ -93,7 +93,7 @@ begin ShowInfoMessage('Recuerde guardar los cambios si quiere previsualizar o imprimir.'); end; } - Controller.GestorDocumentosController.SincronizarDocumentos(Presupuesto.ID, FListaFicheros, Directorio); + Controller.GestorDocumentosController.SincronizarDocumentos(Presupuesto.ID, ListaFicheros, Directorio); end; end. diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES index 1fbf621d..92ae9dd4 100644 Binary files a/Source/Servidor/FactuGES_Server.RES and b/Source/Servidor/FactuGES_Server.RES differ diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj index c4a4c0a9..e33b3439 100644 --- a/Source/Servidor/FactuGES_Server.dproj +++ b/Source/Servidor/FactuGES_Server.dproj @@ -1,294 +1,294 @@ - + - - {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} - FactuGES_Server.dpr - Debug - AnyCPU - DCC32 - ..\..\Output\Debug\Servidor\FactuGES_Server.exe - vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100 - - - 7.0 - False - False - 0 - 3 - ..\..\Output\Release\Servidor - RELEASE - - - 7.0 - 3 - ..\..\Output\Debug\Servidor - DEBUG; - True - True - True - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 - - - Delphi.Personality - - -FalseTrueFalse/standaloneTrueFalse1240FalseFalseFalseFalseFalse308212521.2.4.01.2.4.0jueves, 21 de agosto de 2008 18:49FactuGES_Server.dpr - - - - - MainSource - - - - - -
srvEmpresas
- TDARemoteService -
- - - - - - - - - - - -
RptAlbaranesCliente
- TDataModule -
- -
RptWordAlbaranCliente
- TDataModule -
- -
srvAlbaranesCliente
- TDataAbstractService -
- - - - -
srvAlbaranesProveedor
- TDataAbstractService -
- - - -
srvAlmacenes
- TDARemoteService -
- - - - -
srvArticulos
- TDARemoteService -
- - - - - - - -
RptEtiquetasContacto
- TDataModule -
- -
RptFichasEmpleado
- TDataModule -
- -
srvContactos
- TDARemoteService -
- - - -
srvFabricantes
- TDataAbstractService -
- - - - -
RptFacturasCliente
- TDataModule -
- -
RptWordFacturaCliente
- TDataModule -
- -
srvFacturasCliente
- TDataAbstractService -
- - - - -
srvFacturasProveedor
- TDataAbstractService -
- - - - - - - - -
srvGestorDocumentos
- TDataAbstractService -
- - - -
srvHistoricoMovimientos
- TDataAbstractService -
- - - -
srvInventario
- TDataAbstractService -
- - - - - - - - -
RptPedidosProveedor
- TDataModule -
- -
RptWordPedidoProveedor
- TDataModule -
- -
srvPedidosProveedor
- TDataAbstractService -
- - - - -
RptPresupuestosCliente
- TDataModule -
- -
RptWordCertificadoTrabajo
- TDataModule -
- -
RptWordPresupuestoCliente
- TDataModule -
- -
srvPresupuestosCliente
- TDataAbstractService -
- - - -
RptRecibosCliente
- TDataModule -
- -
srvRecibosCliente
- TDataAbstractService -
- - - -
srvRecibosProveedor
- TDataAbstractService -
- - - -
srvReferencias
- TDataAbstractService -
- - - - -
srvRemesasCliente
- TDataAbstractService -
- - - - -
srvRemesasProveedor
- TDataAbstractService -
- - - - - - -
srvUnidadesMedida
- TDataAbstractService -
- - - -
srvConfiguracion
- TDataAbstractService -
- -
frConexionBD
- TFrame -
- -
frConfGeneral
- TFrame -
- -
fConfiguracion
- TForm -
- -
FrameConfiguracion
- TFrame -
- -
srvLogin
- TDARemoteService -
- -
fAcercaDe
-
- -
dmServer
- TDataModule -
- -
fServerForm
-
- - - - - - - - - -
+ + {ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1} + FactuGES_Server.dpr + Debug + AnyCPU + DCC32 + ..\..\Output\Debug\Servidor\FactuGES_Server.exe + vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d10;tbx_d10;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;GUISDK_D11;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100 + + + 7.0 + False + False + 0 + 3 + ..\..\Output\Release\Servidor + RELEASE + + + 7.0 + 3 + ..\..\Output\Debug\Servidor + DEBUG; + True + True + True + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + $(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10 + + + Delphi.Personality + + + FalseTrueFalse/standaloneTrueFalse1240FalseFalseFalseFalseFalse308212521.2.4.01.2.4.0jueves, 21 de agosto de 2008 18:49FactuGES_Server.dpr + + + + + MainSource + + + + + +
srvEmpresas
+ TDARemoteService +
+ + + + + + + + + + + +
RptAlbaranesCliente
+ TDataModule +
+ +
RptWordAlbaranCliente
+ TDataModule +
+ +
srvAlbaranesCliente
+ TDataAbstractService +
+ + + + +
srvAlbaranesProveedor
+ TDataAbstractService +
+ + + +
srvAlmacenes
+ TDARemoteService +
+ + + + +
srvArticulos
+ TDARemoteService +
+ + + + + + + +
RptEtiquetasContacto
+ TDataModule +
+ +
RptFichasEmpleado
+ TDataModule +
+ +
srvContactos
+ TDARemoteService +
+ + + +
srvFabricantes
+ TDataAbstractService +
+ + + + +
RptFacturasCliente
+ TDataModule +
+ +
RptWordFacturaCliente
+ TDataModule +
+ +
srvFacturasCliente
+ TDataAbstractService +
+ + + + +
srvFacturasProveedor
+ TDataAbstractService +
+ + + + + + + + +
srvGestorDocumentos
+ TDataAbstractService +
+ + + +
srvHistoricoMovimientos
+ TDataAbstractService +
+ + + +
srvInventario
+ TDataAbstractService +
+ + + + + + + + +
RptPedidosProveedor
+ TDataModule +
+ +
RptWordPedidoProveedor
+ TDataModule +
+ +
srvPedidosProveedor
+ TDataAbstractService +
+ + + + +
RptPresupuestosCliente
+ TDataModule +
+ +
RptWordCertificadoTrabajo
+ TDataModule +
+ +
RptWordPresupuestoCliente
+ TDataModule +
+ +
srvPresupuestosCliente
+ TDataAbstractService +
+ + + +
RptRecibosCliente
+ TDataModule +
+ +
srvRecibosCliente
+ TDataAbstractService +
+ + + +
srvRecibosProveedor
+ TDataAbstractService +
+ + + +
srvReferencias
+ TDataAbstractService +
+ + + + +
srvRemesasCliente
+ TDataAbstractService +
+ + + + +
srvRemesasProveedor
+ TDataAbstractService +
+ + + + + + +
srvUnidadesMedida
+ TDataAbstractService +
+ + + +
srvConfiguracion
+ TDataAbstractService +
+ +
frConexionBD
+ TFrame +
+ +
frConfGeneral
+ TFrame +
+ +
fConfiguracion
+ TForm +
+ +
FrameConfiguracion
+ TFrame +
+ +
srvLogin
+ TDARemoteService +
+ +
fAcercaDe
+
+ +
dmServer
+ TDataModule +
+ +
fServerForm
+
+ + + + + + + + + +