mehdi-tarkian
/
X2021
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

GUI Redesign

This commit is contained in:
Mans 2021-02-22 15:10:40 +01:00
parent da9b7a7c5c
commit 10903dcf92
13 changed files with 952 additions and 79 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

77
Wardrobe/GUI/AppForm.Designer.vb generated Normal file
View File

@ -0,0 +1,77 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class AppForm
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<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
'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()
Me.Panel_Start = New System.Windows.Forms.Panel()
Me.Button_Multiple = New System.Windows.Forms.Button()
Me.Button_Individual = New System.Windows.Forms.Button()
Me.Panel_Start.SuspendLayout()
Me.SuspendLayout()
'
'Panel_Start
'
Me.Panel_Start.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Panel_Start.Controls.Add(Me.Button_Multiple)
Me.Panel_Start.Controls.Add(Me.Button_Individual)
Me.Panel_Start.Location = New System.Drawing.Point(-3, -2)
Me.Panel_Start.Name = "Panel_Start"
Me.Panel_Start.Size = New System.Drawing.Size(2005, 876)
Me.Panel_Start.TabIndex = 0
'
'Button_Multiple
'
Me.Button_Multiple.Location = New System.Drawing.Point(742, 422)
Me.Button_Multiple.Name = "Button_Multiple"
Me.Button_Multiple.Size = New System.Drawing.Size(117, 93)
Me.Button_Multiple.TabIndex = 1
Me.Button_Multiple.Text = "Multiple"
Me.Button_Multiple.UseVisualStyleBackColor = True
'
'Button_Individual
'
Me.Button_Individual.Location = New System.Drawing.Point(742, 285)
Me.Button_Individual.Name = "Button_Individual"
Me.Button_Individual.Size = New System.Drawing.Size(117, 93)
Me.Button_Individual.TabIndex = 0
Me.Button_Individual.Text = "Individual"
Me.Button_Individual.UseVisualStyleBackColor = True
'
'AppForm
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1584, 761)
Me.Controls.Add(Me.Panel_Start)
Me.Name = "AppForm"
Me.Text = "AppForm"
Me.Panel_Start.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
Friend WithEvents Panel_Start As Panel
Friend WithEvents Button_Multiple As Button
Friend WithEvents Button_Individual As Button
End Class

120
Wardrobe/GUI/AppForm.resx Normal file
View File

@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

24
Wardrobe/GUI/AppForm.vb Normal file
View File

@ -0,0 +1,24 @@
Public Class AppForm
Sub AppForm_Load() Handles MyBase.Load
Me.Width = 1400
Me.Height = 800
Me.Top = 20
Me.Left = 50
End Sub
Private Sub Button_Individual_Click(sender As Object, e As EventArgs) Handles Button_Individual.Click
Panel_Start.Controls.Clear()
Individual.TopLevel = False
Panel_Start.Controls.Add(Individual)
Individual.Show()
End Sub
Private Sub Button_Multiple_Click(sender As Object, e As EventArgs) Handles Button_Multiple.Click
Panel_Start.Controls.Clear()
Multiple.TopLevel = False
Panel_Start.Controls.Add(Multiple)
Multiple.Show()
End Sub
End Class

142
Wardrobe/GUI/GUI.Designer.vb generated
View File

