Asfinag, Mitarbeiter, UID-Prüfung, Rechnugssuche, Fiskalkunde, Kundenübersicht, div. Auswertungen für Asfinag

VERAG_PROG_ALLGEMEIN/cProgramFunktions.vb

@@ -541,7 +541,12 @@ Public Class cProgramFunctions
         Dim bounds As Rectangle
         Dim screenshot As System.Drawing.Bitmap
         Dim graph As Graphics
-        bounds = form.Bounds 'Screen.PrimaryScreen.Bounds
+
+        If form Is Nothing Then Return ""
+        bounds = form.Bounds
+
+
+        'Screen.PrimaryScreen.Bounds
 
         screenshot = New System.Drawing.Bitmap(bounds.Width, bounds.Height, System.Drawing.Imaging.PixelFormat.Format32bppArgb)
         graph = Graphics.FromImage(screenshot)