From 90af165b1733a5f16acfb461eae0fdff9f36fb11 Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Fri, 27 Apr 2018 10:50:56 +0200 Subject: [PATCH] still AV possible due to fix for #307 --- src/ce_synmemo.pas | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/ce_synmemo.pas b/src/ce_synmemo.pas index 5556bb1a..55b3716d 100644 --- a/src/ce_synmemo.pas +++ b/src/ce_synmemo.pas @@ -1137,8 +1137,9 @@ end; procedure TCESynMemo.handleModalBeginning(sender: TObject); begin // AV can happens in TCustomSynEdit.UpdateCursor - if assigned(FTextArea) then - cursor := crDefault; + if assigned(FTextArea) and + (cursor = crNone) and (eoAutoHideCursor in Options2) then + cursor := crDefault; end; procedure TCESynMemo.setFocus;