From 42b48ba23195b32cc088247480ef16cd196f78b1 Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Fri, 22 May 2015 15:42:31 +0200 Subject: [PATCH] auto dot completion, menu position --- src/ce_synmemo.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas index d7fbcf3c..b720e2de 100644 --- a/src/ce_synmemo.pas +++ b/src/ce_synmemo.pas @@ -667,7 +667,7 @@ begin end; function TCESynMemo.completionItemPaint(const AKey: string; ACanvas: TCanvas;X, Y: integer; - Selected: boolean; Index: integer): boolean; + Selected: boolean; Index: integer): boolean; var lft, rgt: string; len: Integer; @@ -688,7 +688,7 @@ begin if not fCanAutoDot then exit; if fAutoDotDelay = 0 then exit; fCanAutoDot := false; - fCompletion.Execute('', ClientToScreen(point(CaretXPix, top + CaretYPix))); + fCompletion.Execute('', ClientToScreen(point(CaretXPix, CaretYPix + Font.Size))); end; procedure TCESynMemo.setAutoDotDelay(aValue: Integer);