more work on gtk & code cleanup

Pilz.Drawing/HelpfulDrawingFunctions.vb

@@ -3,12 +3,12 @@
 Public Module HelpfulDrawingFunctions
 
     Public Function IsPointInRectangle(p As PointF, rect As RectangleF) As Boolean
-        Dim bList As New List(Of Boolean)
-
-        bList.Add(p.X > rect.Left)
-        bList.Add(p.X < rect.Right)
-        bList.Add(p.Y > rect.Top)
-        bList.Add(p.Y < rect.Bottom)
+        Dim bList As New List(Of Boolean) From {
+            p.X > rect.Left,
+            p.X < rect.Right,
+            p.Y > rect.Top,
+            p.Y < rect.Bottom
+        }
 
         Return Not bList.Contains(False)
     End Function