Browse Source

Merge ac960379b2 into 8641fed046

pull/569/merge
Thiago França da Silva 11 years ago
parent
commit
e8c7b43362
  1. 91
      data/templates/file/VB/VB.Forms.Form.xft
  2. 66
      data/templates/file/VB/VB.Forms.UserControl.xft
  3. 70
      data/templates/project/VB/ControlLibrary.xpt
  4. 67
      data/templates/project/VB/FormsProject.xpt

91
data/templates/file/VB/VB.Forms.Form.xft

@ -1,22 +1,11 @@
<?xml version="1.0"?> <?xml version="1.0"?>
<Template author="Mike Krueger" version="1.0"> <Template author="TFSThiago1112" version="1.0">
<Config name="${res:Templates.File.WindowsForm.Name}" icon="VBNet.File.Form" category="VB" subcategory="${res:Templates.File.Categories.WindowsApplications}" defaultname="Form${Number}.vb" language="VB"/>
<Config
name = "${res:Templates.File.WindowsForm.Name}"
icon = "VBNet.File.Form"
category = "VB"
subcategory = "${res:Templates.File.Categories.WindowsApplications}"
defaultname = "Form${Number}.vb"
language = "VB"
/>
<Description>${res:Templates.File.WindowsForm.Description}</Description> <Description>${res:Templates.File.WindowsForm.Description}</Description>
<References> <References>
<Reference include="System.Drawing" /> <Reference include="System.Drawing" />
<Reference include="System.Windows.Forms" /> <Reference include="System.Windows.Forms" />
</References> </References>
<!-- <!--
Special new file templates: Special new file templates:
${StandardNamespace} -> Standardnamespace of the current project or FileNameWithoutExtension ${StandardNamespace} -> Standardnamespace of the current project or FileNameWithoutExtension
@ -27,56 +16,44 @@
${Path} -> Full path of the file ${Path} -> Full path of the file
--> -->
<Files> <Files>
<File name="${Path}/${FileNameWithoutExtension}.Designer.vb" DependentUpon="${FileName}" language="VBNET"><![CDATA[${StandardHeader.VBNET} <File name="${Path}/${FileNameWithoutExtension}.Designer.vb" DependentUpon="${FileName}" language="VBNET"><![CDATA[${StandardHeader.VBNET}
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class ${ClassName} Partial Class ${ClassName}
Inherits System.Windows.Forms.Form Inherits System.Windows.Forms.Form
''' <summary> 'Form overrides dispose to clean up the component list.
''' Designer variable used to keep track of non-visual components. <System.Diagnostics.DebuggerNonUserCode()> _
''' </summary> Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Private components As System.ComponentModel.IContainer Try
If disposing AndAlso components IsNot Nothing Then
''' <summary> components.Dispose()
''' Disposes resources used by the form. End If
''' </summary> Finally
''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param> MyBase.Dispose(disposing)
Protected Overrides Sub Dispose(ByVal disposing As Boolean) End Try
If disposing Then End Sub
If components IsNot Nothing Then
components.Dispose() 'Required by the Windows Form Designer
End If Private components As System.ComponentModel.IContainer
End If
MyBase.Dispose(disposing) 'NOTE: The following procedure is required by the Windows Form Designer
End Sub 'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
''' <summary> <System.Diagnostics.DebuggerStepThrough()> _
''' This method is required for Windows Forms designer support. Private Sub InitializeComponent()
''' Do not change the method contents inside the source code editor. The Forms designer might components = New System.ComponentModel.Container
''' not be able to load this method if it was changed manually. Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
''' </summary> Me.Text = "${ClassName}"
Private Sub InitializeComponent() End Sub
'
'${ClassName}
'
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Name = "${ClassName}"
Me.Text = "${ClassName}"
End Sub
End Class End Class
]]></File> ]]>
<File name="${FullName}" language="VBNET"><![CDATA[${StandardHeader.VBNET} </File>
Public Partial Class ${ClassName} <File name="${FullName}" language="VBNET"><![CDATA[${StandardHeader.VBNET}
Public Sub New() Public Class ${ClassName}
' The Me.InitializeComponent call is required for Windows Forms designer support.
Me.InitializeComponent()
'
' TODO : Add constructor code after InitializeComponents
'
End Sub
End Class End Class
]]></File> ]]></File>
</Files> </Files>
<AdditionalOptions/> <AdditionalOptions/>
</Template> </Template>

66
data/templates/file/VB/VB.Forms.UserControl.xft

@ -27,56 +27,42 @@
--> -->
<Files> <Files>
<File name="${Path}/${FileNameWithoutExtension}.Designer.vb" DependentUpon="${FileName}" language="VBNET"><![CDATA[${StandardHeader.VBNET} <File name="${Path}/${FileNameWithoutExtension}.Designer.vb" DependentUpon="${FileName}" language="VBNET"><![CDATA[${StandardHeader.VBNET}
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class ${ClassName} Partial Class ${ClassName}
''' <summary> Inherits System.Windows.Forms.UserControl
''' Designer variable used to keep track of non-visual components.
''' </summary>
Private components As System.ComponentModel.IContainer
''' <summary> 'UserControl overrides dispose to clean up the component list.
''' Disposes resources used by the control. <System.Diagnostics.DebuggerNonUserCode()> _
''' </summary> Protected Overrides Sub Dispose(ByVal disposing As Boolean)
''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param> Try
Protected Overrides Sub Dispose(ByVal disposing As Boolean) If disposing AndAlso components IsNot Nothing Then
If disposing Then components.Dispose()
If components IsNot Nothing Then End If
components.Dispose() Finally
End If MyBase.Dispose(disposing)
End If End Try
MyBase.Dispose(disposing) End Sub
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
components = New System.ComponentModel.Container()
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
End Sub
''' <summary>
''' This method is required for Windows Forms designer support.
''' Do not change the method contents inside the source code editor. The Forms designer might
''' not be able to load this method if it was changed manually.
''' </summary>
Private Sub InitializeComponent()
'
'${ClassName}
'
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Name = "${ClassName}"
End Sub
End Class End Class
]]></File> ]]></File>
<File name="${FullName}" language="VBNET"><![CDATA[${StandardHeader.VBNET} <File name="${FullName}" language="VBNET"><![CDATA[${StandardHeader.VBNET}
Public Partial Class ${ClassName} Public Class ${ClassName}
Inherits System.Windows.Forms.UserControl
Public Sub New()
' The Me.InitializeComponent call is required for Windows Forms designer support.
Me.InitializeComponent()
'
' TODO : Add constructor code after InitializeComponents
'
End Sub
End Class End Class
]]></File> ]]></File>
</Files> </Files>
<AdditionalOptions/> <AdditionalOptions/>
</Template> </Template>

