Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Mensaje de confirmación después de exportar un documento a Word.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@581 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-09-08 16:13:20 +00:00
parent 1603210f50
commit 76fdc13308
11 changed files with 74 additions and 66 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

102
Source/Base/Base.dproj
View File

@ -53,58 +53,58 @@
<DelphiCompile Include="Base.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\adortl.dcp" />
<DCCReference Include="..\cxDataD11.dcp" />
<DCCReference Include="..\cxEditorsD11.dcp" />
<DCCReference Include="..\cxExportD11.dcp" />
<DCCReference Include="..\cxExtEditorsD11.dcp" />
<DCCReference Include="..\cxGridD11.dcp" />
<DCCReference Include="..\cxIntl6D11.dcp" />
<DCCReference Include="..\cxIntlPrintSys3D11.dcp" />
<DCCReference Include="..\cxLibraryD11.dcp" />
<DCCReference Include="..\cxPageControlD11.dcp" />
<DCCReference Include="..\DataAbstract_Core_D11.dcp" />
<DCCReference Include="..\dbrtl.dcp" />
<DCCReference Include="..\dclIndyCore.dcp" />
<DCCReference Include="..\designide.dcp" />
<DCCReference Include="..\dsnap.dcp" />
<DCCReference Include="..\dxGDIPlusD11.dcp" />
<DCCReference Include="..\dxPSCoreD11.dcp" />
<DCCReference Include="..\dxThemeD11.dcp" />
<DCCReference Include="..\GUISDK_D11.dcp" />
<DCCReference Include="..\IndyCore.dcp" />
<DCCReference Include="..\IndyProtocols.dcp" />
<DCCReference Include="..\IndySystem.dcp" />
<DCCReference Include="..\Jcl.dcp" />
<DCCReference Include="..\JclVcl.dcp" />
<DCCReference Include="..\JSDialog100.dcp" />
<DCCReference Include="..\JvCmpD11R.dcp" />
<DCCReference Include="..\JvCoreD11R.dcp" />
<DCCReference Include="..\JvCtrlsD11R.dcp" />
<DCCReference Include="..\JvDlgsD11R.dcp" />
<DCCReference Include="..\JvMMD11R.dcp" />
<DCCReference Include="..\JvNetD11R.dcp" />
<DCCReference Include="..\JvPageCompsD11R.dcp" />
<DCCReference Include="..\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\JvSystemD11R.dcp" />
<DCCReference Include="..\pckMD5.dcp" />
<DCCReference Include="..\pckUCDataConnector.dcp" />
<DCCReference Include="..\pckUserControl_RT.dcp" />
<DCCReference Include="..\PngComponentsD10.dcp" />
<DCCReference Include="..\PNG_D10.dcp" />
<DCCReference Include="..\RemObjects_Core_D11.dcp" />
<DCCReference Include="..\RemObjects_Indy_D11.dcp" />
<DCCReference Include="..\rtl.dcp" />
<DCCReference Include="..\Informes\adortl.dcp" />
<DCCReference Include="..\Informes\cxDataD11.dcp" />
<DCCReference Include="..\Informes\cxEditorsD11.dcp" />
<DCCReference Include="..\Informes\cxExportD11.dcp" />
<DCCReference Include="..\Informes\cxExtEditorsD11.dcp" />
<DCCReference Include="..\Informes\cxGridD11.dcp" />
<DCCReference Include="..\Informes\cxIntl6D11.dcp" />
<DCCReference Include="..\Informes\cxIntlPrintSys3D11.dcp" />
<DCCReference Include="..\Informes\cxLibraryD11.dcp" />
<DCCReference Include="..\Informes\cxPageControlD11.dcp" />
<DCCReference Include="..\Informes\DataAbstract_Core_D11.dcp" />
<DCCReference Include="..\Informes\dbrtl.dcp" />
<DCCReference Include="..\Informes\dclIndyCore.dcp" />
<DCCReference Include="..\Informes\designide.dcp" />
<DCCReference Include="..\Informes\dsnap.dcp" />
<DCCReference Include="..\Informes\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Informes\dxPSCoreD11.dcp" />
<DCCReference Include="..\Informes\dxThemeD11.dcp" />
<DCCReference Include="..\Informes\GUISDK_D11.dcp" />
<DCCReference Include="..\Informes\IndyCore.dcp" />
<DCCReference Include="..\Informes\IndyProtocols.dcp" />
<DCCReference Include="..\Informes\IndySystem.dcp" />
<DCCReference Include="..\Informes\Jcl.dcp" />
<DCCReference Include="..\Informes\JclVcl.dcp" />
<DCCReference Include="..\Informes\JSDialog100.dcp" />
<DCCReference Include="..\Informes\JvCmpD11R.dcp" />
<DCCReference Include="..\Informes\JvCoreD11R.dcp" />
<DCCReference Include="..\Informes\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Informes\JvDlgsD11R.dcp" />
<DCCReference Include="..\Informes\JvMMD11R.dcp" />
<DCCReference Include="..\Informes\JvNetD11R.dcp" />
<DCCReference Include="..\Informes\JvPageCompsD11R.dcp" />
<DCCReference Include="..\Informes\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\Informes\JvSystemD11R.dcp" />
<DCCReference Include="..\Informes\pckMD5.dcp" />
<DCCReference Include="..\Informes\pckUCDataConnector.dcp" />
<DCCReference Include="..\Informes\pckUserControl_RT.dcp" />
<DCCReference Include="..\Informes\PngComponentsD10.dcp" />
<DCCReference Include="..\Informes\PNG_D10.dcp" />
<DCCReference Include="..\Informes\RemObjects_Core_D11.dcp" />
<DCCReference Include="..\Informes\RemObjects_Indy_D11.dcp" />
<DCCReference Include="..\Informes\rtl.dcp" />
<DCCReference Include="..\Informes\TB2k_D10.dcp" />
<DCCReference Include="..\Informes\tbx_d10.dcp" />
<DCCReference Include="..\Informes\vcl.dcp" />
<DCCReference Include="..\Informes\vclactnband.dcp" />
<DCCReference Include="..\Informes\vcldb.dcp" />
<DCCReference Include="..\Informes\vcljpg.dcp" />
<DCCReference Include="..\Informes\VclSmp.dcp" />
<DCCReference Include="..\Informes\vclx.dcp" />
<DCCReference Include="..\Informes\xmlrtl.dcp" />
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
<DCCReference Include="..\TB2k_D10.dcp" />
<DCCReference Include="..\tbx_d10.dcp" />
<DCCReference Include="..\vcl.dcp" />
<DCCReference Include="..\vclactnband.dcp" />
<DCCReference Include="..\vcldb.dcp" />
<DCCReference Include="..\vcljpg.dcp" />
<DCCReference Include="..\VclSmp.dcp" />
<DCCReference Include="..\vclx.dcp" />
<DCCReference Include="..\xmlrtl.dcp" />
<DCCReference Include="Conexion\uConfigurarConexion.pas">
<Form>fConfigurarConexion</Form>
<DesignClass>TForm</DesignClass>

