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