visual studio करन दृश्य स्टूडियो: लाइन को ऊपर/नीचे ले जाने और हालिया बदलावों के माध्यम से जाने के लिए हॉटकीज़




हिन्दी से अंग्रेजी में अनुवाद (8)

ऑल-एरो चीज करने के लिए विज़ुअल स्टूडियो में मैक्रो रिकॉर्ड करें:

ctrl-alt-r -- record mode
ctrl-c -- copy a line
up arrow -- go up a line
home -- beginning of line (maybe there is a way to paste before the current line without this)
ctrl-v -- paste
ctrl-alt-r -- end record mode

अब आप इस मैक्रो को मैक्रोज़ आईडीई और कीबोर्ड वरीयताओं का इस्तेमाल करने के लिए किसी भी सेट कीस्ट्रोक्स पर मैप कर सकते हैं।

मैं एक्लिप्स से विजुअल स्टूडियो। नेट पर जा रहा हूं और मुझे छोड़कर मेरी सभी प्यारी हॉटकीज़ मिल गई हैं:

  • ग्रहण में आप ALT को दबा सकते हैं - और ALT - आपके द्वारा किए गए हाल के परिवर्तनों पर जाने के लिए, कुछ बार मैं वापस जाने के लिए उपयोग करता हूं जहां मैं किसी अन्य फ़ाइल में था और फिर वापस लौटता हूं। जाहिरा तौर पर वी.एस.एन.टी. में सीटीआरएल - और सीटीआरएल -एसएचआईएफटी -इतना करते हैं लेकिन वे हमेशा काम नहीं करते (उदाहरण के लिए लैपटॉप पर, शून्य के साथ एक अंकुरण मुद्दा हो सकता है) और ऐसा ही एल्गोरिथ्म का पालन करने के लिए प्रतीत नहीं होता के "जहां मैं था" के रूप में मुझे ग्रहण में उपयोग किया जाता है क्या किसी ने इसे काम करने और दैनिक, आदि पर भरोसा किया है?
  • एक्लिप्स में, एक लाइन को ऊपर या नीचे ले जाने के लिए आप ALT दबाएं - ऊपर या ओएलटी - डाउनारो और आप इसे कोड के माध्यम से ले जाते हैं जब तक आप इसे नहीं लेते हैं, जहां आप चाहते हैं, बहुत अच्छा। इसके अलावा एक पंक्ति की प्रतिलिपि बनाने के लिए, आप SHIFT - ALT - uparrow या SHIFT - ALT - downarrow दबा सकते हैं इन दोनों हॉटकीज़ आपके द्वारा चुनी गई लाइनों के ब्लॉक के लिए भी काम करते हैं।

क्या किसी ने इन हॉटकी फीचर को दृश्य स्टूडियो में खोजा है? NET?

ADDENDUM:

जब आप ऊपर वर्णित दूसरी फीचर का उपयोग करेंगे तो इसका उदाहरण है कि नीचे की लुक को लूप में ऊपर ले जाने के लिए। एक्लिप्स में, आप कर्सर को कंसोल पर रखेंगे.प्रकाशित करें और फिर ALT- (uparrow) दबाएं, मैं उस समय का उपयोग करता हूं: एक कुंजी स्ट्रोक जो लाइनों को ऊपर और नीचे ले जाने के लिए है

for (int i = 0; i < 10; i++) {

}
Console.WriteLine(i);

ठीक है, बिना किसी चयन-ctrl-c के साथ चार्ली के विचार को एक्सट्रपोल करने के लिए, विज़ुअल स्टूडियो में आप कंसोल पर अपना कर्सर डाल सकते हैं। WrightLine, (कोई चयन नहीं) CTRL दबाएं - एक्स और फिर ऊपर ले जाएं और CTRL - V दबाएं।


किसी भी ऐसे दृश्य स्टूडियो 2010 में करने का तरीका तलाशने के लिए, निशुल्क विज़ुअल स्टूडियो 2010 प्रो पावर टूल्स एक्सटेंशन लाइनों को ऊपर और नीचे ले जाने की क्षमता जोड़ता है

