anchor.diff:              charW:= UTF8Decode(AText)[1];
   
             if not IsCharWord(charW, Ed.OptNonWordChars) then
  -            CancelAutocompleteAutoshow(Ed);
  +            CancelAutocompleteAutoshow;
           end;
         end;
     end; //case ACommand of
  
positive.code:     cCommand_TextDeleteWordNext,
      cCommand_TextDeleteWordPrev:
        begin
          CancelAutocompleteAutoshow(Ed);
        end;
  
      cCommand_ClipboardPaste,
  
negative.code:     procedure BinaryOnScroll(Sender: TObject);
      procedure BinaryOnProgress(const ACurrentPos, AMaximalPos: Int64;
        var AContinueSearching: Boolean);
      procedure CancelAutocompleteAutoshow;
      procedure DoDeactivatePictureMode;
      procedure DoDeactivateViewerMode;
      procedure DoFileOpen_Ex(Ed: TATSynEdit; const AFileName: string;
  