diff --git a/Build/Build.fbl6 b/Build/Build.fbl6
index 502156e..3040ec1 100644
Binary files a/Build/Build.fbl6 and b/Build/Build.fbl6 differ
diff --git a/Source/Cliente/FactuGES.dproj b/Source/Cliente/FactuGES.dproj
index 579c8f2..181d8fd 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\TrueFalse2250FalseFalseFalseFalseFalse30821252Rodax Software S.L.2.2.5.0FactuGES v2FactuGES v22.2.5.0
+FalseTrueFalseC:\Archivos de programa\Borland\Delphi7\Bin\TrueFalse2260FalseFalseFalseFalseFalse30821252Rodax Software S.L.2.2.6.0FactuGES v2FactuGES v22.2.6.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 760d597..2e52eae 100644
Binary files a/Source/Cliente/FactuGES.res and b/Source/Cliente/FactuGES.res differ
diff --git a/Source/GUIBase/uEditorGridBase.dfm b/Source/GUIBase/uEditorGridBase.dfm
index c6fcbf9..6dd00fa 100644
--- a/Source/GUIBase/uEditorGridBase.dfm
+++ b/Source/GUIBase/uEditorGridBase.dfm
@@ -30,7 +30,7 @@ inherited fEditorGridBase: TfEditorGridBase
DockPos = 0
DragHandleStyle = dhDouble
TabOrder = 1
- ExplicitWidth = 457
+ ExplicitWidth = 543
inherited TBXItem29: TTBXItem
Visible = False
end
@@ -254,8 +254,6 @@ inherited fEditorGridBase: TfEditorGridBase
object actExportarExcel: TAction
Category = 'Archivo'
Caption = 'Exportar a fichero Excel...'
- Enabled = False
- Visible = False
OnExecute = actExportarExcelExecute
OnUpdate = actExportarExcelUpdate
end
diff --git a/Source/Modulos/Contactos/Views/uEditorContactos.dfm b/Source/Modulos/Contactos/Views/uEditorContactos.dfm
index 357b021..9879f77 100644
--- a/Source/Modulos/Contactos/Views/uEditorContactos.dfm
+++ b/Source/Modulos/Contactos/Views/uEditorContactos.dfm
@@ -2,8 +2,6 @@ inherited fEditorContactos: TfEditorContactos
Left = 285
Top = 448
Caption = 'Lista de contactos'
- ExplicitWidth = 320
- ExplicitHeight = 240
PixelsPerInch = 96
TextHeight = 13
inherited JvNavPanelHeader: TJvNavPanelHeader
@@ -11,7 +9,7 @@ inherited fEditorContactos: TfEditorContactos
end
inherited TBXDock: TTBXDock
inherited tbxFiltro: TTBXToolbar
- ExplicitWidth = 269
+ ExplicitWidth = 194
inherited tbxEditFiltro: TTBXEditItem
EditOptions = [tboUseEditWhenVertical]
end
@@ -19,10 +17,6 @@ inherited fEditorContactos: TfEditorContactos
Visible = False
end
end
- inherited TBXTMain2: TTBXToolbar
- Left = 334
- ExplicitLeft = 334
- end
end
inherited EditorActionList: TActionList
inherited actPrevisualizar: TAction
diff --git a/Source/Modulos/Formas de pago/Views/uEditorFormaPago.pas b/Source/Modulos/Formas de pago/Views/uEditorFormaPago.pas
index 920debf..cc1ffbf 100644
--- a/Source/Modulos/Formas de pago/Views/uEditorFormaPago.pas
+++ b/Source/Modulos/Formas de pago/Views/uEditorFormaPago.pas
@@ -162,6 +162,9 @@ end;
procedure TfEditorFormaPago.actAnadirExecute(Sender: TObject);
begin
+ if Assigned(FFormaPago) and (FFormaPago.State = dsInsert) then
+ FController.Guardar(FFormaPago);
+
FPlazos.Append;
end;
diff --git a/Source/Servidor/FactuGES_Server.dproj b/Source/Servidor/FactuGES_Server.dproj
index a95491a..2415363 100644
--- a/Source/Servidor/FactuGES_Server.dproj
+++ b/Source/Servidor/FactuGES_Server.dproj
@@ -28,7 +28,7 @@
Delphi.Personality
- FalseTrueFalseTrueFalse2250FalseFalseFalseFalseFalse30821252Rodax Software S.L.2.2.5.0FactuGES v2(Servidor)2.2.5.0lunes, 18 de abril de 2022 18:40
+ FalseTrueFalseTrueFalse2260FalseFalseFalseFalseFalse30821252Rodax Software S.L.2.2.6.0FactuGES v2(Servidor)2.2.6.0viernes, 03 de junio de 2022 11:16
File C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPScxScheduler2LnkD11.bpl not found
FactuGES_Server.dpr
diff --git a/Source/Servidor/FactuGES_Server.res b/Source/Servidor/FactuGES_Server.res
index 38d6b74..feff8ee 100644
Binary files a/Source/Servidor/FactuGES_Server.res and b/Source/Servidor/FactuGES_Server.res differ