Add AIKit component check for AI button visibility

Author: e-marchand

Project/Sources/Methods/UI_ManageAIbutton.4dm

@@ -14,7 +14,7 @@ Else
 End if 
 
 
-$visible:=(oForm.aiKey#"")
+$visible:=(oForm.aiKey#"") && (Bool:C1537(Storage:C1525.aiKey.componentExists))
 OBJECT SET VISIBLE:C603(*; "btnAI"; $visible)  // toolbar & sidebar
 
 OBJECT SET VISIBLE:C603(*; "Separator_AI"; $visible)  // sidebar

Project/Sources/Methods/WP SetAIKey.4dm

@@ -9,6 +9,12 @@ If ($key#"")
 	End use 
 End if 
 
+ARRAY TEXT:C222($components; 0x0000)
+COMPONENT LIST:C1001($components)
+Use ($aiKey)
+	$aiKey.componentExists:=(Find in array:C230($components; "4D AIKit")>0)
+End use 
+
 Use (Storage:C1525)
 	If ($key#"")
 		Storage:C1525.aiKey:=$aiKey