Workaroud the mouse bug in automatic completion inner webbrowser.

[DEVELOPMENT ENVIRONMENT]
* BUG: Automatic completion: Enable the inner web browser later, to workaround a QtWebKit bug that triggers spurious mouse events.
* BUG: ImageEditor: The color palette is correctly updated when a color is selected in the property panel.

app/src/gambas3/.src/Editor/Code/FCompletion.class

@@ -33,6 +33,7 @@ Private $bHideLater As Boolean
 Private $cFindStrings As Collection
 Static Private $sWordSeparators As String
 Private $bStatic As Boolean
+Private $fOpenTime As Float
 
 Static Public Sub _init()
 
@@ -179,6 +180,8 @@ Public Sub Open(hForm As Object, sMode As String, Optional sClass As String, Opt
   
   If $bShowHelp Then
     sepHelp.Show
+    webHelp.Enabled = False
+    timEnable.Start
     webHelp.Show
     panResizeTop.Show
     panResizeBottom.Show
@@ -1144,3 +1147,10 @@ Public Sub panComp_Arrange()
   panResizeBottom.Raise
 
 End
+
+Public Sub timEnable_Timer()
+
+  webHelp.Enabled = True
+  timEnable.Stop
+
+End

app/src/gambas3/.src/Editor/Code/FCompletion.form

@@ -28,16 +28,16 @@
       Expand = True
       NoHeader = True
     }
-    { panResizeBottom Panel
-      MoveScaled(64,12,2,2)
-      Mouse = Mouse.SizeNWSE
-      Ignore = True
-    }
     { panResizeTop Panel
       MoveScaled(64,1,2,2)
       Mouse = Mouse.SizeNESW
       Ignore = True
     }
+    { panResizeBottom Panel
+      MoveScaled(64,12,2,2)
+      Mouse = Mouse.SizeNWSE
+      Ignore = True
+    }
     { timHideLater #Timer
       #MoveScaled(0,8)
     }
@@ -45,5 +45,9 @@
       #MoveScaled(24,4)
       Delay = 100
     }
+    { timEnable #Timer
+      #MoveScaled(48,6)
+      Delay = 100
+    }
   }
 }

app/src/gambas3/.src/Editor/Image/FImageProperty.class

@@ -1503,3 +1503,9 @@ Public Sub chkGridDiag_Click()
   Try GetCurrent().UpdateGrid
 
 End
+
+Public Sub cchColor_Change()
+
+  palColor.Current = cchColor.Value
+
+End

app/src/gambas3/.src/Options/FOption.form

@@ -245,31 +245,31 @@
       Font = Font["Bold"]
       Text = ("Interface")
     }
-    { HBox8 HBox
+    { HBox3 HBox
       MoveScaled(1,5,66,4)
       Spacing = True
       Indent = True
-      { Label2 Label
+      { Label10 Label
         MoveScaled(0,0,42,4)
         Expand = True
-        Text = ("Sort properties")
+        Text = ("Show tooltips")
       }
-      { btnSortProperty SwitchButton
-        MoveScaled(51,0,8,4)
+      { btnTooltip SwitchButton
+        MoveScaled(43,0,8,4)
         Animated = True
       }
     }
-    { HBox21 HBox
+    { HBox58 HBox
       MoveScaled(1,10,66,4)
       Spacing = True
       Indent = True
-      { Label21 Label
+      { Label57 Label
         MoveScaled(0,0,42,4)
         Expand = True
-        Text = ("Minimize at runtime")
+        Text = ("Show animations")
       }
-      { btnMinimize SwitchButton
-        MoveScaled(51,0,8,4)
+      { btnAnimation SwitchButton
+        MoveScaled(43,0,8,4)
         Animated = True
       }
     }
@@ -287,10 +287,38 @@
         Animated = True
       }
     }
-    { HBox44 HBox
+    { HBox8 HBox
       MoveScaled(1,20,66,4)
       Spacing = True
       Indent = True
+      { Label2 Label
+        MoveScaled(0,0,42,4)
+        Expand = True
+        Text = ("Sort properties")
+      }
+      { btnSortProperty SwitchButton
+        MoveScaled(51,0,8,4)
+        Animated = True
+      }
+    }
+    { HBox21 HBox
+      MoveScaled(1,25,66,4)
+      Spacing = True
+      Indent = True
+      { Label21 Label
+        MoveScaled(0,0,42,4)
+        Expand = True
+        Text = ("Minimize at runtime")
+      }
+      { btnMinimize SwitchButton
+        MoveScaled(51,0,8,4)
+        Animated = True
+      }
+    }
+    { HBox44 HBox
+      MoveScaled(1,30,66,4)
+      Spacing = True
+      Indent = True
       { Label53 Label
         MoveScaled(0,0,42,4)
         Expand = True
@@ -301,34 +329,6 @@
         Animated = True
       }
     }
-    { HBox3 HBox
-      MoveScaled(1,25,66,4)
-      Spacing = True
-      Indent = True
-      { Label10 Label
-        MoveScaled(0,0,42,4)
-        Expand = True
-        Text = ("Show tooltips")
-      }
-      { btnTooltip SwitchButton
-        MoveScaled(43,0,8,4)
-        Animated = True
-      }
-    }
-    { HBox58 HBox
-      MoveScaled(1,30,66,4)
-      Spacing = True
-      Indent = True
-      { Label57 Label
-        MoveScaled(0,0,42,4)
-        Expand = True
-        Text = ("Show animations")
-      }
-      { btnAnimation SwitchButton
-        MoveScaled(43,0,8,4)
-        Animated = True
-      }
-    }
     { HBox48 HBox
       MoveScaled(1,35,66,4)
       Spacing = True