@ -58,29 +58,27 @@ Partial Class GUI
Me.DrawingPanel.BackColor = System.Drawing.SystemColors.Window
Me.DrawingPanel.Controls.Add(Me.Label10)
Me.DrawingPanel.Controls.Add(Me.Label8)
Me.DrawingPanel.Location = New System.Drawing.Point(320, 178)
Me.DrawingPanel.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.DrawingPanel.Location = New System.Drawing.Point(240, 145)
Me.DrawingPanel.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.DrawingPanel.Name = "DrawingPanel"
Me.DrawingPanel.Size = New System.Drawing.Size(1507, 689)
Me.DrawingPanel.Size = New System.Drawing.Size(1130, 560)
Me.DrawingPanel.TabIndex = 0
'
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.Location = New System.Drawing.Point(17, 593)
Me.Label10.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label10.Location = New System.Drawing.Point(13, 482)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(21, 17)
Me.Label10.Size = New System.Drawing.Size(18, 13)
Me.Label10.TabIndex = 1
Me.Label10.Text = "W"
'
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(88, 656)
Me.Label8.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label8.Location = New System.Drawing.Point(66, 533)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(16, 17)
Me.Label8.Size = New System.Drawing.Size(13, 13)
Me.Label8.TabIndex = 0
Me.Label8.Text = "L"
'
@ -94,10 +92,9 @@ Partial Class GUI
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(60, 492)
Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label1.Location = New System.Drawing.Point(45, 400)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(52, 20)
Me.Label1.Size = New System.Drawing.Size(44, 17)
Me.Label1.TabIndex = 4
Me.Label1.Text = "Width"
'
@ -105,20 +102,19 @@ Partial Class GUI
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(45, 566)
Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label2.Location = New System.Drawing.Point(34, 460)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(60, 20)
Me.Label2.Size = New System.Drawing.Size(52, 17)
Me.Label2.TabIndex = 5
Me.Label2.Text = "Length"
'
'ExportSWButton
'
Me.ExportSWButton.BackColor = System.Drawing.SystemColors.ActiveCaption
Me.ExportSWButton.Location = New System.Drawing.Point(1708, 882)
Me.ExportSWButton.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.ExportSWButton.Location = New System.Drawing.Point(1281, 717)
Me.ExportSWButton.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.ExportSWButton.Name = "ExportSWButton"
Me.ExportSWButton.Size = New System.Drawing.Size(123, 41)
Me.ExportSWButton.Size = New System.Drawing.Size(92, 33)
Me.ExportSWButton.TabIndex = 6
Me.ExportSWButton.Text = "Export"
Me.ExportSWButton.UseVisualStyleBackColor = False
@ -126,20 +122,20 @@ Partial Class GUI
'AngleButton
'
Me.AngleButton.Enabled = False
Me.AngleButton.Location = New System.Drawing.Point(705, 68)
Me.AngleButton.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.AngleButton.Location = New System.Drawing.Point(529, 55)
Me.AngleButton.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.AngleButton.Name = "AngleButton"
Me.AngleButton.Size = New System.Drawing.Size(123, 34)
Me.AngleButton.Size = New System.Drawing.Size(92, 28)
Me.AngleButton.TabIndex = 7
Me.AngleButton.Text = "Add Angle"
Me.AngleButton.UseVisualStyleBackColor = True
'
'SettingsButton
'
Me.SettingsButton.Location = New System.Drawing.Point(15, 873)
Me.SettingsButton.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.SettingsButton.Location = New System.Drawing.Point(11, 709)
Me.SettingsButton.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.SettingsButton.Name = "SettingsButton"
Me.SettingsButton.Size = New System.Drawing.Size(80, 50)
Me.SettingsButton.Size = New System.Drawing.Size(60, 41)
Me.SettingsButton.TabIndex = 12
Me.SettingsButton.Text = "Settings"
Me.SettingsButton.UseVisualStyleBackColor = True
@ -149,10 +145,10 @@ Partial Class GUI
Me.ComboBox_TypeChooser.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox_TypeChooser.FormattingEnabled = True
Me.ComboBox_TypeChooser.Items.AddRange(New Object() {"Pressure Welded", "Type A"})
Me.ComboBox_TypeChooser.Location = New System.Drawing.Point(121, 57)
Me.ComboBox_TypeChooser.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.ComboBox_TypeChooser.Location = New System.Drawing.Point(91, 46)
Me.ComboBox_TypeChooser.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.ComboBox_TypeChooser.Name = "ComboBox_TypeChooser"
Me.ComboBox_TypeChooser.Size = New System.Drawing.Size(187, 24)
Me.ComboBox_TypeChooser.Size = New System.Drawing.Size(141, 21)
Me.ComboBox_TypeChooser.TabIndex = 13
Me.ComboBox_TypeChooser.Tag = ""
'
@ -162,10 +158,10 @@ Partial Class GUI
Me.ComboBox_MeshSize.Enabled = False
Me.ComboBox_MeshSize.FormattingEnabled = True
Me.ComboBox_MeshSize.Items.AddRange(New Object() {"12x100 (B9)", "25x50 (F4)", "34x37 (H3)"})
Me.ComboBox_MeshSize.Location = New System.Drawing.Point(121, 241)
Me.ComboBox_MeshSize.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.ComboBox_MeshSize.Location = New System.Drawing.Point(91, 196)
Me.ComboBox_MeshSize.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.ComboBox_MeshSize.Name = "ComboBox_MeshSize"
Me.ComboBox_MeshSize.Size = New System.Drawing.Size(187, 24)
Me.ComboBox_MeshSize.Size = New System.Drawing.Size(141, 21)
Me.ComboBox_MeshSize.TabIndex = 14
'
'ComboBox_Thickness
@ -174,10 +170,10 @@ Partial Class GUI
Me.ComboBox_Thickness.Enabled = False
Me.ComboBox_Thickness.FormattingEnabled = True
Me.ComboBox_Thickness.Items.AddRange(New Object() {"2", "3", "4"})
Me.ComboBox_Thickness.Location = New System.Drawing.Point(121, 375)
Me.ComboBox_Thickness.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.ComboBox_Thickness.Location = New System.Drawing.Point(91, 305)
Me.ComboBox_Thickness.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.ComboBox_Thickness.Name = "ComboBox_Thickness"
Me.ComboBox_Thickness.Size = New System.Drawing.Size(187, 24)
Me.ComboBox_Thickness.Size = New System.Drawing.Size(141, 21)
Me.ComboBox_Thickness.TabIndex = 15
'
'ComboBox_Height
@ -186,20 +182,19 @@ Partial Class GUI
Me.ComboBox_Height.Enabled = False
Me.ComboBox_Height.FormattingEnabled = True
Me.ComboBox_Height.Items.AddRange(New Object() {"20", "25", "30"})
Me.ComboBox_Height.Location = New System.Drawing.Point(121, 325)
Me.ComboBox_Height.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.ComboBox_Height.Location = New System.Drawing.Point(91, 264)
Me.ComboBox_Height.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.ComboBox_Height.Name = "ComboBox_Height"
Me.ComboBox_Height.Size = New System.Drawing.Size(187, 24)
Me.ComboBox_Height.Size = New System.Drawing.Size(141, 21)
Me.ComboBox_Height.TabIndex = 16
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label3.Location = New System.Drawing.Point(61, 55)
Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label3.Location = New System.Drawing.Point(46, 45)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(45, 20)
Me.Label3.Size = New System.Drawing.Size(40, 17)
Me.Label3.TabIndex = 17
Me.Label3.Text = "Type"
'
@ -207,10 +202,9 @@ Partial Class GUI
'
Me.Label4.AutoSize = True
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label4.Location = New System.Drawing.Point(17, 242)
Me.Label4.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label4.Location = New System.Drawing.Point(13, 197)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(88, 20)
Me.Label4.Size = New System.Drawing.Size(73, 17)
Me.Label4.TabIndex = 18
Me.Label4.Text = "Mesh Size"
'
@ -218,10 +212,9 @@ Partial Class GUI
'
Me.Label5.AutoSize = True
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label5.Location = New System.Drawing.Point(19, 377)
Me.Label5.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label5.Location = New System.Drawing.Point(14, 306)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(85, 20)
Me.Label5.Size = New System.Drawing.Size(72, 17)
Me.Label5.TabIndex = 19
Me.Label5.Text = "Thickness"
'
@ -229,10 +222,9 @@ Partial Class GUI
'
Me.Label6.AutoSize = True
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label6.Location = New System.Drawing.Point(49, 325)
Me.Label6.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label6.Location = New System.Drawing.Point(37, 264)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(58, 20)
Me.Label6.Size = New System.Drawing.Size(49, 17)
Me.Label6.TabIndex = 20
Me.Label6.Text = "Height"
'
@ -240,10 +232,9 @@ Partial Class GUI
'
Me.Label7.AutoSize = True
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label7.Location = New System.Drawing.Point(525, 38)
Me.Label7.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label7.Location = New System.Drawing.Point(394, 31)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(91, 20)
Me.Label7.Size = New System.Drawing.Size(78, 17)
Me.Label7.TabIndex = 21
Me.Label7.Text = "Functions"
'
@ -253,19 +244,18 @@ Partial Class GUI
Me.ComboBox_Width.Enabled = False
Me.ComboBox_Width.FormattingEnabled = True
Me.ComboBox_Width.Items.AddRange(New Object() {"500", "700", "722", "1000"})
Me.ComboBox_Width.Location = New System.Drawing.Point(125, 492)
Me.ComboBox_Width.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.ComboBox_Width.Location = New System.Drawing.Point(94, 400)
Me.ComboBox_Width.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.ComboBox_Width.Name = "ComboBox_Width"
Me.ComboBox_Width.Size = New System.Drawing.Size(187, 24)
Me.ComboBox_Width.Size = New System.Drawing.Size(141, 21)
Me.ComboBox_Width.TabIndex = 23
'
'Button_Square
'
Me.Button_Square.Enabled = False
Me.Button_Square.Location = New System.Drawing.Point(955, 68)
Me.Button_Square.Margin = New System.Windows.Forms.Padding(4)
Me.Button_Square.Location = New System.Drawing.Point(716, 55)
Me.Button_Square.Name = "Button_Square"
Me.Button_Square.Size = New System.Drawing.Size(123, 34)
Me.Button_Square.Size = New System.Drawing.Size(92, 28)
Me.Button_Square.TabIndex = 25
Me.Button_Square.Text = "Add Square C"
Me.Button_Square.UseVisualStyleBackColor = True
@ -274,10 +264,9 @@ Partial Class GUI
'
Me.Label9.AutoSize = True
Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label9.Location = New System.Drawing.Point(17, 15)
Me.Label9.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label9.Location = New System.Drawing.Point(28, 9)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(168, 20)
Me.Label9.Size = New System.Drawing.Size(146, 17)
Me.Label9.TabIndex = 26
Me.Label9.Text = "Floor gratings data"
'
@ -287,20 +276,19 @@ Partial Class GUI
Me.ComboBox_Material.Enabled = False
Me.ComboBox_Material.FormattingEnabled = True
Me.ComboBox_Material.Items.AddRange(New Object() {"12x100 (B9)", "25x50 (F4)", "34x37 (H3)"})
Me.ComboBox_Material.Location = New System.Drawing.Point(121, 108)
Me.ComboBox_Material.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.ComboBox_Material.Location = New System.Drawing.Point(91, 88)
Me.ComboBox_Material.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.ComboBox_Material.Name = "ComboBox_Material"
Me.ComboBox_Material.Size = New System.Drawing.Size(187, 24)
Me.ComboBox_Material.Size = New System.Drawing.Size(141, 21)
Me.ComboBox_Material.TabIndex = 27
'
'Label_Material
'
Me.Label_Material.AutoSize = True
Me.Label_Material.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Material.Location = New System.Drawing.Point(37, 108)
Me.Label_Material.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
Me.Label_Material.Location = New System.Drawing.Point(28, 88)
Me.Label_Material.Name = "Label_Material"
Me.Label_Material.Size = New System.Drawing.Size(69, 20)
Me.Label_Material.Size = New System.Drawing.Size(58, 17)
Me.Label_Material.TabIndex = 28
Me.Label_Material.Text = "Material"
'
@ -308,10 +296,10 @@ Partial Class GUI
'
Me.CheckBox_WholeMeshWidths.AutoSize = True
Me.CheckBox_WholeMeshWidths.Enabled = False
Me.CheckBox_WholeMeshWidths.Location = New System.Drawing.Point(125, 453)
Me.CheckBox_WholeMeshWidths.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.CheckBox_WholeMeshWidths.Location = New System.Drawing.Point(94, 368)
Me.CheckBox_WholeMeshWidths.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.CheckBox_WholeMeshWidths.Name = "CheckBox_WholeMeshWidths"
Me.CheckBox_WholeMeshWidths.Size = New System.Drawing.Size(143, 21)
Me.CheckBox_WholeMeshWidths.Size = New System.Drawing.Size(121, 18)
Me.CheckBox_WholeMeshWidths.TabIndex = 29
Me.CheckBox_WholeMeshWidths.Text = "Whole mesh widths"
Me.CheckBox_WholeMeshWidths.UseCompatibleTextRendering = True
@ -320,27 +308,28 @@ Partial Class GUI
'TextBox_Length
'
Me.TextBox_Length.Enabled = False
Me.TextBox_Length.Location = New System.Drawing.Point(125, 566)
Me.TextBox_Length.Margin = New System.Windows.Forms.Padding(3, 2, 3, 2)
Me.TextBox_Length.Location = New System.Drawing.Point(94, 460)
Me.TextBox_Length.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.TextBox_Length.Name = "TextBox_Length"
Me.TextBox_Length.Size = New System.Drawing.Size(187, 22)
Me.TextBox_Length.Size = New System.Drawing.Size(141, 20)
Me.TextBox_Length.TabIndex = 30
'
'Button_SquareSide
'
Me.Button_SquareSide.Enabled = False
Me.Button_SquareSide.Location = New System.Drawing.Point(1224, 68)
Me.Button_SquareSide.Location = New System.Drawing.Point(918, 55)
Me.Button_SquareSide.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.Button_SquareSide.Name = "Button_SquareSide"
Me.Button_SquareSide.Size = New System.Drawing.Size(121, 35)
Me.Button_SquareSide.Size = New System.Drawing.Size(91, 28)
Me.Button_SquareSide.TabIndex = 31
Me.Button_SquareSide.Text = "Square Side"
Me.Button_SquareSide.UseVisualStyleBackColor = True
'
'GUI
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(8.0!, 16.0!)
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1540, 846)
Me.ClientSize = New System.Drawing.Size(1546, 742)
Me.Controls.Add(Me.Button_SquareSide)
Me.Controls.Add(Me.TextBox_Length)
Me.Controls.Add(Me.AngleButton)
@ -366,7 +355,6 @@ Partial Class GUI
Me.Controls.Add(Me.DrawingPanel)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Margin = New System.Windows.Forms.Padding(4)
Me.MaximizeBox = False
Me.Name = "GUI"
Me.Text = "Floor Gratings"

