diff --git a/Source/Base/Utiles/uSistemaFunc.pas b/Source/Base/Utiles/uSistemaFunc.pas
index 506171d5..532dd7e2 100644
--- a/Source/Base/Utiles/uSistemaFunc.pas
+++ b/Source/Base/Utiles/uSistemaFunc.pas
@@ -35,7 +35,6 @@ function DarFicheroBMPTemporal : String;
function DarFicheroTIFFTemporal : String;
function DarFicheroHTMLTemporal : String;
function DarFicheroExcelTemporal : String;
-function DarFicheroWordExportar (var Fichero : String) : Boolean;
function DarVersionFichero (Executable : String) : String;
function DarFechaFichero (Executable : String) : String;
procedure CopiarFichero(const Origen, Destino: string);
@@ -43,6 +42,8 @@ procedure DoDelTree( TheDir : String);
procedure Deltree(DirToKill : String; KillChoosenDir : Boolean);
function GetSpecialFolderPath(folder : integer) : string;
function PreguntarRuta(const ATitulo: String; const AComentario: String; var ARuta: String): Boolean;
+function PreguntarFicheroWordExportar (var Fichero : String) : Boolean;
+function PreguntarFicheroExcelExportar (var Fichero : String) : Boolean;
function EscapeIllegalChars(AFileName: string): string;
implementation
@@ -174,7 +175,7 @@ begin
Result := Copy(Cadena, 0, (Length(Cadena)-3)) + 'jpg';
end;
-function DarFicheroWordExportar (var Fichero : String) : Boolean;
+function PreguntarFicheroWordExportar (var Fichero : String) : Boolean;
var
DialogoSalvar : TSaveDialog;
begin
@@ -195,6 +196,28 @@ begin
end;
end;
+function PreguntarFicheroExcelExportar (var Fichero : String) : Boolean;
+var
+ DialogoSalvar : TSaveDialog;
+begin
+ DialogoSalvar := TSaveDialog.Create(NIL);
+ try
+ with DialogoSalvar do
+ begin
+ DefaultExt := 'xls';
+ Filter := 'Documento de Excel (*.xls)|*.xls';
+ FilterIndex := 0;
+ Options := [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing];
+ end;
+ Result := DialogoSalvar.Execute;
+ if Result then
+ Fichero := DialogoSalvar.FileName;
+ finally
+ DialogoSalvar.Free;
+ end;
+end;
+
+
function DarVersionFichero (Executable : String) : String;
var
Obj : TJclFileVersionInfo;
diff --git a/Source/GUIBase/GUIBase.dproj b/Source/GUIBase/GUIBase.dproj
index d352233f..2c6d31f4 100644
--- a/Source/GUIBase/GUIBase.dproj
+++ b/Source/GUIBase/GUIBase.dproj
@@ -58,52 +58,52 @@
MainSource
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
diff --git a/Source/GUIBase/uEditorBase.dfm b/Source/GUIBase/uEditorBase.dfm
index 99526794..38771460 100644
--- a/Source/GUIBase/uEditorBase.dfm
+++ b/Source/GUIBase/uEditorBase.dfm
@@ -396,6 +396,7 @@ object fEditorBase: TfEditorBase
end
end
object SmallImages: TPngImageList
+ ShareImages = True
PngImages = <
item
PngImage.Data = {
@@ -885,6 +886,7 @@ object fEditorBase: TfEditorBase
end
object LargeImages: TPngImageList
Height = 24
+ ShareImages = True
Width = 24
PngImages = <
item
diff --git a/Source/GUIBase/uEditorGridBase.dfm b/Source/GUIBase/uEditorGridBase.dfm
index 9b596e4c..6e10532b 100644
--- a/Source/GUIBase/uEditorGridBase.dfm
+++ b/Source/GUIBase/uEditorGridBase.dfm
@@ -2,35 +2,35 @@ inherited fEditorGridBase: TfEditorGridBase
Left = 441
Top = 354
Caption = 'fEditorGridBase'
- ClientHeight = 444
- ClientWidth = 543
+ ClientHeight = 504
+ ClientWidth = 706
OnDestroy = CustomEditorDestroy
- ExplicitWidth = 551
- ExplicitHeight = 478
+ ExplicitWidth = 714
+ ExplicitHeight = 538
PixelsPerInch = 96
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader
Top = 0
- Width = 543
+ Width = 706
ExplicitTop = 0
- ExplicitWidth = 543
+ ExplicitWidth = 706
inherited Image1: TImage
- Left = 516
+ Left = 679
ExplicitLeft = 518
end
end
inherited TBXDock: TTBXDock
Top = 27
- Width = 543
+ Width = 706
Height = 75
ExplicitTop = 27
- ExplicitWidth = 543
+ ExplicitWidth = 706
ExplicitHeight = 75
inherited tbxMain: TTBXToolbar
DockPos = 0
DragHandleStyle = dhDouble
TabOrder = 1
- ExplicitWidth = 457
+ ExplicitWidth = 600
inherited TBXItem29: TTBXItem
Visible = False
end
@@ -49,10 +49,14 @@ inherited fEditorGridBase: TfEditorGridBase
end
inherited TBXSeparatorItem10: TTBXSeparatorItem [12]
end
- inherited TBXItem26: TTBXItem [13]
+ object TBXItem384: TTBXItem [13]
+ Action = actExportarExcel
+ DisplayMode = nbdmTextOnly
+ end
+ inherited TBXItem26: TTBXItem [14]
Visible = False
end
- inherited TBXSeparatorItem2: TTBXSeparatorItem [14]
+ inherited TBXSeparatorItem2: TTBXSeparatorItem [15]
Visible = True
end
inherited TBXItem25: TTBXItem
@@ -61,7 +65,7 @@ inherited fEditorGridBase: TfEditorGridBase
inherited TBXSeparatorItem11: TTBXSeparatorItem
Visible = False
end
- object TBXItem36: TTBXItem [18]
+ object TBXItem36: TTBXItem [19]
Action = actAnchoAuto
DisplayMode = nbdmImageAndText
end
@@ -107,7 +111,7 @@ inherited fEditorGridBase: TfEditorGridBase
inherited tbxMenu: TTBXToolbar
TabOrder = 2
Visible = False
- ExplicitWidth = 543
+ ExplicitWidth = 706
inherited TBXSubmenuItem4: TTBXSubmenuItem
inherited TBXItem30: TTBXItem
Visible = False
@@ -123,6 +127,11 @@ inherited fEditorGridBase: TfEditorGridBase
inherited TBXItem21: TTBXItem
Visible = False
end
+ object TBXSeparatorItem172: TTBXSeparatorItem [12]
+ end
+ object TBXItem395: TTBXItem [13]
+ Action = actExportarExcel
+ end
end
inherited TBXSubmenuItem5: TTBXSubmenuItem
Visible = False
@@ -163,10 +172,10 @@ inherited fEditorGridBase: TfEditorGridBase
end
end
inherited StatusBar: TJvStatusBar
- Top = 425
- Width = 543
- ExplicitTop = 425
- ExplicitWidth = 543
+ Top = 485
+ Width = 706
+ ExplicitTop = 485
+ ExplicitWidth = 706
end
inherited EditorActionList: TActionList
Left = 64
@@ -219,8 +228,15 @@ inherited fEditorGridBase: TfEditorGridBase
OnExecute = actFiltrarExecute
OnUpdate = actFiltrarUpdate
end
+ object actExportarExcel: TAction
+ Category = 'Archivo'
+ Caption = 'Exportar a fichero Excel...'
+ OnExecute = actExportarExcelExecute
+ OnUpdate = actExportarExcelUpdate
+ end
end
inherited SmallImages: TPngImageList
+ ShareImages = False
PngImages = <
item
PngImage.Data = {
@@ -1558,6 +1574,12 @@ inherited fEditorGridBase: TfEditorGridBase
object N3: TMenuItem
Caption = '-'
end
+ object ExportaraficheroExcel1: TMenuItem
+ Action = actExportarExcel
+ end
+ object N488: TMenuItem
+ Caption = '-'
+ end
object Actualizar1: TMenuItem
Action = actRefrescar
end
diff --git a/Source/GUIBase/uEditorGridBase.pas b/Source/GUIBase/uEditorGridBase.pas
index 852f74f2..7ee4b2ee 100644
--- a/Source/GUIBase/uEditorGridBase.pas
+++ b/Source/GUIBase/uEditorGridBase.pas
@@ -57,6 +57,12 @@ type
actFiltrar: TAction;
TBXItem37: TTBXItem;
TBXTMain2: TTBXToolbar;
+ actExportarExcel: TAction;
+ ExportaraficheroExcel1: TMenuItem;
+ N488: TMenuItem;
+ TBXSeparatorItem172: TTBXSeparatorItem;
+ TBXItem395: TTBXItem;
+ TBXItem384: TTBXItem;
procedure tbxEditFiltroChange(Sender: TObject; const Text: String);
procedure FormShow(Sender: TObject);
procedure actQuitarFiltroExecute(Sender: TObject);
@@ -69,6 +75,8 @@ type
procedure actFiltrarExecute(Sender: TObject);
procedure actFiltrarUpdate(Sender: TObject);
procedure CustomEditorDestroy(Sender: TObject);
+ procedure actExportarExcelUpdate(Sender: TObject);
+ procedure actExportarExcelExecute(Sender: TObject);
protected
FViewGrid : IViewGridBase;
procedure SetViewGrid(const Value : IViewGridBase); virtual;
@@ -152,6 +160,7 @@ end;
procedure TfEditorGridBase.FormShow(Sender: TObject);
begin
inherited;
+
if Assigned(ViewGrid) then
begin
ViewGrid.ShowEmbedded(Self);
@@ -171,6 +180,19 @@ begin
(Sender as TAction).Enabled := False;
end;
+procedure TfEditorGridBase.actExportarExcelExecute(Sender: TObject);
+begin
+ inherited;
+ if Assigned(ViewGrid) then
+ ViewGrid.ExportToExcel;
+end;
+
+procedure TfEditorGridBase.actExportarExcelUpdate(Sender: TObject);
+begin
+ inherited;
+ (Sender as TAction).Enabled := Assigned(ViewGrid);
+end;
+
procedure TfEditorGridBase.actFiltrarExecute(Sender: TObject);
begin
inherited;
diff --git a/Source/GUIBase/uViewGridBase.pas b/Source/GUIBase/uViewGridBase.pas
index 0efb9652..3050d077 100644
--- a/Source/GUIBase/uViewGridBase.pas
+++ b/Source/GUIBase/uViewGridBase.pas
@@ -17,7 +17,7 @@ uses
cxClasses, cxControls, cxGridCustomView, cxGridCustomTableView,
cxGridTableView, cxGridDBTableView, cxGrid, Menus, ActnList, Grids,
DBGrids, JvComponent, JvFormAutoSize, uGridStatusUtils, uViewFiltroBase,
- uDAInterfaces;
+ uDAInterfaces, cxGridExportLink;
type
IViewGridBase = interface(IViewBase)
@@ -38,6 +38,9 @@ type
procedure GotoFirst;
procedure GotoLast;
+ procedure ExportToExcel(const AFileName: string); overload;
+ procedure ExportToExcel; overload;
+
function GetFocusedView : TcxGridDBTableView;
property _FocusedView : TcxGridDBTableView read GetFocusedView;
@@ -154,6 +157,9 @@ type
procedure GotoFirst;
procedure GotoLast;
+ procedure ExportToExcel(const AFileName: string); overload;
+ procedure ExportToExcel; overload;
+
procedure StoreToRegistry (const Path : String); virtual;
procedure RestoreFromRegistry (const Path : String); virtual;
@@ -256,25 +262,21 @@ end;
procedure TfrViewGridBase.cxGridViewColumnGetStoredProperties(
Sender: TcxCustomGridTableItem; AProperties: TStrings);
begin
-// ShowMessage(Sender.Name + ' cxGridViewColumnGetStoredProperties');
end;
procedure TfrViewGridBase.cxGridViewColumnGetStoredPropertyValue(
Sender: TcxCustomGridTableItem; const AName: string; var AValue: Variant);
begin
-// ShowMessage(Sender.Name + ' cxGridViewColumnGetStoredPropertyValue');
end;
procedure TfrViewGridBase.cxGridViewColumnSetStoredPropertyValue(
Sender: TcxCustomGridTableItem; const AName: string; const AValue: Variant);
begin
-// ShowMessage(Sender.Name + ' cxGridViewColumnSetStoredPropertyValue');
end;
procedure TfrViewGridBase.cxGridViewGetStoredProperties(
Sender: TcxCustomGridView; AProperties: TStrings);
begin
-// ShowMessage('cxGridViewGetStoredProperties');
AProperties.Delete(AProperties.IndexOf('Footer'));
AProperties.Delete(AProperties.IndexOf('GroupByBox'));
AProperties.Delete(AProperties.IndexOf('GroupFooters'));
@@ -284,13 +286,11 @@ end;
procedure TfrViewGridBase.cxGridViewGetStoredPropertyValue(
Sender: TcxCustomGridView; const AName: string; var AValue: Variant);
begin
-// ShowMessage('cxGridViewGetStoredPropertyValue');
end;
procedure TfrViewGridBase.cxGridViewSetStoredPropertyValue(
Sender: TcxCustomGridView; const AName: string; const AValue: Variant);
begin
-// ShowMessage('cxGridViewSetStoredPropertyValue');
end;
procedure TfrViewGridBase.ExpandirTodo;
@@ -299,6 +299,20 @@ begin
_FocusedView.ViewData.Expand(True);
end;
+procedure TfrViewGridBase.ExportToExcel(const AFileName: string);
+begin
+ if Assigned(_Grid) then
+ ExportGridToExcel(AFileName, _Grid);
+end;
+
+procedure TfrViewGridBase.ExportToExcel;
+var
+ AFileName : String;
+begin
+ if PreguntarFicheroExcelExportar(AFileName) then
+ ExportToExcel(AFileName);
+end;
+
function TfrViewGridBase.GetDblClick: TNotifyEvent;
begin
Result := FOnDblClick;
@@ -356,7 +370,6 @@ begin
if AObject is TcxGridDBColumn then
with TcxGridDBColumn(AObject) do
begin
-// ShowMessage('InitStoredObject');
OnGetStoredProperties := cxGridViewColumnGetStoredProperties;
OnGetStoredPropertyValue := cxGridViewColumnGetStoredPropertyValue;
OnSetStoredPropertyValue := cxGridViewColumnSetStoredPropertyValue;
diff --git a/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteReportController.pas b/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteReportController.pas
index 0174de75..25fb32dc 100644
--- a/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteReportController.pas
+++ b/Source/Modulos/Albaranes de cliente/Controller/uAlbaranesClienteReportController.pas
@@ -123,7 +123,7 @@ var
begin
Result := False;
AFile := AFileName;
- if EsCadenaVacia(AFile) and (not DarFicheroWordExportar(AFile)) then
+ if EsCadenaVacia(AFile) and (not PreguntarFicheroWordExportar(AFile)) then
Exit;
ShowHourglassCursor;
diff --git a/Source/Modulos/Facturas de cliente/Controller/uFacturasClienteReportController.pas b/Source/Modulos/Facturas de cliente/Controller/uFacturasClienteReportController.pas
index 6064cc20..e9cb0f2a 100644
--- a/Source/Modulos/Facturas de cliente/Controller/uFacturasClienteReportController.pas
+++ b/Source/Modulos/Facturas de cliente/Controller/uFacturasClienteReportController.pas
@@ -66,7 +66,7 @@ begin
Result := False;
AFile := AFileName;
- if EsCadenaVacia(AFile) and (not DarFicheroWordExportar(AFile)) then
+ if EsCadenaVacia(AFile) and (not PreguntarFicheroWordExportar(AFile)) then
Exit;
ShowHourglassCursor;
diff --git a/Source/Modulos/Facturas de proveedor/Model/schFacturasProveedorClient_Intf.pas b/Source/Modulos/Facturas de proveedor/Model/schFacturasProveedorClient_Intf.pas
index 7022ba11..b10b29bc 100644
--- a/Source/Modulos/Facturas de proveedor/Model/schFacturasProveedorClient_Intf.pas
+++ b/Source/Modulos/Facturas de proveedor/Model/schFacturasProveedorClient_Intf.pas
@@ -3,7 +3,7 @@ unit schFacturasProveedorClient_Intf;
interface
uses
- Classes, DB, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
+ Classes, DB, schBase_Intf, SysUtils, uROClasses, uDADataTable, FmtBCD, uROXMLIntf;
const
{ Data table rules ids
@@ -332,7 +332,7 @@ type
end;
{ TFacturasProveedorDataTableRules }
- TFacturasProveedorDataTableRules = class(TDADataTableRules, IFacturasProveedor)
+ TFacturasProveedorDataTableRules = class(TIntfObjectDADataTableRules, IFacturasProveedor)
private
f_OBSERVACIONES: IROStrings;
procedure OBSERVACIONES_OnChange(Sender: TObject);
@@ -632,7 +632,7 @@ type
end;
{ TFacturasProveedor_DetallesDataTableRules }
- TFacturasProveedor_DetallesDataTableRules = class(TDADataTableRules, IFacturasProveedor_Detalles)
+ TFacturasProveedor_DetallesDataTableRules = class(TIntfObjectDADataTableRules, IFacturasProveedor_Detalles)
private
protected
{ Property getters and setters }
@@ -787,7 +787,7 @@ type
end;
{ TFacturasProveedor_PedidosDataTableRules }
- TFacturasProveedor_PedidosDataTableRules = class(TDADataTableRules, IFacturasProveedor_Pedidos)
+ TFacturasProveedor_PedidosDataTableRules = class(TIntfObjectDADataTableRules, IFacturasProveedor_Pedidos)
private
protected
{ Property getters and setters }
diff --git a/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorReportController.pas b/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorReportController.pas
index 1bd6107b..773fc853 100644
--- a/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorReportController.pas
+++ b/Source/Modulos/Pedidos a proveedor/Controller/uPedidosProveedorReportController.pas
@@ -65,7 +65,7 @@ begin
Result := False;
AFile := AFileName;
- if EsCadenaVacia(AFile) and (not DarFicheroWordExportar(AFile)) then
+ if EsCadenaVacia(AFile) and (not PreguntarFicheroWordExportar(AFile)) then
Exit;
ShowHourglassCursor;
diff --git a/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteReportController.pas b/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteReportController.pas
index daabd506..5e95179c 100644
--- a/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteReportController.pas
+++ b/Source/Modulos/Presupuestos de cliente/Controller/uPresupuestosClienteReportController.pas
@@ -65,7 +65,7 @@ var
begin
Result := False;
AFile := AFileName;
- if EsCadenaVacia(AFile) and (not DarFicheroWordExportar(AFile)) then
+ if EsCadenaVacia(AFile) and (not PreguntarFicheroWordExportar(AFile)) then
Exit;
ShowHourglassCursor;
@@ -90,7 +90,7 @@ var
begin
Result := False;
AFile := AFileName;
- if EsCadenaVacia(AFile) and (not DarFicheroWordExportar(AFile)) then
+ if EsCadenaVacia(AFile) and (not PreguntarFicheroWordExportar(AFile)) then
Exit;
ShowHourglassCursor;
diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index b19c972a..fbd828f4 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 b2a9ec17..55c67cd7 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -1,290 +1,290 @@
-
+
-
- {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/standaloneTrueFalse1230FalseFalseFalseFalseFalse308212521.2.3.01.2.3.0martes, 12 de agosto de 2008 12:17FactuGES_Server.dpr
-
-
-
-
- MainSource
-
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
-
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
- TDARemoteService
-
-
-
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- TDARemoteService
-
-
-
-
-
- TDataAbstractService
-
-
-
-
-
-
- TDataModule
-
-
-
- TDataModule
-
-
-
- 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/standaloneTrueFalse1230FalseFalseFalseFalseFalse308212521.2.3.01.2.3.0martes, 12 de agosto de 2008 12:17FactuGES_Server.dpr
+
+
+
+
+ MainSource
+
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+ TDARemoteService
+
+
+
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ TDARemoteService
+
+
+
+
+
+ TDataAbstractService
+
+
+
+
+
+
+ TDataModule
+
+
+
+ TDataModule
+
+
+
+ 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
+
+
+
+
+
+
+
+
+
+
+
+
+
+