http://visualstudiogallery.msdn.microsoft.com/en-us/d0d33361-18e2-46c0-8ff2-4adea1e34fef


मुझे नहीं पता कि वीएस उन सुविधाओं का समर्थन करता है, जिन्हें आप नेचर के बारे में बात कर रहे हैं, लेकिन मुझे पता है कि रिहाररप्लग प्लगइन आपको CTRL + SHIFT + BACKSPACE का उपयोग करके पिछले संपादनों में जाने की अनुमति देता है। मुझे नहीं लगता कि यह एक लाइन को ऊपर और नीचे ले जाने के लिए समर्थन है (अच्छी तरह से नहीं है कि मैंने अभी तक पाया है)


संपादित करें। लाइन्सट्रेन्जेज लेकिन यह एक लाइन को ऊपर ले जाने के लिए काम नहीं करता ... यहाँ लाइन अप को स्थानांतरित करने के लिए मेक्रो है

Sub LineTransposeUp()
    Dim offset As Integer
    Dim sel As TextSelection

    DTE.UndoContext.Open("LineTransposeUp")

    Try
        sel = DTE.ActiveDocument.Selection
        offset = sel.ActivePoint.LineCharOffset
        sel.LineUp()
        DTE.ExecuteCommand("Edit.LineTranspose")
        sel.LineUp()
        sel.MoveToLineAndOffset(sel.ActivePoint.Line, offset)
    Catch ex As System.Exception
    End Try

    DTE.UndoContext.Close()
End Sub

वीएस 2010-2012 में एक पंक्ति (या लाइनों के समूह) को ऊपर या नीचे ले जाने के लिए हटो लाइन एक्सटेंशन का उपयोग करें


पॉल ओस्ट्रोस्की मैंने आपके उपकरण की कोशिश की यह ज्यादातर ठीक काम करता है

दूसरी बात जो ग्रहण करते हैं, रेखा को मौजूदा इंडेंटेशन स्तर पर ले जाते हैं।

उदाहरण के लिए:

function test()
{
    // do stuff
}
Console.WriteLine("test"); 

कंसोल पर एक बदलाव अप करना

function test()
{
    // do stuff
    Console.WriteLine("test"); 
}

लेकिन आपके उपकरण ऐसा करते हैं:

function test()
{
    // do stuff
Console.WriteLine("test"); 
}

मैंने हाल ही में एक ही काम किया है और जब मैं एक नई परियोजना पर चले गए तो ईक्लेप्से से विजुअल स्टूडियो में चले गए रिचार्पर ऐड इन अत्यधिक अनुशंसित है - यह कुछ अमीर संपादन, नेविगेशनल और रिफैक्टरिंग कार्यक्षमता को जोड़ता है जो कि ग्रहण के लिए वी.एस. है।

Resharper भी एक keybaord मानचित्रण योजना का उपयोग करने की अनुमति देता है जो इंटेलिया के लिए बहुत ही समान है जावा भागने के लिए बहुत आसान ...

आपके दूसरे प्रश्न के बारे में, रेश्पर के पास एक ही चालन कोड अप / डाउन फ़ंक्शन है, लेकिन कुछ चेतावनियों के साथ । सबसे पहले, इंटेलिया कीबोर्ड मैपिंग का उपयोग करते हुए, कुंजी संयोजन बल्कि कपटपूर्ण है

कोड को ऊपर ले जाएं: ctrl + shift + alt + up कर्सर

कोड को नीचे ले जाएं: ctrl + shift + alt + नीचे कर्सर

दूसरे, यह हमेशा एक पंक्ति से हमेशा नहीं चलता है, लेकिन वास्तव में कोड ब्लॉक कूदता है। तो यह एक कतार बयान के अंदर से एक पंक्ति को अंदर से स्थानांतरित नहीं कर सकता है - यह अगर ब्लॉक पर चयनित रेखा को सही स्थान पर ले जाता है। ऐसा करने के लिए आपको "बाएं" और "दाएं" को स्थानांतरित करने की आवश्यकता है

