Don't mix up SynHighlighterSQL.TtkTokenKind enum types with System.TTypeKind

This commit is contained in:
Ansgar Becker
2019-12-15 12:02:22 +01:00
parent 8eba64ca5d
commit feeb1106a7

View File

@@ -6025,7 +6025,7 @@ begin
Editor := Proposal.Form.CurrentEditor;
Editor.GetHighlighterAttriAtRowColEx(Editor.PrevWordPos, Token, TokenTypeInt, Start, Attri);
CanExecute := AppSettings.ReadBool(asCompletionProposal) and
(not (TtkTokenKind(TokenTypeInt) in [tkString, tkComment]));
(not (TtkTokenKind(TokenTypeInt) in [SynHighlighterSQL.tkString, SynHighlighterSQL.tkComment]));
if not CanExecute then
Exit;