neu

Aviso/Anhänge/frmSendungAnhangImport.vb

@@ -1404,7 +1404,7 @@ Public Class frmSendungAnhangImport
     Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click
         Dim frmGrayOut = VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.grayoutForm()
         Dim sv As New frmAddSendungsvermerkShort(AvisoId, SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID) ', dgvSendungen.SelectedRows(0).Cells("tblSnd_SendungID").Value)
-        sv.Location = Me.PointToClient(System.Windows.Forms.Cursor.Position)
+        sv.Location = Me.PointToClient(Cursor.Position)
         sv.ShowDialog(frmGrayOut)
         frmGrayOut.Close()
         sv.Close()