346
Wardrobe/GUI/Individual.Designer.vb generated Normal file
View File

@ -0,0 +1,346 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Individual
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<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
'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()
Me.Panel_Data = New System.Windows.Forms.Panel()
Me.ComboBox_Type = New System.Windows.Forms.ComboBox()
Me.ComboBox_Material = New System.Windows.Forms.ComboBox()
Me.ComboBox_Thickness = New System.Windows.Forms.ComboBox()
Me.ComboBox_Height = New System.Windows.Forms.ComboBox()
Me.ComboBox_Width = New System.Windows.Forms.ComboBox()
Me.ComboBox_Mesh = New System.Windows.Forms.ComboBox()
Me.TextBox_Length = New System.Windows.Forms.TextBox()
Me.Label_Type = New System.Windows.Forms.Label()
Me.Label_Length = New System.Windows.Forms.Label()
Me.Label_Width = New System.Windows.Forms.Label()
Me.Label_Thickness = New System.Windows.Forms.Label()
Me.Label_Height = New System.Windows.Forms.Label()
Me.Label_Mesh = New System.Windows.Forms.Label()
Me.Label_Material = New System.Windows.Forms.Label()
Me.Label_Heading = New System.Windows.Forms.Label()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Label_Recesses = New System.Windows.Forms.Label()
Me.Button_Angle_Corner = New System.Windows.Forms.Button()
Me.Button_Square_Corner = New System.Windows.Forms.Button()
Me.Button_Angle_Side = New System.Windows.Forms.Button()
Me.Button_Square_Side = New System.Windows.Forms.Button()
Me.Button_Square_Middle = New System.Windows.Forms.Button()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.Panel_Data.SuspendLayout()
Me.Panel1.SuspendLayout()
Me.SuspendLayout()
'
'Panel_Data
'
Me.Panel_Data.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.Panel_Data.BackColor = System.Drawing.SystemColors.GradientActiveCaption
Me.Panel_Data.Controls.Add(Me.Label_Heading)
Me.Panel_Data.Controls.Add(Me.Label_Material)
Me.Panel_Data.Controls.Add(Me.Label_Mesh)
Me.Panel_Data.Controls.Add(Me.Label_Height)
Me.Panel_Data.Controls.Add(Me.Label_Thickness)
Me.Panel_Data.Controls.Add(Me.Label_Width)
Me.Panel_Data.Controls.Add(Me.Label_Length)
Me.Panel_Data.Controls.Add(Me.Label_Type)
Me.Panel_Data.Controls.Add(Me.TextBox_Length)
Me.Panel_Data.Controls.Add(Me.ComboBox_Mesh)
Me.Panel_Data.Controls.Add(Me.ComboBox_Width)
Me.Panel_Data.Controls.Add(Me.ComboBox_Thickness)
Me.Panel_Data.Controls.Add(Me.ComboBox_Height)
Me.Panel_Data.Controls.Add(Me.ComboBox_Material)
Me.Panel_Data.Controls.Add(Me.ComboBox_Type)
Me.Panel_Data.Location = New System.Drawing.Point(0, 0)
Me.Panel_Data.Margin = New System.Windows.Forms.Padding(0)
Me.Panel_Data.Name = "Panel_Data"
Me.Panel_Data.Size = New System.Drawing.Size(266, 800)
Me.Panel_Data.TabIndex = 0
'
'ComboBox_Type
'
Me.ComboBox_Type.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox_Type.FormattingEnabled = True
Me.ComboBox_Type.Location = New System.Drawing.Point(110, 101)
Me.ComboBox_Type.Name = "ComboBox_Type"
Me.ComboBox_Type.Size = New System.Drawing.Size(121, 21)
Me.ComboBox_Type.TabIndex = 0
'
'ComboBox_Material
'
Me.ComboBox_Material.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox_Material.FormattingEnabled = True
Me.ComboBox_Material.Location = New System.Drawing.Point(110, 142)
Me.ComboBox_Material.Name = "ComboBox_Material"
Me.ComboBox_Material.Size = New System.Drawing.Size(121, 21)
Me.ComboBox_Material.TabIndex = 1
'
'ComboBox_Thickness
'
Me.ComboBox_Thickness.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox_Thickness.FormattingEnabled = True
Me.ComboBox_Thickness.Location = New System.Drawing.Point(110, 323)
Me.ComboBox_Thickness.Name = "ComboBox_Thickness"
Me.ComboBox_Thickness.Size = New System.Drawing.Size(121, 21)
Me.ComboBox_Thickness.TabIndex = 3
'
'ComboBox_Height
'
Me.ComboBox_Height.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox_Height.FormattingEnabled = True
Me.ComboBox_Height.Location = New System.Drawing.Point(110, 278)
Me.ComboBox_Height.Name = "ComboBox_Height"
Me.ComboBox_Height.Size = New System.Drawing.Size(121, 21)
Me.ComboBox_Height.TabIndex = 2
'
'ComboBox_Width
'
Me.ComboBox_Width.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox_Width.FormattingEnabled = True
Me.ComboBox_Width.Location = New System.Drawing.Point(110, 393)
Me.ComboBox_Width.Name = "ComboBox_Width"
Me.ComboBox_Width.Size = New System.Drawing.Size(121, 21)
Me.ComboBox_Width.TabIndex = 4
'
'ComboBox_Mesh
'
Me.ComboBox_Mesh.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.ComboBox_Mesh.FormattingEnabled = True
Me.ComboBox_Mesh.Location = New System.Drawing.Point(110, 233)
Me.ComboBox_Mesh.Name = "ComboBox_Mesh"
Me.ComboBox_Mesh.Size = New System.Drawing.Size(121, 21)
Me.ComboBox_Mesh.TabIndex = 6
'
'TextBox_Length
'
Me.TextBox_Length.Location = New System.Drawing.Point(110, 433)
Me.TextBox_Length.Name = "TextBox_Length"
Me.TextBox_Length.Size = New System.Drawing.Size(121, 20)
Me.TextBox_Length.TabIndex = 7
'
'Label_Type
'
Me.Label_Type.AutoSize = True
Me.Label_Type.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Type.Location = New System.Drawing.Point(64, 101)
Me.Label_Type.Name = "Label_Type"
Me.Label_Type.Size = New System.Drawing.Size(40, 16)
Me.Label_Type.TabIndex = 8
Me.Label_Type.Text = "Type"
'
'Label_Length
'
Me.Label_Length.AutoSize = True
Me.Label_Length.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Length.Location = New System.Drawing.Point(52, 433)
Me.Label_Length.Name = "Label_Length"
Me.Label_Length.Size = New System.Drawing.Size(52, 17)
Me.Label_Length.TabIndex = 9
Me.Label_Length.Text = "Length"
'
'Label_Width
'
Me.Label_Width.AutoSize = True
Me.Label_Width.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Width.Location = New System.Drawing.Point(60, 393)
Me.Label_Width.Name = "Label_Width"
Me.Label_Width.Size = New System.Drawing.Size(44, 17)
Me.Label_Width.TabIndex = 10
Me.Label_Width.Text = "Width"
'
'Label_Thickness
'
Me.Label_Thickness.AutoSize = True
Me.Label_Thickness.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Thickness.Location = New System.Drawing.Point(32, 324)
Me.Label_Thickness.Name = "Label_Thickness"
Me.Label_Thickness.Size = New System.Drawing.Size(72, 17)
Me.Label_Thickness.TabIndex = 11
Me.Label_Thickness.Text = "Thickness"
'
'Label_Height
'
Me.Label_Height.AutoSize = True
Me.Label_Height.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Height.Location = New System.Drawing.Point(55, 279)
Me.Label_Height.Name = "Label_Height"
Me.Label_Height.Size = New System.Drawing.Size(49, 17)
Me.Label_Height.TabIndex = 12
Me.Label_Height.Text = "Height"
'
'Label_Mesh
'
Me.Label_Mesh.AutoSize = True
Me.Label_Mesh.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Mesh.Location = New System.Drawing.Point(31, 233)
Me.Label_Mesh.Name = "Label_Mesh"
Me.Label_Mesh.Size = New System.Drawing.Size(73, 17)
Me.Label_Mesh.TabIndex = 13
Me.Label_Mesh.Text = "Mesh Size"
'
'Label_Material
'
Me.Label_Material.AutoSize = True
Me.Label_Material.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Material.Location = New System.Drawing.Point(46, 143)
Me.Label_Material.Name = "Label_Material"
Me.Label_Material.Size = New System.Drawing.Size(58, 17)
Me.Label_Material.TabIndex = 14
Me.Label_Material.Text = "Material"
'
'Label_Heading
'
Me.Label_Heading.AutoSize = True
Me.Label_Heading.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Heading.Location = New System.Drawing.Point(56, 36)
Me.Label_Heading.Name = "Label_Heading"
Me.Label_Heading.Size = New System.Drawing.Size(166, 20)
Me.Label_Heading.TabIndex = 15
Me.Label_Heading.Text = "Grating Parameters"
'
'Panel1
'
Me.Panel1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Panel1.BackColor = System.Drawing.Color.Silver
Me.Panel1.Controls.Add(Me.Button_Square_Middle)
Me.Panel1.Controls.Add(Me.Button_Square_Side)
Me.Panel1.Controls.Add(Me.Button_Angle_Side)
Me.Panel1.Controls.Add(Me.Button_Square_Corner)
Me.Panel1.Controls.Add(Me.Button_Angle_Corner)
Me.Panel1.Controls.Add(Me.Label_Recesses)
Me.Panel1.Location = New System.Drawing.Point(0, 0)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(1357, 122)
Me.Panel1.TabIndex = 1
'
'Label_Recesses
'
Me.Label_Recesses.AutoSize = True
Me.Label_Recesses.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label_Recesses.Location = New System.Drawing.Point(329, 36)
Me.Label_Recesses.Name = "Label_Recesses"
Me.Label_Recesses.Size = New System.Drawing.Size(88, 20)
Me.Label_Recesses.TabIndex = 16
Me.Label_Recesses.Text = "Recesses"
'
'Button_Angle_Corner
'
Me.Button_Angle_Corner.Location = New System.Drawing.Point(481, 36)
Me.Button_Angle_Corner.Name = "Button_Angle_Corner"
Me.Button_Angle_Corner.Size = New System.Drawing.Size(50, 50)
Me.Button_Angle_Corner.TabIndex = 17
Me.Button_Angle_Corner.Text = "Angle Corner"
Me.Button_Angle_Corner.UseVisualStyleBackColor = True
'
'Button_Square_Corner
'
Me.Button_Square_Corner.Location = New System.Drawing.Point(839, 36)
Me.Button_Square_Corner.Name = "Button_Square_Corner"
Me.Button_Square_Corner.Size = New System.Drawing.Size(50, 50)
Me.Button_Square_Corner.TabIndex = 18
Me.Button_Square_Corner.Text = "Square Corner"
Me.Button_Square_Corner.UseVisualStyleBackColor = True
'
'Button_Angle_Side
'
Me.Button_Angle_Side.Location = New System.Drawing.Point(660, 36)
Me.Button_Angle_Side.Name = "Button_Angle_Side"
Me.Button_Angle_Side.Size = New System.Drawing.Size(50, 50)
Me.Button_Angle_Side.TabIndex = 19
Me.Button_Angle_Side.Text = "Angle Side"
Me.Button_Angle_Side.UseVisualStyleBackColor = True
'
'Button_Square_Side
'
Me.Button_Square_Side.Location = New System.Drawing.Point(1018, 36)
Me.Button_Square_Side.Name = "Button_Square_Side"
Me.Button_Square_Side.Size = New System.Drawing.Size(50, 50)
Me.Button_Square_Side.TabIndex = 20
Me.Button_Square_Side.Text = "Square Side"
Me.Button_Square_Side.UseVisualStyleBackColor = True
'
'Button_Square_Middle
'
Me.Button_Square_Middle.Location = New System.Drawing.Point(1197, 36)
Me.Button_Square_Middle.Name = "Button_Square_Middle"
Me.Button_Square_Middle.Size = New System.Drawing.Size(50, 50)
Me.Button_Square_Middle.TabIndex = 21
Me.Button_Square_Middle.Text = "Square Middle"
Me.Button_Square_Middle.UseVisualStyleBackColor = True
'
'Panel2
'
Me.Panel2.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Panel2.BackColor = System.Drawing.Color.White
Me.Panel2.Location = New System.Drawing.Point(262, 121)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(1081, 613)
Me.Panel2.TabIndex = 2
'
'Individual
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.Control
Me.ClientSize = New System.Drawing.Size(1342, 733)
Me.Controls.Add(Me.Panel_Data)
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.Panel2)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Me.Name = "Individual"
Me.Text = "Individual"
Me.Panel_Data.ResumeLayout(False)
Me.Panel_Data.PerformLayout()
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents Panel_Data As Panel
Friend WithEvents TextBox_Length As TextBox
Friend WithEvents ComboBox_Mesh As ComboBox
Friend WithEvents ComboBox_Width As ComboBox
Friend WithEvents ComboBox_Thickness As ComboBox
Friend WithEvents ComboBox_Height As ComboBox
Friend WithEvents ComboBox_Material As ComboBox
Friend WithEvents ComboBox_Type As ComboBox
Friend WithEvents Label_Type As Label
Friend WithEvents Label_Heading As Label
Friend WithEvents Label_Material As Label
Friend WithEvents Label_Mesh As Label
Friend WithEvents Label_Height As Label
Friend WithEvents Label_Thickness As Label
Friend WithEvents Label_Width As Label
Friend WithEvents Label_Length As Label
Friend WithEvents Panel1 As Panel
Friend WithEvents Button_Square_Middle As Button
Friend WithEvents Button_Square_Side As Button
Friend WithEvents Button_Angle_Side As Button
Friend WithEvents Button_Square_Corner As Button
Friend WithEvents Button_Angle_Corner As Button
Friend WithEvents Label_Recesses As Label
Friend WithEvents Panel2 As Panel
End Class

