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
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
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 @@
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
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
-
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
-
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDARemoteService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDataAbstractService
-
-
-
- TFrame
-
-
-
- TFrame
-
-
-
- TForm
-
-
-
- TFrame
-
-
-
- TDARemoteService
-
-
-
-
-
-
- TDataModule
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+ {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
+
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDARemoteService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+ TFrame
+
+
+
+ TFrame
+
+
+
+ TForm
+
+
+
+ TFrame
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+ TDataModule
+
+
+
+
+
+
+
+
+
+
+
+
+
+