2
Source/Cliente/FactuGES.dproj
View File

@ -54,7 +54,7 @@
<Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType>VCLApplication</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">2</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.2.8.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.2.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">3</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.3.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.3.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>

8
Source/Cliente/FactuGES.rc
View File

@ -1,7 +1,7 @@
MAINICON ICON "C:\Codigo Tecsitel\Resources\Iconos\Factuges.ico"
1 VERSIONINFO
FILEVERSION 1,2,8,0
PRODUCTVERSION 1,2,8,0
FILEVERSION 1,3,0,0
PRODUCTVERSION 1,3,0,0
FILEFLAGSMASK 0x3FL
FILEFLAGS 0x00L
FILEOS 0x40004L
@ -13,10 +13,10 @@ BEGIN
BLOCK "0C0A04E4"
BEGIN
VALUE "CompanyName", "Rodax Software S.L.\0"
VALUE "FileVersion", "1.2.8.0\0"
VALUE "FileVersion", "1.3.0.0\0"
VALUE "InternalName", "FactuGES\0"
VALUE "ProductName", "FactuGES\0"
VALUE "ProductVersion", "1.2.8.0\0"
VALUE "ProductVersion", "1.3.0.0\0"
END
END
BLOCK "VarFileInfo"

BIN
Source/Cliente/FactuGES.res
View File

Binary file not shown.

4
Source/Modulos/Albaranes de cliente/Views/uEditorAlbaranesClienteReport.pas
View File

