This sample has the user preferences such as Window Color, Thickness, Font, Last open file list and Window rectangle stored in an xml file. See my earlier post in reply to Steve's post/question about details.
Sub FormatAll() For Each proj As Project In DTE.Solution.Projects FormatFileRecur(proj.ProjectItems()) Next End Sub Sub FormatFileRecur(ByVal projectItems As EnvDTE.ProjectItems) For Each pi As EnvDTE.ProjectItem In projectItems If pi.Collection Is projectItems Then Dim pi2 As EnvDTE.ProjectItems = pi.ProjectItems Try If pi.Name.EndsWith(".cs") Then If Not (pi.Name.EndsWith("Designer.cs")) Then If Not pi.IsOpen Then pi.Open(Constants.vsViewKindCode) pi.Document.Activate() DTE.ExecuteCommand("Edit.FormatDocum...
Comments
Post a Comment