insertar - llamar javascript desde html

cómo implementar colapso de regiones/código en javascript

Question

¿Cómo se pueden implementar regiones alias del colapso del código para JavaScript en Visual Studio?

Si hay cientos de líneas en javascript, será más comprensible utilizando el plegado de código con regiones como en vb / C #.

#region My Code
#endregion

Answer 1

¡Eso es fácil!

Marque la sección que desea colapsar y,

Ctrl + M + H

Y para expandir use la marca ''+'' a su izquierda.

Answer 2

Al marcar una sección de código (independientemente de cualquier bloque lógico) y presionar CTRL + M + H, definirá la selección como una región que es plegable y ampliable.

Answer 3

Buenas noticias para los desarrolladores que están trabajando con la última versión de Visual Studio

Los Web Essentials vienen con esta característica.

Mira esto

Nota: Para VS 2017 use JavaScript Regions: https://marketplace.visualstudio.com/items?itemName=MadsKristensen.JavaScriptRegions

Answer 4

El plugin JSEnhancements para Visual Studio aborda esto muy bien.

Answer 5

En VS 2012 y VS 2015 instale el complemento WebEssentials y podrá hacerlo.

http://vswebessentials.com/features/javascript

Answer 6

Gracias a 0A0D por una gran respuesta. He tenido buena suerte con eso. Darin Dimitrov también hace una buena discusión sobre la limitación de la complejidad de sus archivos JS. Aún así, encuentro ocasiones en las que colapsar las funciones según sus definiciones hace que navegar por un archivo sea mucho más fácil.

Con respecto a #region en general, esta pregunta SO lo cubre bastante bien.

He hecho algunas modificaciones en Macro para soportar un colapso de código más avanzado. Este método le permite poner una descripción después de la // palabra clave de la región ala C # y lo muestra en el código como se muestra a continuación:

Código de ejemplo:

//#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

Macro actualizada:

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

Answer 7

Microsoft ahora tiene una extensión para VS 2010 que proporciona esta funcionalidad:

Extensiones de JScript Editor

Answer 8

Ninguna de estas respuestas no funcionó para mí con visual studio 2017.

El mejor complemento para VS 2017: https://marketplace.visualstudio.com/items?itemName=MadsKristensen.JavaScriptRegions

Ejemplo 1:

Ejemplo 2:

Probado y aprobado:

Answer 9

No solo para VS, sino también para casi todos los editores.

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

Advertencia: tiene desventajas tales como alcance.

Answer 10

Para aquellos a punto de usar Visual Studio 2012, existe la Web Essentials 2012

Para aquellos a punto de usar Visual Studio 2015, existe Web Essentials 2015.3

El uso es exactamente como @prasad preguntó

Answer 11

si estás usando Resharper

sigue los pasos en esta foto

luego escribe esto en el editor de plantillas

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

y #region nombre #region como en esta imagen

espero que esto te ayude

Answer 12

La entrada del blog aquí lo explica y esta pregunta de MSDN .

Tienes que usar las macros de Visual Studio 2003/2005/2008.

Copiar + Pegar desde la entrada del blog por fidelidad:

1. Abre Macro Explorer
2. Crear una nueva macro
3. OutlineRegions
4. Haga clic en Editar macro y pegue el siguiente código VB:

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

5. Guarde la macro y cierre el editor
6. Ahora asignemos un atajo a la macro. Vaya a Herramientas-> Opciones-> Entorno-> Teclado y busque su macro en el cuadro de texto "mostrar comandos que contienen"
7. ahora en el cuadro de texto bajo "Presionar teclas de atajo" puede ingresar el atajo deseado. Yo uso Ctrl + M + E. No sé por qué, acabo de ingresarlo por primera vez y usarlo ahora :)