diff --git a/tsUserControl.vb b/tsUserControl.vb index 5f02e50..671ae4c 100644 --- a/tsUserControl.vb +++ b/tsUserControl.vb @@ -1120,8 +1120,8 @@ Public MustInherit Class tsUserControl Private Sub _ValidarControl(sender As Object, e As ValidationEventArgs) Try - If ValidarControles AndAlso (Me IsNot Nothing AndAlso (Not (System.ComponentModel.DesignerProperties.GetIsInDesignMode(Me)) And (e.UpdateSource = Validation.Native.UpdateEditorSource.DoValidate OrElse e.UpdateSource = Validation.Native.UpdateEditorSource.LostFocus OrElse e.UpdateSource = Validation.Native.UpdateEditorSource.ValueChanging))) Then - If FuerzaValidacion OrElse sender.GetType Is GetType(DateEdit) OrElse (sender.EditValue Is Nothing And e.Value IsNot Nothing) OrElse (sender.EditValue IsNot Nothing And e.Value Is Nothing) OrElse sender.GetType Is GetType(DevExpress.Xpf.Grid.LookUp.LookUpEdit) OrElse sender.EditValue <> e.Value Then + If ValidarControles AndAlso (Me IsNot Nothing AndAlso (Not (System.ComponentModel.DesignerProperties.GetIsInDesignMode(Me)) AndAlso (e.UpdateSource = Validation.Native.UpdateEditorSource.DoValidate OrElse e.UpdateSource = Validation.Native.UpdateEditorSource.LostFocus OrElse e.UpdateSource = Validation.Native.UpdateEditorSource.ValueChanging))) Then + If FuerzaValidacion OrElse sender.GetType Is GetType(DateEdit) OrElse (sender.EditValue Is Nothing AndAlso e.Value IsNot Nothing) OrElse (sender.EditValue IsNot Nothing AndAlso e.Value Is Nothing) OrElse sender.GetType Is GetType(DevExpress.Xpf.Grid.LookUp.LookUpEdit) OrElse sender.EditValue <> e.Value Then Dim ev As ErrorValidacion = Nothing Dim ValorCambiado As Object = Nothing @@ -1149,6 +1149,7 @@ Public MustInherit Class tsUserControl Else e.IsValid = True End If + If FuerzaValidacion Then RaiseEvent CampoActualizado(sender, Nothing) End If End If End If diff --git a/tsWPFCore.vbproj b/tsWPFCore.vbproj index 72ea3ad..fcfa8b7 100644 --- a/tsWPFCore.vbproj +++ b/tsWPFCore.vbproj @@ -15,12 +15,13 @@ tsWPFCore tsWPFCore net8.0-windows, libreria - 1.3.9 + 1.3.10 Manuel Tecnosis S.A Utilidades para aplicaciones WPF. - - 2026-19-01 V1.3.9 Se Corrige hint de previsualizar + - 2026-03-12 V1.3.10 Se lanza el evento campoactualizado si se ha lanzado con FuerzaValidarControl + - 2026-01-19 V1.3.9 Se Corrige hint de previsualizar - 2025-10-20 V1.3.8 Se añade botón de previsualizar - 2025-10-15 V1.3.7 Se añade dxwContrasenna - 2025-07-29 V1.3.6 Se habilita la propiedad AllowMergedGrouping="True" en tsTableView