120
Wardrobe/GUI/Individual.resx Normal file
View File

@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

9
Wardrobe/GUI/Individual.vb Normal file
View File

@ -0,0 +1,9 @@
Public Class Individual
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox_Length.TextChanged
End Sub
Private Sub Label1_Click(sender As Object, e As EventArgs) Handles Label_Type.Click
End Sub
End Class

39
Wardrobe/GUI/Multiple.Designer.vb generated Normal file
View File

@ -0,0 +1,39 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Multiple
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<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
'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()
Me.SuspendLayout()
'
'Multiple
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.SystemColors.ActiveCaption
Me.ClientSize = New System.Drawing.Size(1165, 691)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Me.Name = "Multiple"
Me.Text = "Multiple"
Me.ResumeLayout(False)
End Sub
End Class

120
Wardrobe/GUI/Multiple.resx Normal file
View File

@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

3
Wardrobe/GUI/Multiple.vb Normal file
View File

@ -0,0 +1,3 @@
Public Class Multiple
End Class

2
Wardrobe/My Project/Application.Designer.vb generated
View File

@ -32,7 +32,7 @@ Namespace My
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.Wardrobe.GUI
Me.MainForm = Global.Wardrobe.AppForm
End Sub
End Class
End Namespace

2
Wardrobe/My Project/Application.myapp
View File

