jj 04.11 adddefault image for constructor forms

app/DD-Record-Organiser/frmMain.vb

@@ -324,6 +324,8 @@ Public Class frmMain
                         Dim bimg() As Byte = row.Item("MENU_IMG")
                         Dim bitmap As Bitmap = ByteArrayToBitmap(bimg)
                         image2 = bitmap
+                    Else
+                        image2 = My.Resources.changechartlegendalignment_32x32
                     End If
                     Dim title = row.Item("FORM_TITLE")
                     If title = "CAPTION (OBJ) NOT TRANSLATED" Then
@@ -348,6 +350,7 @@ Public Class frmMain
                     AddHandler item.ItemClick, AddressOf ToolbarButtonItemClick
                     groupQuickAccessForm.ItemLinks.Add(item)
 
+                    image2 = Nothing
                 Next
 
             End If