कोड को बाहरी कोड ब्लॉक में ले जाएं: ctrl + shift + alt + left कर्सर

कोड को अगले आंतरिक कोड ब्लॉक में ले जाएं: ctrl + shift + alt + right कर्सर


जवाब प्रस्तावित काम करते हैं, लेकिन इनमें से कोई भी ग्रहण के रूप में अच्छा नहीं है कि वह मौजूदा पेस्ट बफर, वर्तमान में चयनित वर्णों को कैसे सुरक्षित रखता है, और वे उपयोगकर्ता को विभिन्न लाइनों पर काम करने की अनुमति नहीं देते हैं। मैं एक समाधान के साथ आया हूं जो पेस्ट बफर को संरक्षित करता है, वर्तमान चरित्र चयन, और एक चयन के साथ या बिना काम करता है (जो कई पंक्तियों को बढ़ा सकता है या नहीं):

'' Duplicates the current line (or selection of lines) and places the copy
'' one line below or above the current cursor position (based upon the parameter)
Sub CopyLine(ByVal movingDown As Boolean)
    DTE.UndoContext.Open("CopyLine")
    Dim objSel As TextSelection = DTE.ActiveDocument.Selection

    ' store the original selection and cursor position
    Dim topPoint As TextPoint = objSel.TopPoint
    Dim bottomPoint As TextPoint = objSel.BottomPoint
    Dim lTopLine As Long = topPoint.Line
    Dim lTopColumn As Long = topPoint.LineCharOffset
    Dim lBottomLine As Long = bottomPoint.Line
    Dim lBottomColumn As Long = bottomPoint.LineCharOffset()

    ' copy each line from the top line to the bottom line
    Dim readLine As Long = lTopLine
    Dim endLine As Long = lBottomLine + 1
    Dim selectionPresent As Boolean = ((lTopLine <> lBottomLine) Or (lTopColumn <> lBottomColumn))
    If (selectionPresent And (lBottomColumn = 1)) Then
        ' A selection is present, but the cursor is in front of the first character
        ' on the bottom line. exclude that bottom line from the copy selection.
        endLine = lBottomLine
    End If

    ' figure out how many lines we are copying, so we can re-position
    ' our selection after the copy is done
    Dim verticalOffset As Integer = 0
    If (movingDown) Then
        verticalOffset = endLine - lTopLine
    End If

    ' copy each line, one at a time.
    ' The Insert command doesn't handle multiple lines well, and we need
    ' to use Insert to avoid autocompletions
    Dim insertLine As Long = endLine
    While (readLine < endLine)
        ' move to read postion, and read the current line
        objSel.MoveToLineAndOffset(readLine, 1)
        objSel.EndOfLine(True) 'extend to EOL
        Dim lineTxt As String = objSel.Text.Clone
        ' move to the destination position, and insert the copy
        objSel.MoveToLineAndOffset(insertLine, 1)
        objSel.Insert(lineTxt)
        objSel.NewLine()
        ' adjust the read & insertion points
        readLine = readLine + 1
        insertLine = insertLine + 1
    End While

    ' restore the cursor to original position and selection
    objSel.MoveToLineAndOffset(lBottomLine + verticalOffset, lBottomColumn)
    objSel.MoveToLineAndOffset(lTopLine + verticalOffset, lTopColumn, True)
    DTE.UndoContext.Close()
End Sub

'' Duplicates the current line (or selection of lines) and places the copy
'' one line below the current cursor position
Sub CopyLineDown()
    CopyLine(True)
End Sub

'' Duplicates the current line (or selection of lines) and places the copy
'' one line above the current cursor position
Sub CopyLineUp()
    CopyLine(False)
End Sub


