From 89500ac955a4d0b557074208ab74dfebc070758f Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sun, 9 Jun 2013 13:56:51 +0000
Subject: [PATCH] IDE: conditionals syncompletion: fixed starting

git-svn-id: trunk@41634 -
---
 ide/frames/compiler_other_options.pas | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/ide/frames/compiler_other_options.pas b/ide/frames/compiler_other_options.pas
index f51ce9685d..6ecefb8744 100644
--- a/ide/frames/compiler_other_options.pas
+++ b/ide/frames/compiler_other_options.pas
@@ -162,6 +162,7 @@ begin
   if fSynCompletion.TheForm.Visible then
     fSynCompletion.Deactivate;
   fSynCompletion.RemoveEditor(CondSynEdit);
+  //fSynCompletion.Editor:=nil;
 end;
 
 procedure TCompilerOtherOptionsFrame.OnSynCompletionExecute(Sender: TObject);
@@ -373,9 +374,11 @@ begin
   end;
 
   // show completion box
-  fSynCompletion.AddEditor(CondSynEdit);
+  //fSynCompletion.AddEditor(CondSynEdit);
+  fSynCompletion.Editor:=CondSynEdit;
   Line:=CondSynEdit.LineText;
   fSynCompletion.Execute(copy(Line,LogStartX,LogEndX-LogStartX),XY.X,XY.Y);
+  debugln(['TCompilerOtherOptionsFrame.StartCompletion XY=',dbgs(XY),' fSynCompletion.TheForm.BoundsRect=',dbgs(fSynCompletion.TheForm.BoundsRect)]);
 end;
 
 procedure TCompilerOtherOptionsFrame.UpdateCompletionValues;
@@ -588,6 +591,7 @@ begin
   CondSynEdit.OnStatusChange:=@CondSynEditStatusChange;
 
   fSynCompletion:=TSynCompletion.Create(Self);
+  fSynCompletion.ShowSizeDrag:=true;
   fSynCompletion.TheForm.Parent:=Self;
   fSynCompletion.OnExecute:=@OnSynCompletionExecute;
   fSynCompletion.OnCancel:=@OnSynCompletionCancel;