Browse Source

Merge ac960379b2 into 8641fed046

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

93
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>

72
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> '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)
''' <summary> Try
''' Disposes resources used by the control. If disposing AndAlso components IsNot Nothing Then
''' </summary> components.Dispose()
''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param> End If
Protected Overrides Sub Dispose(ByVal disposing As Boolean) Finally
If disposing Then MyBase.Dispose(disposing)
If components IsNot Nothing Then End Try
components.Dispose() End Sub
End If
End If 'Required by the Windows Form Designer
MyBase.Dispose(disposing) Private components As System.ComponentModel.IContainer
End Sub
'NOTE: The following procedure is required by the Windows Form Designer
''' <summary> 'It can be modified using the Windows Form Designer.
''' This method is required for Windows Forms designer support. 'Do not modify it using the code editor.
''' Do not change the method contents inside the source code editor. The Forms designer might <System.Diagnostics.DebuggerStepThrough()> _
''' not be able to load this method if it was changed manually. Private Sub InitializeComponent()
''' </summary> components = New System.ComponentModel.Container()
Private Sub InitializeComponent() Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
' End Sub
'${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>

76
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)
''' <summary> Try
''' Disposes resources used by the control. If disposing AndAlso components IsNot Nothing Then
''' </summary> components.Dispose()
''' <param name="disposing">true if managed resources should be disposed; otherwise, false.</param> End If
Protected Overrides Sub Dispose(ByVal disposing As Boolean) Finally
If disposing Then MyBase.Dispose(disposing)
If components IsNot Nothing Then End Try
components.Dispose() End Sub
End If
End If 'Required by the Windows Form Designer
MyBase.Dispose(disposing) Private components As System.ComponentModel.IContainer
End Sub
'NOTE: The following procedure is required by the Windows Form Designer
''' <summary> 'It can be modified using the Windows Form Designer.
''' This method is required for Windows Forms designer support. 'Do not modify it using the code editor.
''' Do not change the method contents inside the source code editor. The Forms designer might <System.Diagnostics.DebuggerStepThrough()> _
''' not be able to load this method if it was changed manually. Private Sub InitializeComponent()
''' </summary> components = New System.ComponentModel.Container()
Private Sub InitializeComponent() Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
' End Sub
'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>

75
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
''' <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 = "MainForm"
Private Sub InitializeComponent() End Sub
'
'MainForm
'
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