diff --git a/Source/Base/Utiles/uDisplayUtils.pas b/Source/Base/Utiles/uDisplayUtils.pas
index 3a447572..92abffa0 100644
--- a/Source/Base/Utiles/uDisplayUtils.pas
+++ b/Source/Base/Utiles/uDisplayUtils.pas
@@ -34,7 +34,7 @@ begin
Font.Style := Styles;
end;
except
- // ignorar las excepciones EPropertyError por no encontrar la propiedad
+ // ignorar las excepciones EPropertyError por no encontrar la propiedad
end;
@@ -48,7 +48,11 @@ begin
ChildControl := TWinControl(Control).Controls[Index];
// Set font properties
- SetFontProperties(ChildControl, Name, Size, Styles);
+ try
+ SetFontProperties(ChildControl, Name, Size, Styles);
+ except
+ // ignorar las excepciones EPropertyError por no encontrar la propiedad
+ end;
end;
end;
end;
diff --git a/Source/Cliente/FactuGES.dproj b/Source/Cliente/FactuGES.dproj
index 74120da1..8ec1deef 100644
--- a/Source/Cliente/FactuGES.dproj
+++ b/Source/Cliente/FactuGES.dproj
@@ -52,7 +52,7 @@
Delphi.Personality
VCLApplication
-FalseTrueFalseC:\Archivos de programa\Borland\Delphi7\Bin\TrueFalse2700FalseFalseFalseFalseFalse30821252Rodax Software S.L.2.7.0.0FactuGESFactuGES2.7.0.0
+FalseTrueFalseC:\Archivos de programa\Borland\Delphi7\Bin\TrueFalse2710FalseFalseFalseFalseFalse30821252Rodax Software S.L.2.7.1.0FactuGESFactuGES2.7.1.0
File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found
FactuGES.dprFalse
diff --git a/Source/Cliente/FactuGES.res b/Source/Cliente/FactuGES.res
index bec558be..71ec4bfd 100644
Binary files a/Source/Cliente/FactuGES.res and b/Source/Cliente/FactuGES.res differ
diff --git a/Source/Modulos/Albaranes de proveedor/Views/uEditorAlbaranesProveedor.pas b/Source/Modulos/Albaranes de proveedor/Views/uEditorAlbaranesProveedor.pas
index 68366a0e..fda46bc2 100644
--- a/Source/Modulos/Albaranes de proveedor/Views/uEditorAlbaranesProveedor.pas
+++ b/Source/Modulos/Albaranes de proveedor/Views/uEditorAlbaranesProveedor.pas
@@ -188,8 +188,6 @@ begin
Albaranes.DataTable.Active := True;
ViewGrid.GotoFirst;
- //Para que coja el ancho automático
- actAnchoAuto.Execute;
end;
function TfEditorAlbaranesProveedor.GetController: IAlbaranesProveedorController;
diff --git a/Source/Modulos/Articulos/Views/uEditorArticulos.pas b/Source/Modulos/Articulos/Views/uEditorArticulos.pas
index 85d07e27..1cacf3a5 100644
--- a/Source/Modulos/Articulos/Views/uEditorArticulos.pas
+++ b/Source/Modulos/Articulos/Views/uEditorArticulos.pas
@@ -71,8 +71,6 @@ begin
Articulos.DataTable.Active := True;
ViewGrid.GotoFirst;
- //Para que coja el ancho automático
- actAnchoAuto.Execute;
end;
function TfEditorArticulos.GetArticulos: IBizArticulo;
diff --git a/Source/Modulos/Comisiones/Views/uEditorComisiones.pas b/Source/Modulos/Comisiones/Views/uEditorComisiones.pas
index d9a019ed..2c3a9ae8 100644
--- a/Source/Modulos/Comisiones/Views/uEditorComisiones.pas
+++ b/Source/Modulos/Comisiones/Views/uEditorComisiones.pas
@@ -75,8 +75,6 @@ begin
Comisiones.DataTable.Active := True;
ViewGrid.GotoFirst;
- //Para que coja el ancho automático
- actAnchoAuto.Execute;
end;
function TfEditorComisiones.GetComisiones: IBizComisiones;
diff --git a/Source/Modulos/Contactos/Views/uEditorContactos.pas b/Source/Modulos/Contactos/Views/uEditorContactos.pas
index 5b50fe62..40cf5389 100644
--- a/Source/Modulos/Contactos/Views/uEditorContactos.pas
+++ b/Source/Modulos/Contactos/Views/uEditorContactos.pas
@@ -66,8 +66,6 @@ begin
Contactos.DataTable.Active := True;
ViewGrid.GotoFirst;
- //Para que coja el ancho automático
- actAnchoAuto.Execute;
end;
function TfEditorContactos.GetContactos: IBizContacto;
diff --git a/Source/Modulos/Inventario/Views/uEditorInventario.pas b/Source/Modulos/Inventario/Views/uEditorInventario.pas
index 92e10132..7391844b 100644
--- a/Source/Modulos/Inventario/Views/uEditorInventario.pas
+++ b/Source/Modulos/Inventario/Views/uEditorInventario.pas
@@ -148,8 +148,6 @@ begin
Inventario.DataTable.Active := True;
actContraer.Execute;
ViewGrid.GotoFirst;
- //Para que coja el ancho automático
- actAnchoAuto.Execute;
end;
procedure TfEditorInventario.actModificarExecute(Sender: TObject);
diff --git a/Source/Modulos/Remesas de cliente/Views/uEditorRemesasCliente.pas b/Source/Modulos/Remesas de cliente/Views/uEditorRemesasCliente.pas
index fae076aa..8008f0e3 100644
--- a/Source/Modulos/Remesas de cliente/Views/uEditorRemesasCliente.pas
+++ b/Source/Modulos/Remesas de cliente/Views/uEditorRemesasCliente.pas
@@ -82,8 +82,6 @@ begin
RemesasCliente.DataTable.Active := True;
ViewGrid.GotoFirst;
- //Para que coja el ancho automático
- actAnchoAuto.Execute;
end;
function TfEditorRemesasCliente.GetRemesasCliente: IBizRemesaCliente;
diff --git a/Source/Modulos/Remesas de proveedor/Views/uEditorRemesasProveedor.pas b/Source/Modulos/Remesas de proveedor/Views/uEditorRemesasProveedor.pas
index f1ad62e2..d8ea86c4 100644
--- a/Source/Modulos/Remesas de proveedor/Views/uEditorRemesasProveedor.pas
+++ b/Source/Modulos/Remesas de proveedor/Views/uEditorRemesasProveedor.pas
@@ -82,8 +82,6 @@ begin
RemesasProveedor.DataTable.Active := True;
ViewGrid.GotoFirst;
- //Para que coja el ancho automático
- actAnchoAuto.Execute;
end;
function TfEditorRemesasProveedor.GetRemesasProveedor: IBizRemesaProveedor;
diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index 39c30524..1b971989 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -16,7 +16,7 @@ BEGIN
VALUE "FileVersion", "2.6.9.0\0"
VALUE "ProductName", "FactuGES (Servidor)\0"
VALUE "ProductVersion", "2.6.9.0\0"
- VALUE "CompileDate", "lunes, 26 de octubre de 2015 22:39\0"
+ VALUE "CompileDate", "martes, 27 de octubre de 2015 10:49\0"
END
END
BLOCK "VarFileInfo"
diff --git a/Source/Servidor/FactuGES_Server.res b/Source/Servidor/FactuGES_Server.res
index 76a6c90d..819dd7d1 100644
Binary files a/Source/Servidor/FactuGES_Server.res and b/Source/Servidor/FactuGES_Server.res differ