ecSyntmemo.pas
TSyntaxMemo
  public
    property Dragging: boolean read FDragging write FDragging;
