If My.Settings.Objekt_BalloontipAusZwischenablage = 1 Or ( _
          My.Settings.Objekt_BalloontipAusZwischenablage = 2 And _
          My.Settings.Ordner_NeueObjekteSpeichernIn <> 0 And _
          My.Settings.Objekte_NeueObjekte <> 2) Then
            Notify1.Visible = True
            Notify1.BalloonTipText = Application.ProductName
            Notify1.BalloonTipTitle = Nachricht
            Notify1.ShowBalloonTip( _
              My.Settings.Einstellungen_Sicherheitsfragen_Balloontip_Anzeigedau_
              er * 1000)
            Notify1.Visible = False
        End If