Issue #2483: fix one of several issues with High Entropy VA in SynEdit

Author: ansgarbecker

components/synedit/Source/SynCompletionProposal.pas

@@ -2722,9 +2722,14 @@ function TSynBaseCompletionProposal.GetDefaultKind: SynCompletionType;
 
 procedure TSynBaseCompletionProposal.SetDefaultKind(const Value: SynCompletionType);
 begin
-  Form.DefaultType := Value;
-  Form.DisplayType := Value;
-  Form.RecreateWnd;
+  if Form.DefaultType <> Value then begin
+    Form.DefaultType := Value;
+    Form.DisplayType := Value;
+    if Form.HandleAllocated then
+      Form.RecreateWnd;
+  end
+  else
+    Form.DisplayType := Value;
 end;
 
 procedure TSynBaseCompletionProposal.SetEndOfTokenChar(