Практическое руководство. Создание проекта приложения Windows путем расширения
Обновлен: Ноябрь 2007
Создание нового приложения и добавление его к текущему решению выполняется с помощью метода AddFromTemplate объекта DTE.Solution. Приведенные далее задачи предполагают наличие у пользователя навыков доступа к интегрированной среде разработки макросов и создания проекта макроса. Дополнительные сведения см. в разделе Автоматизация повторяющихся действий с помощью макросов.
В описанной ниже процедуре создается проект Visual Basic. Для создания проекта Visual C# используйте на шаге 4 строку "CSharp", а для создания проекта Visual J# — строку "JSharp".
Примечание. |
---|
Отображаемые диалоговые окна и команды меню могут отличаться от описанных в справке в зависимости от текущих параметров или выпуска среды. Эти процедуры были разработаны с обычными параметрами разработки. Чтобы изменить параметры, в меню Сервисвыберите команду Импорт и экспорт параметров. Дополнительные сведения см. в разделе Параметры Visual Studio. |
Добавление нового проекта в решение
Создайте новый модуль макроса с именем NewProject.
Добавьте в модуль новый макрос NewWindowsProject.
Sub NewWindowsProject() ' Add code here to create new project. End Sub
Этот макрос добавляет новое приложение Windows Visual Basic.
Выберите необходимый шаблон для проекта консоли. Можно создать несколько различных типов проектов, как показано в таблице. Для приложения Windows воспользуйтесь шаблоном WindowsApplication.zip.
Имя шаблона
Тип проекта
ClassLibrary.zip
Библиотека классов
ConsoleApplication.zip
Консольное приложение
EmptyProject.zip
Пустой проект
WebApplication.zip
Веб-приложение
WebControl.zip
Веб-элемент управления
WebService.zip
Веб-служба
WindowsApplication.zip
Приложение Windows
WindowsControl.zip
Элемент управления Windows
WindowsService.zip
Служба Windows
Синтаксис использования шаблона выглядит следующим образом: GetProjectTemplate("WindowsApplication.zip", "VisualBasic"). Можно получить доступ к шаблонам, относящимся к определенным приложениям, например GetProjectTemplate("PocketPC2003-ClassLibrary.zip", "CSharp") возвращает шаблон библиотеки классов Visual C# для проекта Pocket PC 2003. Шаблоны проектов для всех языков находятся в папке <диск>\Program Files\Microsoft Visual Studio 8\Common7\IDE\ProjectTemplates\язык
Кроме того, можно создавать собственные шаблоны проектов и шаблоны элементов проектов. Чтобы выбрать папку для хранения шаблонов, в меню Сервис щелкните Параметры. В левой части окна Параметры щелкните Проекты и решения. Введите пути к шаблонам в полях Расположение пользовательских шаблонов проектов Visual Studio и Расположение пользовательских шаблонов элементов Visual Studio. Также можно использовать значения этих параметров по умолчанию.
Имена файлов пользовательских шаблонов должны быть уникальными и не должны конфликтовать с именами файлов, определенными в:
- <диск>:\Program Files\Microsoft Visual Studio 8\Common7\IDE\ProjectTemplates\язык
и
- <диск>:\Program Files\Microsoft Visual Studio 8\Common7\IDE\ItemTemplates\язык
Следует использовать длинные имена файлов (а не имена в формате 8.3). Дополнительные сведения см. в разделе Создание шаблонов проектов и элементов.
Используйте метод GetProjectTemplate, чтобы найти шаблон проекта. Путь шаблона зависит от языка, поэтому для извлечения шаблона Visual Basic используйте строку "Visual Basic", как показано ниже. Для шаблона Visual C# используйте строку "CSharp", а для шаблона Visual J# строку "JSharp".
Dim vbTemplatePath As String Dim vbProjectPath As String vbProjectPath = "C:\UserFiles\MyFiles\MyProject" vbTemplatePath = soln.GetProjectTemplate("Windows _ Application", "VisualBasic")
Вызовите метод AddFromTemplate.
' Create a new solution. ' Make sure the filepath below exists ' on your computer. soln.Create("C:\UserFiles\MyFiles\MyProject", "MySolution") ' Create a new VB console project using the template ' obtained above. soln.AddFromTemplate(vbTemplatePath, vbProjectPath, _ "VB Console Project", False)
Ниже приведен полный текст макроса.
Sub NewWindowsProject () 'This function creates a solution and adds a Visual Basic Console 'project to it. Dim soln As Solution2 = CType(DTE.Solution, Solution2) 'Dim proj As Project Dim msg As String Dim vbTemplatePath As String Dim vbProjectPath As String vbProjectPath = "C:\UserFiles\MyFiles\MyProject" vbTemplatePath = soln.GetProjectTemplate _ ("Windows Application", "VisualBasic") ' Create a new solution. ' Make sure the filepath below exists ' on your computer. soln.Create("C:\UserFiles\MyFiles\MyProject", "MySolution") ' Create a new VB console project using the template ' obtained above. soln.AddFromTemplate(vbTemplatePath, vbProjectPath, _ "VB Windows Project", False) msg = "Created new solution: " & soln.FullName & vbCrLf msg = msg & "Created new project: " & soln.Projects.Kind() MsgBox(msg) End Sub
Сохраните макрос, закройте IDE макросов и запустите макрос из обозревателя макросов.
В обозревателе решений просмотрите новое решение "MySolution" и приложение Windows "VB Windows Project".
См. также
Задачи
Практическое руководство. Перенос кода, создающего проекты при помощи шаблонов
Практическое руководство. Создание проектов программными средствами
Практическое руководство. Создание элементов проекта программными средствами