Generate a timer event for widgets when the strip is displayed

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

@@ -4,17 +4,17 @@
 
   <dict>
     <key>NSHumanReadableCopyright</key>
-    <string>©vdl 2007-2024</string>
+    <string>©vdl 2007-2025</string>
     <key>CFBundleVersion</key>
-    <string>273</string>
+    <string>274</string>
     <key>CFBundleDisplayName</key>
     <string>4DPop</string>
     <key>CFBundleShortVersionString</key>
-    <string>20R8</string>
+    <string>20R9</string>
     <key>CFBundleGetInfoString</key>
-    <string>20R8</string>
+    <string>20R9</string>
     <key>CFBundleLongVersionString</key>
-    <string>20R8 (272)</string>
+    <string>20R9 (273)</string>
     <key>CFBundleName</key>
     <string>4DPop</string>
   </dict>

Build/Components/4DPop.4dbase/Contents/_CodeSignature/CodeResources

@@ -94,7 +94,7 @@
 		</data>
 		<key>Resources/InfoPlist.strings</key>
 		<data>
-		D1PhZll2+wkYfXXw3APuU2V4Kys=
+		rl3ZXezcvcIjUDJkM1mzWpnGFXE=
 		</data>
 		<key>Resources/Skins/4D/Background.png</key>
 		<data>
@@ -361,7 +361,7 @@
 		<dict>
 			<key>cdhash</key>
 			<data>
-			dkYLgwINn8Gsq/30afDTOAKW5xY=
+			mKvGM+wLKgUMm8x0ccPQIdYtaMM=
 			</data>
 			<key>requirement</key>
 			<string>identifier "4DPop.4DZ" and anchor apple generic and certificate 1[field.1.2.840.113635.100.6.2.6] /* exists */ and certificate leaf[field.1.2.840.113635.100.6.1.13] /* exists */ and certificate leaf[subject.OU] = DYRKW64QA9</string>
@@ -370,11 +370,11 @@
 		<dict>
 			<key>hash</key>
 			<data>
-			Ia3zvwh85YEzcKm0qj5Us0f8d5c=
+			W895rQBA4nrJkOVjCWIA8QAqJdc=
 			</data>
 			<key>hash2</key>
 			<data>
-			zt9JmwbaBlvWT4i+eTupyu33vsI02rVIBIVBO0jn4bo=
+			/C9uxOCEkogIZVN1QYyoJ6hhH7PCb1rz0UCqjGBXM1o=
 			</data>
 		</dict>
 		<key>Resources/4DPop constants.xlf</key>
@@ -623,11 +623,11 @@
 		<dict>
 			<key>hash</key>
 			<data>
-			D1PhZll2+wkYfXXw3APuU2V4Kys=
+			rl3ZXezcvcIjUDJkM1mzWpnGFXE=
 			</data>
 			<key>hash2</key>
 			<data>
-			oIOqagVoWz1aGqYxtIOKKmop3/FGtmTkjkMg4wGPIWk=
+			To/deODV4n2kwgS3rXsCjUAKrGIGUuBmZqBI3I9Efp4=
 			</data>
 		</dict>
 		<key>Resources/Skins/4D/Background.png</key>

Info.plist

@@ -4,17 +4,17 @@
 
   <dict>
     <key>NSHumanReadableCopyright</key>
-    <string>©vdl 2007-2024</string>
+    <string>©vdl 2007-2025</string>
     <key>CFBundleVersion</key>
-    <string>273</string>
+    <string>274</string>
     <key>CFBundleDisplayName</key>
     <string>4DPop</string>
     <key>CFBundleShortVersionString</key>
-    <string>20R8</string>
+    <string>20R9</string>
     <key>CFBundleGetInfoString</key>
-    <string>20R8</string>
+    <string>20R9</string>
     <key>CFBundleLongVersionString</key>
-    <string>20R8 (272)</string>
+    <string>20R9 (273)</string>
     <key>CFBundleName</key>
     <string>4DPop</string>
   </dict>

Project/4DPop.4DProject

@@ -1,5 +1,5 @@
 {
 	"$comment": "The project file let you override the location for most folders",
 	"compatibilityVersion": 2000,
-	"$4DPopAppMakerToolVersion": "20R8"
+	"$4DPopAppMakerToolVersion": "20R9"
 }

Project/Sources/Methods/_STRIP_Controller.4dm

@@ -139,7 +139,7 @@ Control whether the pallet should be visible or not
 depending on the origin of the most upstream process
 */
 
-			PROCESS PROPERTIES:C336(Window process:C446(Frontmost window:C447); $t; $l; $l; $visible; $l; $origin)
+			_O_PROCESS PROPERTIES:C336(Window process:C446(Frontmost window:C447); $t; $l; $l; $visible; $l; $origin)
 
 			If ($origin=Design process:K36:9)
 
@@ -148,6 +148,13 @@ depending on the origin of the most upstream process
 					Form:C1466.hidden:=False:C215
 					SHOW PROCESS:C325(Form:C1466.process)
 
+					// Generate an update event for widgets
+					For each ($widget; Form:C1466.widgets.query("form != null"))
+
+						EXECUTE METHOD IN SUBFORM:C1085($widget.tool; Formula:C1597(SET TIMER:C645(-1)))
+
+					End for each 
+
 				End if 
 
 				If (Form:C1466.mdi)
@@ -203,7 +210,7 @@ depending on the origin of the most upstream process
 
 				// MARK: ▶︎ User resizes the window
 				SET CURSOR:C469(9010)
-				GET MOUSE:C468($x; $y; $mouseButton; *)
+				MOUSE POSITION:C468($x; $y; $mouseButton; *)
 				GET WINDOW RECT:C443($left; $top; $right; $bottom; Form:C1466.window)
 
 				$coord:=cs:C1710.coord.new($left; $top; $right; $bottom)
@@ -323,7 +330,7 @@ depending on the origin of the most upstream process
 				// MARK: ▶︎ Automatic collapse/expand
 				// #12-12-2013 GET WINDOW RECT returns bad coordinates, for this particular window, on Windows only.
 				// This causes a flickering effect.
-				GET MOUSE:C468($x; $y; $mouseButton)
+				MOUSE POSITION:C468($x; $y; $mouseButton)
 				OBJECT GET SUBFORM CONTAINER SIZE:C1148($width; $height)
 
 				If ($x>=0) && ($x<=$width)\