Chat Problem behoben (Timer/Variable)
This commit is contained in:
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("3.9.7.9")>
|
||||
<Assembly: AssemblyFileVersion("3.9.7.9")>
|
||||
<Assembly: AssemblyVersion("3.9.8.1")>
|
||||
<Assembly: AssemblyFileVersion("3.9.8.1")>
|
||||
|
||||
@@ -4087,10 +4087,13 @@ Public Class frmHauptfenster
|
||||
' newNotify(frmNotify.cNotify_ART.NEUER_CHAT, 0, "XXX Chat-Nachricht!", -1) 'TEST
|
||||
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_ChatBenutzer And picAVISOMessenger.Visible Then
|
||||
VERAG_PROG_ALLGEMEIN.cMessenger.NEW_MESSGE = False 'NEUE NACHTICHTEN
|
||||
Dim newMsg = VERAG_PROG_ALLGEMEIN.cMessenger.GET_NewMSG_COUNT()
|
||||
Label20.Text = newMsg
|
||||
Label20.Text = newMsg.ToString
|
||||
Label20.Visible = (newMsg > 0)
|
||||
If newMsg Then
|
||||
VERAG_PROG_ALLGEMEIN.cMessenger.NEW_MESSGE = True 'NEUE NACHTICHTEN
|
||||
|
||||
If newMsg > 0 Then
|
||||
Me.Icon = My.Resources.avisoNewMsg
|
||||
|
||||
Dim isshown = False
|
||||
|
||||
Reference in New Issue
Block a user