Как реализовать регионы/коллапс кода в javascript

Ответ 1

Запись в блоге здесь объясняет это и этот

Option Strict Off
Option Explicit Off

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports System.Diagnostics
Imports System.Collections

Public Module JsMacros

    Sub OutlineRegions()
        Dim selection As EnvDTE.TextSelection = DTE.ActiveDocument.Selection

        Const REGION_START As String = "//#region"
        Const REGION_END As String = "//#endregion"

        selection.SelectAll()
        Dim text As String = selection.Text
        selection.StartOfDocument(True)

        Dim startIndex As Integer
        Dim endIndex As Integer
        Dim lastIndex As Integer = 0
        Dim startRegions As Stack = New Stack()

        Do
            startIndex = text.IndexOf(REGION_START, lastIndex)
            endIndex = text.IndexOf(REGION_END, lastIndex)

            If startIndex = -1 AndAlso endIndex = -1 Then
                Exit Do
            End If

            If startIndex <> -1 AndAlso startIndex < endIndex Then
                startRegions.Push(startIndex)
                lastIndex = startIndex + 1
            Else
                ' Outline region ...
                selection.MoveToLineAndOffset(CalcLineNumber(text, CInt(startRegions.Pop())), 1)
                selection.MoveToLineAndOffset(CalcLineNumber(text, endIndex) + 1, 1, True)
                selection.OutlineSection()

                lastIndex = endIndex + 1
            End If
        Loop

        selection.StartOfDocument()
    End Sub

    Private Function CalcLineNumber(ByVal text As String, ByVal index As Integer)
        Dim lineNumber As Integer = 1
        Dim i As Integer = 0

        While i < index
            If text.Chars(i) = vbCr Then
                lineNumber += 1
                i += 1
            End If

            i += 1
        End While

        Return lineNumber
    End Function

End Module

Ответ 2

В Microsoft теперь есть расширение для VS 2010, которое предоставляет следующие функции:

Расширения редактора JScript

Ответ 3

Для тех, кто собирается использовать visual studio 2012, существует Web Essentials 2012

Для тех, кто собирается использовать визуальную студию 2015, существует Web Essentials 2015.3

Использование точно так же, как @prasad спросил

Ответ 4

Хорошие новости для разработчиков, работающих с последней версией visual studio

Web Essentials приходят с этой функцией.

Проверьте это

Ответ 5

Отметив раздел кода (независимо от любых логических блоков) и нажав CTRL + M + H, вы определяете выделение как область, которая является разборной и расширяемой.

Ответ 6

Это легко!

Отметьте раздел, который вы хотите свернуть, и

CTRL + М + Н

И для расширения используйте знак "+" слева.

Ответ 7

Плагин JSEnhancements для Visual Studio обращается к этому красиво.

Ответ 8

Благодаря 0A0D за отличный ответ. Мне повезло с этим. Дарин Димитров также дает хороший аргумент в отношении ограничения сложности ваших JS файлов. Тем не менее, я нахожу случаи, когда свертывающие функции к их определениям значительно упрощают просмотр через файл.

Что касается #region в целом, этот SO-вопрос достаточно хорошо описывает его.

Я сделал несколько изменений в Macro для поддержки более сложного коллапса кода. Этот метод позволяет поместить описание после ключевого слова // # region ala С# и отобразить его в коде, как показано:

Пример кода:

//#region InputHandler
var InputHandler = {
    inputMode: 'simple', //simple or advanced

    //#region filterKeys
    filterKeys: function(e) {
        var doSomething = true;
        if (doSomething) {
            alert('something');
        }
    },
    //#endregion filterKeys

    //#region handleInput
    handleInput: function(input, specialKeys) {
        //blah blah blah
    }
    //#endregion handleInput

};
//#endregion InputHandler

Обновлен макрос:

Option Explicit On
Option Strict On

Imports System
Imports EnvDTE
Imports EnvDTE80
Imports EnvDTE90
Imports System.Diagnostics
Imports System.Collections.Generic

Public Module JsMacros


    Sub OutlineRegions()
        Dim selection As EnvDTE.TextSelection = CType(DTE.ActiveDocument.Selection, EnvDTE.TextSelection)

        Const REGION_START As String = "//#region"
        Const REGION_END As String = "//#endregion"

        selection.SelectAll()
        Dim text As String = selection.Text
        selection.StartOfDocument(True)

        Dim startIndex As Integer
        Dim endIndex As Integer
        Dim lastIndex As Integer = 0
        Dim startRegions As New Stack(Of Integer)

        Do
            startIndex = text.IndexOf(REGION_START, lastIndex)
            endIndex = text.IndexOf(REGION_END, lastIndex)

            If startIndex = -1 AndAlso endIndex = -1 Then
                Exit Do
            End If

            If startIndex <> -1 AndAlso startIndex < endIndex Then
                startRegions.Push(startIndex)
                lastIndex = startIndex + 1
            Else
                ' Outline region ...
                Dim tempStartIndex As Integer = CInt(startRegions.Pop())
                selection.MoveToLineAndOffset(CalcLineNumber(text, tempStartIndex), CalcLineOffset(text, tempStartIndex))
                selection.MoveToLineAndOffset(CalcLineNumber(text, endIndex) + 1, 1, True)
                selection.OutlineSection()

                lastIndex = endIndex + 1
            End If
        Loop

        selection.StartOfDocument()
    End Sub

    Private Function CalcLineNumber(ByVal text As String, ByVal index As Integer) As Integer
        Dim lineNumber As Integer = 1
        Dim i As Integer = 0

        While i < index
            If text.Chars(i) = vbLf Then
                lineNumber += 1
                i += 1
            End If

            If text.Chars(i) = vbCr Then
                lineNumber += 1
                i += 1
                If text.Chars(i) = vbLf Then
                    i += 1 'Swallow the next vbLf
                End If
            End If

            i += 1
        End While

        Return lineNumber
    End Function

    Private Function CalcLineOffset(ByVal text As String, ByVal index As Integer) As Integer
        Dim offset As Integer = 1
        Dim i As Integer = index - 1

        'Count backwards from //#region to the previous line counting the white spaces
        Dim whiteSpaces = 1
        While i >= 0
            Dim chr As Char = text.Chars(i)
            If chr = vbCr Or chr = vbLf Then
                whiteSpaces = offset
                Exit While
            End If
            i -= 1
            offset += 1
        End While

        'Count forwards from //#region to the end of the region line
        i = index
        offset = 0
        Do
            Dim chr As Char = text.Chars(i)
            If chr = vbCr Or chr = vbLf Then
                Return whiteSpaces + offset
            End If
            offset += 1
            i += 1
        Loop

        Return whiteSpaces
    End Function

End Module

Ответ 9

На VS 2012 и VS 2015 установите плагин WebEssentials, и вы сможете это сделать.

http://vswebessentials.com/features/javascript

Ответ 10

если вы используете Resharper

выполните шаги на этом рисунке

затем напишите это в редакторе шаблонов

  //#region $name$
$END$$SELECTION$
  //#endregion $name$

и назовите его #region, как на этом рисунке

надеюсь, что это поможет вам

Ответ 11

Ни один из этих ответов не работал у меня с визуальной студией 2017.

Лучший плагин для VS 2017: Регионы JavaScript

Пример 1:

Пример 2:

Протестировано и одобрено:

Ответ 12

Не только для VS, но и для всех редакторов.

(function /* RegionName */ () { ... })();

Предупреждение: имеет такие недостатки, как область видимости.