Comunes/tsWPFCore
10
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2026-03-12 V1.3.10 Se lanza el evento campoactualizado si se ha lanzado con FuerzaValidarControl

Browse Source
This commit is contained in:
Manuel Moguer
2026-03-12 12:40:23 +01:00
parent 4b37dda13c
commit 93a2a4936e
2 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
tsUserControl.vb
View File

@@ -1120,8 +1120,8 @@ Public MustInherit Class tsUserControl
Private Sub _ValidarControl(sender As Object, e As ValidationEventArgs) Private Sub _ValidarControl(sender As Object, e As ValidationEventArgs)
Try 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 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 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 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 ev As ErrorValidacion = Nothing
Dim ValorCambiado As Object = Nothing Dim ValorCambiado As Object = Nothing
@@ -1149,6 +1149,7 @@ Public MustInherit Class tsUserControl
Else Else
e.IsValid = True e.IsValid = True
End If End If
If FuerzaValidacion Then RaiseEvent CampoActualizado(sender, Nothing)
End If End If
End If End If
End If End If

5
tsWPFCore.vbproj
View File

@@ -15,12 +15,13 @@
<RootNamespace>tsWPFCore</RootNamespace> <RootNamespace>tsWPFCore</RootNamespace>
<PackageId>tsWPFCore</PackageId> <PackageId>tsWPFCore</PackageId>
<PackageTags>net8.0-windows, libreria</PackageTags> <PackageTags>net8.0-windows, libreria</PackageTags>
<Version>1.3.9</Version> <Version>1.3.10</Version>
<Authors>Manuel</Authors> <Authors>Manuel</Authors>
<Company>Tecnosis S.A</Company> <Company>Tecnosis S.A</Company>
<Description>Utilidades para aplicaciones WPF.</Description> <Description>Utilidades para aplicaciones WPF.</Description>
<PackageReleaseNotes> <PackageReleaseNotes>
- 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-20 V1.3.8 Se añade botón de previsualizar
- 2025-10-15 V1.3.7 Se añade dxwContrasenna - 2025-10-15 V1.3.7 Se añade dxwContrasenna
- 2025-07-29 V1.3.6 Se habilita la propiedad AllowMergedGrouping="True" en tsTableView - 2025-07-29 V1.3.6 Se habilita la propiedad AllowMergedGrouping="True" en tsTableView