2010-11-11 16 views
13

में समाधान में सभी फ़ाइलों का ऑटो प्रारूप बनाम मैं बनाम 2010 में अपने समाधान में सभी फ़ाइलों को स्वत: प्रारूपित करने का प्रयास कर रहा हूं। मैंने देखा है कि ऐसा करने के लिए कोई अंतर्निहित विकल्प नहीं है। मैंने ऐसा करने के लिए मैक्रो लिखने की कोशिश की है, लेकिन मैंने अटक गया है।विजुअल स्टूडियो 2010

जब मैं अपनी परियोजनाओं में किसी भी ProjectItem iterates, मैं कैसे स्रोत-कोड मोड में designable-फ़ाइलें खोलने के लिए पता नहीं है, या कैसे sourceable फ़ाइलें और इस तरह के png -s या इस तरह के रूप icourceable फ़ाइलें (के बीच अंतर करना)।

क्या आपके पास कोई सुझाव है?

धन्यवाद।

+1

यह भी देखना http://stackoverflow.com/questions/3942958/visual-studio-macro-to-format-all-files-in-a-solution –

+0

यह भी देखना http://stackoverflow.com/ प्रश्न/931406/स्वरूपण-पर-एक-सभी-फाइल-इन-ए-विज़ुअल-स्टूडियो-प्रोजेक्ट –

उत्तर

8

खैर बजाय एक मैक्रो जांच लेखन की एक Code Maid (visualstudiogallery पर मुक्त) इन 2 सुविधाएं होती हैं:

  • सफाई एक एकल फाइल, सभी चयनित आइटम या पूरे समाधान
  • सफाई विकल्प स्वचालित रूप से चलाने के लिए को बचाने के

विकल्पों में से एक नंबर क्या क्लीनअप

4

मुझे लगता है कि करता है के साथ निम्नलिखित आप के लिए यह काम करना चाहिए अन्य स्टूडियो में मैंने यह किया है कि मैंने विजुअल स्टूडियो में किया है। यदि आप अन्य दस्तावेज़ प्रकारों को प्रारूपित करना चाहते हैं तो अन्य फ़ाइल एक्सटेंशन का समर्थन करने के लिए FormatFile routine बदलें।

Sub IterateFiles() 
    Dim solution As Solution = DTE.Solution 
    For Each prj As Project In solution.Projects 
     IterateProjectFiles(prj.ProjectItems) 
    Next 
End Sub 

Private Sub IterateProjectFiles(ByVal prjItms As ProjectItems) 
    For Each file As ProjectItem In prjItms 
     If file.SubProject IsNot Nothing Then 
      FormatFile(file) 
      IterateProjectFiles(file.ProjectItems) 
     ElseIf file.ProjectItems IsNot Nothing AndAlso file.ProjectItems.Count > 0 Then 
      FormatFile(file) 
      IterateProjectFiles(file.ProjectItems) 
     Else 
      FormatFile(file) 
     End If 
    Next 
End Sub 

Private Sub FormatFile(ByVal file As ProjectItem) 
    DTE.ExecuteCommand("View.SolutionExplorer") 
    If file.Name.EndsWith(".cs") OrElse file.Name.EndsWith(".vb") Then 
     file.Open() 
     file.Document.Activate() 

     DTE.ExecuteCommand("Edit.FormatDocument", "") 

     file.Document.Save() 
     file.Document.Close() 
    End If 
End Sub 
+0

Thx, मेरे लिए पूरी तरह से काम किया। मुझे केवल एक ही बदलाव था जो डिज़ाइनर व्यू के बजाय कोड दृश्य में नियंत्रण/घटकों को खोलने के लिए मेरी सेटिंग्स बदलता था। –

संबंधित मुद्दे