Visual Studio Macro - gVim 으로 열린 파일들을 읽기모드로 열기

포스트를 만든 목적

• 회사와 집을 오가마 소스코드 공유하려고 남긴다.
  
• gVim을 쓰는데, Visual Studio Macro 를 이용해 여는 방법을 알리기 위해서 남긴다.
  
• 내가 기억에서 잃어버리기 위해서 남긴다.
  

내용
' 현재 열려있는 파일들을 gvim으로 연다. Public Sub OpenDocumentsByGvim() Dim ProcessInfo = New ProcessStartInfo ProcessInfo.FileName = "C:\Program Files\Vim\vim72\gvim.exe" 'ProcessInfo.Arguments = String.Format("--servername gmain --remote-silent +{0} +""normal zz"" {1}", DTE.ActiveDocument.Selection.TopLine, DTE.ActiveDocument.FullName) ProcessInfo.Arguments = String.Format("-R +{0} +""normal zz"" -p {1}", DTE.ActiveDocument.Selection.TopLine, DTE.ActiveDocument.FullName) For i = 1 To DTE.Documents.Count If String.Equals(DTE.ActiveDocument.FullName, DTE.Documents.Item(i).FullName) Then Continue For End If ProcessInfo.Arguments = String.Format("{0} {1}", ProcessInfo.Arguments, DTE.Documents.Item(i).FullName) Next ProcessInfo.WorkingDirectory = DTE.ActiveDocument.Path System.Diagnostics.Process.Start(ProcessInfo) End Sub

' 현재 보고 있는 파일만 gVim 으로 연다. Public Sub OpenActiveDocumentBygVim() Dim ProcessInfo = New ProcessStartInfo ProcessInfo.FileName = "C:\Program Files\Vim\vim72\gvim.exe" ProcessInfo.Arguments = String.Format("-R +{0} +""normal zz"" {1}", DTE.ActiveDocument.Selection.TopLine, DTE.ActiveDocument.FullName) ProcessInfo.WorkingDirectory = DTE.ActiveDocument.Path System.Diagnostics.Process.Start(ProcessInfo) End Sub
여담

• 메크로는 ALT + F11 로 열 수 있고, 아무 모듈에나, 함수를 넣고, 단축키로 연결 시키면 편하다.