support last alexandria
the last version of alexandria maybe is not supported i don'see any menu
+1
{$IF CompilerVersion >= 35.00} sEVFillRect = '@Editorcontrol@TCustomEditControl@EVFillRect$qqrrx18System@Types@TRectx69System@%DelphiInterface$42Toolsapi@Editor@INTACodeEditorPaintContext%'; {$ELSE} sEVFillRect = '@Editorcontrol@TCustomEditControl@EVFillRect$qqrrx18System@Types@TRect'; {$ENDIF}
...
{$IF CompilerVersion >= 35.00} if not IsValidCodes(TCustomEditControl_EVScrollRect, EVScrollRectCodes) or (EditControlList = nil) then {$ELSE} if not IsValidCodes(TCustomEditControl_EVFillRect, EVFillRectCodes) or not IsValidCodes(TCustomEditControl_EVScrollRect, EVScrollRectCodes) or (EditControlList = nil) then {$ENDIF} begin TCustomEditControl_EVFillRect := nil; TCustomEditControl_EVScrollRect := nil; EditControlList := nil; Exit; end;