still AV possible due to fix for #307

This commit is contained in:
Basile Burg 2018-04-27 10:50:56 +02:00
parent 8f0c4a52ad
commit 90af165b17
1 changed files with 3 additions and 2 deletions

View File

@ -1137,7 +1137,8 @@ end;
procedure TCESynMemo.handleModalBeginning(sender: TObject);
begin
// AV can happens in TCustomSynEdit.UpdateCursor
if assigned(FTextArea) then
if assigned(FTextArea) and
(cursor = crNone) and (eoAutoHideCursor in Options2) then
cursor := crDefault;
end;