barber window type

Build/Components/4DPop AppMaker.4dbase/Info.plist

@@ -6,15 +6,15 @@
     <key>NSHumanReadableCopyright</key>
     <string>©vdl 2009-2024</string>
     <key>CFBundleVersion</key>
-    <string>590</string>
+    <string>591</string>
     <key>CFBundleDisplayName</key>
     <string>4DPop AppMaker</string>
     <key>CFBundleShortVersionString</key>
     <string>20R6</string>
     <key>CFBundleGetInfoString</key>
     <string>20R6</string>
     <key>CFBundleLongVersionString</key>
-    <string>20R6 (589)</string>
+    <string>20R6 (590)</string>
     <key>CFBundleName</key>
     <string>4DPop AppMaker</string>
   </dict>

Info.plist

@@ -6,15 +6,15 @@
     <key>NSHumanReadableCopyright</key>
     <string>©vdl 2009-2024</string>
     <key>CFBundleVersion</key>
-    <string>590</string>
+    <string>591</string>
     <key>CFBundleDisplayName</key>
     <string>4DPop AppMaker</string>
     <key>CFBundleShortVersionString</key>
     <string>20R6</string>
     <key>CFBundleGetInfoString</key>
     <string>20R6</string>
     <key>CFBundleLongVersionString</key>
-    <string>20R6 (589)</string>
+    <string>20R6 (590)</string>
     <key>CFBundleName</key>
     <string>4DPop AppMaker</string>
   </dict>

Project/Sources/Forms/Barber/ObjectMethods/Button.4dm

@@ -0,0 +1 @@
+DRAG WINDOW:C452

Project/Sources/Forms/Barber/form.4DForm

@@ -10,7 +10,6 @@
 	"markerFooter": 120,
 	"events": [
 		"onLoad",
-		"onCloseBox",
 		"onTimer"
 	],
 	"method": "method.4dm",
@@ -99,6 +98,19 @@
 					"fontFamily": "Lucida Grande",
 					"fontSize": 13,
 					"visibility": "hidden"
+				},
+				"Button": {
+					"type": "button",
+					"text": "Button",
+					"top": 0,
+					"left": 0,
+					"width": 400,
+					"height": 120,
+					"events": [
+						"onClick"
+					],
+					"display": false,
+					"method": "ObjectMethods/Button.4dm"
 				}
 			}
 		}
@@ -107,7 +119,7 @@
 		"version": "1",
 		"kind": "form"
 	},
-	"geometryStamp": 16,
+	"geometryStamp": 22,
 	"editor": {
 		"activeView": "View 1",
 		"defaultView": "View 1",

Project/Sources/Forms/Barber/method.4dm

@@ -56,18 +56,13 @@ Case of
 		End use 
 
 		//______________________________________________________
-	: (Form event code:C388=On Close Box:K2:21)
-
-		If (Macintosh option down:C545 | Windows Alt down:C563)  // Force close
-
-			SET TIMER:C645(0)
-			CANCEL:C270
-
-		Else 
-
-			REJECT:C38
-
-		End if 
+		//: (Form event code=On Close Box)
+		//If (Macintosh option down | Windows Alt down)  // Force close
+		//SET TIMER(0)
+		//CANCEL
+		//Else 
+		//REJECT
+		//End if 
 
 		//______________________________________________________
 End case 

Project/Sources/Methods/_barber.4dm

@@ -1,5 +1,5 @@
 //%attributes = {"preemptive":"incapable"}
 var $winRef : Integer
 
-$winRef:=Open form window:C675("Barber"; Controller form window:K39:17+Form has no menu bar:K39:18; Horizontally centered:K39:1; At the top:K39:5)
-DIALOG:C40("Barber")
+$winRef:=Open form window:C675("Barber"; Controller form window:K39:17+0x00080000+Form has no menu bar:K39:18; Horizontally centered:K39:1; At the top:K39:5; *)
+DIALOG:C40("Barber")

Project/Sources/dependencies.json

@@ -1,21 +1,39 @@
 {
   "dependencies": {
-    "4DPop": {},
-    "4DPop AppMaker": {},
+    "4DPop": {
+      "github": "vdelachaux/4DPop",
+      "tag": "20.6.3"
+    },
+    "4DPop AppMaker": {
+      "github": "vdelachaux/4DPop-AppMaker",
+      "tag": "20.6.0"
+    },
+    "4DPop Git": {
+      "github": "vdelachaux/4DPop-Git",
+      "tag": "20.6.0"
+    },
+    "4DPop Macros": {
+      "github": "vdelachaux/4DPop-Macros",
+      "tag": "20.6.2"
+    },
+    "4DPop QuickOpen": {
+      "github": "vdelachaux/4DPop-QuickOpen",
+      "tag": "20.6.0"
+    },
+    "4DPop XLIFF Pro": {
+      "github": "vdelachaux/4DPop-XLIFF-Pro",
+      "tag": "20.6.0"
+    },
     "4DPop Bookmarks": {},
     "4DPop Clipboard": {},
     "4DPop ColorChart": {},
     "4DPop Commands": {},
     "4DPop Constants Editor": {},
-    "4DPop Git": {},
     "4DPop Image Buddy": {},
     "4DPop KeepIt": {},
-    "4DPop Macros": {},
     "4DPop Pasteboard": {},
-    "4DPop QuickOpen": {},
     "4DPop Rulers": {},
     "4DPop sqlSchemas": {},
-    "4DPop Window": {},
-    "4DPop XLIFF Pro": {}
+    "4DPop Window": {}
   }
 }