70
data/templates/project/VB/ControlLibrary.xpt

@ -1,7 +1,7 @@
<?xml version="1.0"?> <?xml version="1.0"?>
<Template originator = "Markus Palme" <Template originator = "TFSThiago1112"
created = "11/24/2002" created = "11/24/2002"
lastModified = "07/20/2005"> lastModified = "28/09/2014">
<!-- Template Header --> <!-- Template Header -->
<TemplateConfiguration> <TemplateConfiguration>
@ -44,56 +44,42 @@
<Files> <Files>
<File name="UserControl1.vb"><![CDATA[${StandardHeader.VBNET} <File name="UserControl1.vb"><![CDATA[${StandardHeader.VBNET}
Public Partial Class UserControl1 Public Class UserControl1
Inherits System.Windows.Forms.UserControl
Public Sub New()
' The Me.InitializeComponent call is required for Windows Forms designer support.
Me.InitializeComponent()
'
' TODO : Add constructor code after InitializeComponents
'
End Sub
End Class End Class
]]></File> ]]></File>
<File name="UserControl1.Designer.vb" DependentUpon="UserControl1.vb"><![CDATA[${StandardHeader.VBNET} <File name="UserControl1.Designer.vb" DependentUpon="UserControl1.vb"><![CDATA[${StandardHeader.VBNET}
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class UserControl1 Partial Class UserControl1
''' <summary> Inherits System.Windows.Forms.UserControl
''' Designer variable used to keep track of non-visual components.
''' </summary> 'UserControl overrides dispose to clean up the component list.
Private components As System.ComponentModel.IContainer <System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
''' <summary> 'NOTE: The following procedure is required by the Windows Form Designer
''' Disposes resources used by the control. 'It can be modified using the Windows Form Designer.
''' </summary> 'Do not modify it using the code editor.
''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param> <System.Diagnostics.DebuggerStepThrough()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean) Private Sub InitializeComponent()
If disposing Then components = New System.ComponentModel.Container()
If components IsNot Nothing Then Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
components.Dispose() End Sub
End If
End If
MyBase.Dispose(disposing)
End Sub
''' <summary>
''' This method is required for Windows Forms designer support.
''' Do not change the method contents inside the source code editor. The Forms designer might
''' not be able to load this method if it was changed manually.
''' </summary>
Private Sub InitializeComponent()
'
'UserControl1
'
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Name = "UserControl1"
End Sub
End Class End Class
]]></File> ]]></File>
<File name="Properties\AssemblyInfo.vb" src="DefaultAssemblyInfo.vb"/> <File name="Properties\AssemblyInfo.vb" src="DefaultAssemblyInfo.vb"/>
</Files> </Files>
</Project> </Project>
</Template> </Template>

67
data/templates/project/VB/FormsProject.xpt

@ -1,7 +1,7 @@
<?xml version="1.0"?> <?xml version="1.0"?>
<Template originator = "Markus Palme" <Template originator = "TFSThiago1112"
created = "15/04/2002" created = "15/04/2002"
lastModified = "07/20/2005"> lastModified = "28/09/2014">
<!-- Template Header --> <!-- Template Header -->
<TemplateConfiguration> <TemplateConfiguration>
@ -45,53 +45,40 @@
<Files> <Files>
<File name="MainForm.vb"> <File name="MainForm.vb">
<![CDATA[${StandardHeader.VBNET} <![CDATA[${StandardHeader.VBNET}
Public Partial Class MainForm Public Class MainForm
Public Sub New()
' The Me.InitializeComponent call is required for Windows Forms designer support.
Me.InitializeComponent()
'
' TODO : Add constructor code after InitializeComponents
'
End Sub
End Class End Class
]]></File> ]]></File>
<File name="MainForm.Designer.vb" DependentUpon="MainForm.vb"> <File name="MainForm.Designer.vb" DependentUpon="MainForm.vb">
<![CDATA[${StandardHeader.VBNET} <![CDATA[${StandardHeader.VBNET}
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class MainForm Partial Class MainForm
Inherits System.Windows.Forms.Form Inherits System.Windows.Forms.Form
''' <summary> 'Form overrides dispose to clean up the component list.
''' Designer variable used to keep track of non-visual components. <System.Diagnostics.DebuggerNonUserCode()> _
''' </summary> Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Private components As System.ComponentModel.IContainer Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
''' <summary> 'Required by the Windows Form Designer
''' Disposes resources used by the form. Private components As System.ComponentModel.IContainer
''' </summary>
''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If components IsNot Nothing Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
''' <summary> 'NOTE: The following procedure is required by the Windows Form Designer
''' This method is required for Windows Forms designer support. 'It can be modified using the Windows Form Designer.
''' Do not change the method contents inside the source code editor. The Forms designer might 'Do not modify it using the code editor.
''' not be able to load this method if it was changed manually. <System.Diagnostics.DebuggerStepThrough()> _
''' </summary> Private Sub InitializeComponent()
Private Sub InitializeComponent() components = New System.ComponentModel.Container
' Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
'MainForm Me.Text = "MainForm"
' End Sub
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Name = "MainForm"
Me.Text = "${ProjectName}"
End Sub
End Class End Class
]]></File> ]]></File>
<File name="Program.vb"> <File name="Program.vb">

Loading…
Cancel
Save