'' Moves the selected lines up one line. If no line is
'' selected, the current line is moved.
''
Sub MoveLineUp()
    DTE.UndoContext.Open("MoveLineUp")
    Dim objSel As TextSelection = DTE.ActiveDocument.Selection
    ' store the original selection and cursor position
    Dim topPoint As TextPoint = objSel.TopPoint
    Dim bottomPoint As TextPoint = objSel.BottomPoint
    Dim lTopLine As Long = topPoint.Line
    Dim lTopColumn As Long = topPoint.LineCharOffset
    Dim lBottomLine As Long = bottomPoint.Line
    Dim lBottomColumn As Long = bottomPoint.LineCharOffset()

    Dim textLineAbove As TextSelection = DTE.ActiveDocument.Selection
    textLineAbove.MoveToLineAndOffset(lTopLine - 1, 1, False)
    textLineAbove.MoveToLineAndOffset(lTopLine, 1, True)
    Dim indentChange As Integer = CountIndentations(textLineAbove.Text) * -1

    ' If multiple lines are selected, but the bottom line doesn't
    ' have any characters selected, don't count it as selected
    Dim lEffectiveBottomLine = lBottomLine
    If ((lBottomColumn = 1) And (lBottomLine <> lTopLine)) Then
        lEffectiveBottomLine = lBottomLine - 1
    End If

    ' move to the line above the top line
    objSel.MoveToLineAndOffset(lTopLine - 1, 1)
    ' and move it down, until its below the bottom line:
    Do
        DTE.ExecuteCommand("Edit.LineTranspose")
    Loop Until (objSel.BottomPoint.Line >= lEffectiveBottomLine)
    ' Since the line we are on has moved up, our location in the file has changed:
    lTopLine = lTopLine - 1
    lBottomLine = lBottomLine - 1

    IndentBlockAndRestoreSelection(objSel, lBottomLine, lBottomColumn, lTopLine, lTopColumn, indentChange)

    DTE.UndoContext.Close()
End Sub

'' Moves the selected lines down one line. If no line is
'' selected, the current line is moved.
''
Sub MoveLineDown()
    DTE.UndoContext.Open("MoveLineDown")
    Dim objSel As TextSelection = DTE.ActiveDocument.Selection
    ' store the original selection and cursor position
    Dim topPoint As TextPoint = objSel.TopPoint
    Dim bottomPoint As TextPoint = objSel.BottomPoint
    Dim lTopLine As Long = topPoint.Line
    Dim lTopColumn As Long = topPoint.LineCharOffset
    Dim lBottomLine As Long = bottomPoint.Line
    Dim lBottomColumn As Long = bottomPoint.LineCharOffset()

    ' If multiple lines are selected, but the bottom line doesn't
    ' have any characters selected, don't count it as selected
    Dim lEffectiveBottomLine = lBottomLine
    If ((lBottomColumn = 1) And (lBottomLine <> lTopLine)) Then
        lEffectiveBottomLine = lBottomLine - 1
    End If

    Dim textLineBelow As TextSelection = DTE.ActiveDocument.Selection
    textLineBelow.MoveToLineAndOffset(lEffectiveBottomLine + 1, 1, False)
    textLineBelow.MoveToLineAndOffset(lEffectiveBottomLine + 2, 1, True)
    Dim indentChange As Integer = CountIndentations(textLineBelow.Text)


    ' move to the bottom line
    objSel.MoveToLineAndOffset(lEffectiveBottomLine, 1)
    ' and move it down, which effectively moves the line below it up
    ' then move the cursor up, always staying one line above the line
    ' that is moving up, and keep moving it up until its above the top line:
    Dim lineCount As Long = lEffectiveBottomLine - lTopLine
    Do
        DTE.ExecuteCommand("Edit.LineTranspose")
        objSel.LineUp(False, 2)
        lineCount = lineCount - 1
    Loop Until (lineCount < 0)
    ' Since the line we are on has moved down, our location in the file has changed:
    lTopLine = lTopLine + 1
    lBottomLine = lBottomLine + 1

    IndentBlockAndRestoreSelection(objSel, lBottomLine, lBottomColumn, lTopLine, lTopColumn, indentChange)

    DTE.UndoContext.Close()
End Sub

