TaskFlow: Version 2.4.2.2

Merge
TaskFlow: Version 2.4.3.0
2023-04-24 15:26:28 +02:00 · 2023-04-24 15:25:41 +02:00 · 2023-04-24 15:22:50 +02:00 · 2023-04-24 15:22:06 +02:00
3 changed files with 10 additions and 6 deletions
--- a/Project/AssemblyInfo.vb
+++ b/Project/AssemblyInfo.vb
@@ -9,11 +9,11 @@ Imports System.Runtime.InteropServices
 ' Die Werte der Assemblyattribute überprüfen

 <Assembly: AssemblyTitle("TaskFlow")>
-<Assembly: AssemblyDescription("")> 
+<Assembly: AssemblyDescription("")>
 <Assembly: AssemblyCompany("Digital Data")>
 <Assembly: AssemblyProduct("TaskFlow")>
 <Assembly: AssemblyCopyright("Copyright © Digital Data 2023")>
-<Assembly: AssemblyTrademark("2.4.2.0")>
+<Assembly: AssemblyTrademark("2.4.2.2")>

 <Assembly: ComVisible(False)>

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 

-<Assembly: AssemblyVersion("2.4.2.1")>
-<Assembly: AssemblyFileVersion("1.0.0.0")> 
+<Assembly: AssemblyVersion("2.4.2.2")>
+<Assembly: AssemblyFileVersion("1.0.0.0")>
--- a/app/TaskFlow/TaskFlow.vbproj
+++ b/app/TaskFlow/TaskFlow.vbproj
@@ -701,7 +701,9 @@
      <SubType>Designer</SubType>
      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
    </EmbeddedResource>
-    <EmbeddedResource Include="Translations\frmMain_Strings.en.resx" />
+    <EmbeddedResource Include="Translations\frmMain_Strings.en.resx">
+      <SubType>Designer</SubType>
+    </EmbeddedResource>
    <EmbeddedResource Include="Translations\frmMain_Strings.fr.resx">
      <SubType>Designer</SubType>
    </EmbeddedResource>
--- a/app/TaskFlow/frmMain.vb
+++ b/app/TaskFlow/frmMain.vb
@@ -1578,7 +1578,9 @@ Public Class frmMain
                ' -----------------------------

                If oIds.Count = 0 Then
-                    MsgBox("System konnte die Profilworkflows nicht auswerten!" & vbNewLine & "Bitte wählen Sie ein Profil durch Klicken auf einen Beleg oder eine Überschrift!", MsgBoxStyle.Information, ADDITIONAL_TITLE)
+                    Dim omsg = String.Format(S.System_konnte_die_Profilworkflows_nicht_auswerten_, vbNewLine)
+                    FormHelper.ShowInfoMessage(omsg, omsgTitleAttention)
+                    'MsgBox("System konnte die Profilworkflows nicht auswerten!" & vbNewLine & "Bitte wählen Sie ein Profil durch Klicken auf einen Beleg oder eine Überschrift!", MsgBoxStyle.Information, ADDITIONAL_TITLE)
                    Exit Sub
                End If
                Dim oDelete = $"DELETE FROM TBPM_VALIDATION_PROFILE_GROUP_USER WHERE UserID = {USER_ID}"
Author	SHA1	Message	Date
MPitz	c47c011f27	TaskFlow: Version 2.4.2.2	2023-04-24 15:26:28 +02:00
MPitz	f37b4188c2	Merge	2023-04-24 15:25:41 +02:00
MPitz	725829ee94	TaskFlow: Version 2.4.3.0	2023-04-24 15:22:50 +02:00
MPitz	eb668a7304	MsgBox with German Text replaced with ShowInfoMessage, which used the Resource-Strings	2023-04-24 15:22:06 +02:00