@ -26,7 +26,7 @@ implementation
{$R *.dfm}
uses
uAlbaranesClienteReportController;
uAlbaranesClienteReportController, uDialogUtils;
procedure TfEditorAlbaranesClientePreview.actExportarRTFExecute(
Sender: TObject);
@ -39,6 +39,8 @@ begin
for I := 0 to ListaID.Count - 1 do
(Controller as IAlbaranesClienteReportController).ExportToWord(ListaID[I]);
ShowInfoMessage('El albar n se ha exportado correctamente.');
end;
end.

4
Source/Modulos/Facturas de cliente/Views/uEditorFacturasClienteReport.pas
View File

@ -32,7 +32,7 @@ implementation
{$R *.dfm}
uses
uFacturasClienteReportController, uIntegerListUtils;
uFacturasClienteReportController, uIntegerListUtils, uDialogUtils;
procedure TfEditorFacturasClientePreview.actExportarRTFExecute(Sender: TObject);
var
@ -44,6 +44,8 @@ begin
for I := 0 to ListaID.Count - 1 do
(Controller as IFacturasClienteReportController).ExportToWord(ListaID[I]);
ShowInfoMessage('La factura se ha exportado correctamente.');
end;
end.

4
Source/Modulos/Pedidos a proveedor/Views/uEditorPedidosProveedorReport.pas
View File

@ -28,7 +28,7 @@ implementation
{$R *.dfm}
uses
uPedidosProveedorReportController;
uPedidosProveedorReportController, uDialogUtils;
procedure TfEditorPedidosProveedorPreview.actExportarRTFExecute(
Sender: TObject);
@ -41,6 +41,8 @@ begin
for I := 0 to ListaID.Count - 1 do
(Controller as IPedidosProveedorReportController).ExportToWord(ListaID[I]);
ShowInfoMessage('El pedido se ha exportado correctamente.');
end;
end.

4
Source/Modulos/Presupuestos de cliente/Views/uEditorPresupuestosClienteReport.pas
View File

@ -24,7 +24,7 @@ implementation
{$R *.dfm}
uses
uPresupuestosClienteReportController, uIntegerListUtils;
uPresupuestosClienteReportController, uIntegerListUtils, uDialogUtils;
procedure TfEditorPresupuestosClientePreview.actExportarRTFExecute(
Sender: TObject);
@ -37,6 +37,8 @@ begin
for I := 0 to ListaID.Count - 1 do
(Controller as IPresupuestosClienteReportController).ExportToWord(ListaID[I]);
ShowInfoMessage('El presupuesto se ha exportado correctamente.');
end;
end.

BIN
Source/Servidor/FactuGES_Server.RES
View File

Binary file not shown.

2
Source/Servidor/FactuGES_Server.dproj
View File

@ -35,7 +35,7 @@
<Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType/>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">2</VersionInfo><VersionInfo Name="Release">8</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.2.8.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.2.8.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">jueves, 04 de septiembre de 2008 16:37</VersionInfoKeys></VersionInfoKeys><Excluded_Packages/><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">3</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.3.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.3.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">viernes, 05 de septiembre de 2008 19:22</VersionInfoKeys></VersionInfoKeys><Excluded_Packages/><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
</ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
<ItemGroup>

10
Source/Servidor/FactuGES_Server.rc
View File

@ -1,7 +1,7 @@
MAINICON ICON "C:\Codigo Tecsitel\Resources\Iconos\Servidor.ico"
1 VERSIONINFO
FILEVERSION 1,2,8,0
PRODUCTVERSION 1,2,8,0
FILEVERSION 1,3,0,0
PRODUCTVERSION 1,3,0,0
FILEFLAGSMASK 0x3FL
FILEFLAGS 0x00L
FILEOS 0x40004L
@ -12,9 +12,9 @@ BEGIN
BEGIN
BLOCK "0C0A04E4"
BEGIN
VALUE "FileVersion", "1.2.8.0\0"
VALUE "ProductVersion", "1.2.8.0\0"
VALUE "CompileDate", "lunes, 08 de septiembre de 2008 16:32\0"
VALUE "FileVersion", "1.3.0.0\0"
VALUE "ProductVersion", "1.3.0.0\0"
VALUE "CompileDate", "lunes, 08 de septiembre de 2008 17:18\0"
END
END
BLOCK "VarFileInfo"