'' This method takes care of indenting the selected text by the indentChange parameter
'' It then restores the selection to the lTopLine:lTopColumn - lBottomLine:lBottomColumn parameter.
'' It will adjust these values according to the indentChange performed
Sub IndentBlockAndRestoreSelection(ByVal objSel As TextSelection, ByVal lBottomLine As Long, ByVal lBottomColumn As Long, ByVal lTopLine As Long, ByVal lTopColumn As Long, ByVal indentChange As Integer)
    ' restore the cursor to original position and selection
    objSel.MoveToLineAndOffset(lBottomLine, lBottomColumn)
    objSel.MoveToLineAndOffset(lTopLine, lTopColumn, True)
    If (indentChange = 0) Then
        ' If we don't change the indent, we are done
        Return
    End If

    If (lBottomLine = lTopLine) Then
        If (indentChange > 0) Then
            objSel.StartOfLine()
        Else
            objSel.StartOfLine()
            objSel.WordRight()
        End If
    End If
    objSel.Indent(indentChange)

    ' Since the selected text has changed column, adjust the columns accordingly:
    ' restore the cursor to original position and selection
    Dim lNewBottomColumn As Long = (lBottomColumn + indentChange)
    Dim lNewTopColumn As Long = (lTopColumn + indentChange)
    ' ensure that we we still on the page.
    ' The "or" clause makes it so if we were at the left edge of the line, we remain on the left edge.
    If ((lNewBottomColumn < 2) Or (lBottomColumn = 1)) Then
        ' Single line selections, or a bottomColumn that is already at 1 may still have a new BottomColumn of 1
        If ((lTopLine = lBottomLine) Or (lBottomColumn = 1)) Then
            lNewBottomColumn = 1
        Else
            ' If we have multiple lines selected, don't allow the bottom edge to touch the left column,
            ' or the next move will ignore that bottom line.
            lNewBottomColumn = 2
        End If
    End If
    If ((lNewTopColumn < 2) Or (lTopColumn = 1)) Then
        lNewTopColumn = 1
    End If

    ' restore the selection to the modified selection
    objSel.MoveToLineAndOffset(lBottomLine, lNewBottomColumn)
    objSel.MoveToLineAndOffset(lTopLine, lNewTopColumn, True)
End Sub


'' This method counts the indentation changes within the text provided as the paramter
Function CountIndentations(ByVal text As String) As Integer
    Dim indent As Integer = 0
    While (Text.Length > 0)
        If (Text.StartsWith("//")) Then
            Dim endOfLine As Integer = Text.IndexOf("\n", 2)
            If (Equals(endOfLine, -1)) Then
                ' The remaining text is all on one line, so the '//' terminates our search
                ' Ignore the rest of the text
                Exit While
            End If
            ' continue looking after the end of line
            Text = Text.Substring(endOfLine + 1)
        End If

        If (Text.StartsWith("/*")) Then
            Dim endComment As Integer = Text.IndexOf("*/", 2)
            If (Equals(endComment, -1)) Then
                ' This comment continues beyond the length of this line.
                ' Ignore the rest of the text
                Exit While
            End If
            ' continue looking after the end of this comment block
            Text = Text.Substring(endComment + 1)
        End If

        If (Text.StartsWith("{")) Then
            indent = indent + 1
        Else
            If (Text.StartsWith("}")) Then
                indent = indent - 1
            End If
        End If
        Text = Text.Substring(1)
    End While
    Return indent
End Function

मैंने MoveLineUp () और MoveLineDown () विधियों की शुरुआत में एंडोकोटेक्स्ट तंत्र (निकोलस डोरियर द्वारा सुझाए गए) को जोड़ने और इसे अपने अंत में बंद करने के लिए इस पोस्ट को संपादित किया था 11/23/11 - मैंने इसे फिर से अपडेट किया है ताकि स्थानांतरित लाइनों को इंडेंट करने के लिए स्वयं की अनुमति दी जाए क्योंकि आप ब्रैकेट सीमाओं को पार करते हैं





hotkeys