minor add-in optimizations (#34)

Author: josef-poetzl

access-add-in/AccUnitLoader.accda

@@ -19,8 +19,8 @@ Begin Form
     ItemSuffix =209
     Left =3855
     Top =3030
-    Right =14430
-    Bottom =13815
+    Right =17078
+    Bottom =13695
     RecSrcDt = Begin
         0x212b6fd80e9ce340
     End
@@ -268,13 +268,16 @@ Begin Form
                 Begin TextBox
                     OverlapFlags =85
                     TextAlign =1
+                    TextFontFamily =49
                     IMESentenceMode =3
                     Left =2318
                     Top =1868
                     Width =9072
                     Height =2835
+                    FontSize =10
                     TabIndex =5
                     Name ="txtTestMethodTemplate"
+                    FontName ="Consolas"
                     GroupTable =2
                     BottomPadding =0
                     HorizontalAnchor =2

access-add-in/AccUnitLoader.accda.src/forms/AccUnitUserSettings.bas

@@ -0,0 +1,7 @@
+<?xml version="1.0"?>
+<dataroot xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
+  <tab1DS>
+    <id>1</id>
+    <ShowInfoForm>0</ShowInfoForm>
+  </tab1DS>
+</dataroot>

access-add-in/AccUnitLoader.accda.src/tables/USys_AppFiles.xml

@@ -9,7 +9,7 @@
     "UseFastSave": true,
     "UseMergeBuild": false,
     "UseGitIntegration": false,
-    "SavePrintVars": true,
+    "SavePrintVars": false,
     "ExportPrintSettings": {
       "Orientation": true,
       "PaperSize": true,
@@ -42,6 +42,15 @@
     "SanitizeLevel": 2,
     "ExtractThemeFiles": false,
     "TablesToExportData": {
+      "ACLib_ConfigTable": {
+        "Format": "XML Format"
+      },
+      "tab1DS": {
+        "Format": "XML Format"
+      },
+      "USys_AppFiles": {
+        "Format": "XML Format"
+      },
       "USysRegInfo": {
         "Format": "Tab Delimited"
       },

access-add-in/AccUnitLoader.accda.src/tables/tab1DS.xml

@@ -13,7 +13,7 @@
 				size="normal" imageMso="VisualBasicReferences" 
 				onAction="RemoveAccUnitTlbReferenceRCB" /> 
 		 </group> 
-		 <group id="AccUnitTestsGrp" label="AccUnit Test Environment">
+		 <group id="AccUnitTestEnvironmentGrp" label="AccUnit Test Environment">
 		   <button id="AccUnitLoaderInsertFactoryBtn" label="Insert/Update AccUnit Factory" 
 				size="large" imageMso="CreateModule" 
 				onAction="InsertFactoryModuleRCB" /> 
@@ -26,6 +26,8 @@
 		   <button id="AccUnitLoaderRemoveEnvironment1Btn" label="Remove Test Environment" 
 				size="large" imageMso="Delete" 
 				onAction="RemoveTestEnvironmentDelTestsRCB" /> 
+		 </group> 
+		 <group id="AccUnitTestsGrp" label="Test">
 		   <button id="TestSuiteRunAllFromVBProjectBtn" label="Run All Tests" 
 				size="large" imageMso="SourceControlRun" 
 				onAction="TestSuiteRunAllFromVBProjectRCB" /> 

access-add-in/AccUnitLoader.accda.src/tbldefs/ACLib_ConfigTable.json

@@ -132,24 +132,20 @@ On Error GoTo HandleErr
    With mnu
       Set .AccessForm = Me
       .UserFormCaption = Me.Caption
-      
       Set .MenuControl = Me.cmdOpenMenu
-      
-     ' .ControlSection = acDetail
 
 #If DEVMODE = 1 Then
-      .AddMenuItem -99, "", MF_SEPARATOR
       .AddMenuItem -1, "For AccUnit developers:", MF_STRING + MF_GRAYED
       .AddMenuItem 11, "Import AccUnit files from directory"
+      .AddMenuItem -2, "", MF_SEPARATOR
 #End If
 
 If ThisWorkbook.CustomDocumentProperties.Count >= 5 Then
-      .AddMenuItem -2, "", MF_SEPARATOR
       .AddMenuItem 21, "Export AccUnit files to directory"
       .AddMenuItem 22, "Remove AccUnit files from Add-In file"
+      .AddMenuItem -3, "", MF_SEPARATOR
 End If
 
-      .AddMenuItem -3, "", MF_SEPARATOR
       .AddMenuItem 31, "Remove test environment incl. test classes"
       .AddMenuItem 32, "Remove test environment (keep test classes)"
 
@@ -294,7 +290,7 @@ End Sub
 
 
 Private Sub cmdUserSettings_Click()
-'   DoCmd.OpenForm "AccUnitUserSettings", acNormal, , , , acDialog
+   AccUnitUserSettings.Show 1
 End Sub
 
 Private Sub txtAccUnitDllPath_AfterUpdate()