@ -1,7 +1,7 @@
<?xml version="1.0" encoding="utf-8"?>
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<MySubMain>true</MySubMain>
<MainForm>GUI</MainForm>
<MainForm>AppForm</MainForm>
<SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>

27
Wardrobe/Wardrobe.vbproj
View File

@ -77,7 +77,25 @@
<Compile Include="Gratings Data\Database.vb" />
<Compile Include="Gratings Data\Data.vb" />
<Compile Include="Gratings Data\User_Input.vb" />
<Compile Include="GUI\AppForm.Designer.vb">
<DependentUpon>AppForm.vb</DependentUpon>
</Compile>
<Compile Include="GUI\AppForm.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="GUI\Draw_Grating.vb" />
<Compile Include="GUI\Individual.Designer.vb">
<DependentUpon>Individual.vb</DependentUpon>
</Compile>
<Compile Include="GUI\Individual.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="GUI\Multiple.Designer.vb">
<DependentUpon>Multiple.vb</DependentUpon>
</Compile>
<Compile Include="GUI\Multiple.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="GUI\Settings.vb" />
<Compile Include="GUI\GUI.vb">
<SubType>Form</SubType>
@ -109,9 +127,18 @@
<Compile Include="SolidWorks\Model_3D.vb" />
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="GUI\AppForm.resx">
<DependentUpon>AppForm.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="GUI\GUI.resx">
<DependentUpon>GUI.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="GUI\Individual.resx">
<DependentUpon>Individual.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="GUI\Multiple.resx">
<DependentUpon>Multiple.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>