_ Partial Class Form1 Inherits System.Windows.Forms.Form 'Form overrides dispose to clean up the component list. _ 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. _ Private Sub InitializeComponent() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1)) Me.RichTextBox1 = New System.Windows.Forms.RichTextBox() Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel() Me.ToolStripStatusLabel2 = New System.Windows.Forms.ToolStripStatusLabel() Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog() Me.tsbOpenFile = New System.Windows.Forms.ToolStripButton() Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() Me.tsbFileName = New System.Windows.Forms.ToolStripTextBox() Me.tsbConvert = New System.Windows.Forms.ToolStripButton() Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator() Me.tsbSaveAs = New System.Windows.Forms.ToolStripButton() Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton() Me.ToolStripLabel3 = New System.Windows.Forms.ToolStripLabel() Me.tsbPointsOnly = New System.Windows.Forms.ToolStripButton() Me.tsbHelp = New System.Windows.Forms.ToolStripButton() Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator() Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator() Me.ToolStripComboBox2 = New System.Windows.Forms.ToolStripComboBox() Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel() Me.ToolStripComboBox1 = New System.Windows.Forms.ToolStripComboBox() Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel() Me.StatusStrip1.SuspendLayout() Me.ToolStrip1.SuspendLayout() Me.SuspendLayout() ' 'RichTextBox1 ' Me.RichTextBox1.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.RichTextBox1.BackColor = System.Drawing.SystemColors.ControlLightLight Me.RichTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.RichTextBox1.Font = New System.Drawing.Font("Courier New", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte)) Me.RichTextBox1.Location = New System.Drawing.Point(9, 29) Me.RichTextBox1.Margin = New System.Windows.Forms.Padding(0) Me.RichTextBox1.Name = "RichTextBox1" Me.RichTextBox1.ReadOnly = True Me.RichTextBox1.Size = New System.Drawing.Size(1233, 690) Me.RichTextBox1.TabIndex = 1 Me.RichTextBox1.Text = "" ' 'StatusStrip1 ' Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1, Me.ToolStripStatusLabel2}) Me.StatusStrip1.Location = New System.Drawing.Point(0, 719) Me.StatusStrip1.Name = "StatusStrip1" Me.StatusStrip1.Size = New System.Drawing.Size(1251, 22) Me.StatusStrip1.TabIndex = 2 Me.StatusStrip1.Text = "StatusStrip1" ' 'ToolStripStatusLabel1 ' Me.ToolStripStatusLabel1.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte)) Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1" Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(99, 17) Me.ToolStripStatusLabel1.Text = "Made by Boris Bilc" ' 'ToolStripStatusLabel2 ' Me.ToolStripStatusLabel2.Name = "ToolStripStatusLabel2" Me.ToolStripStatusLabel2.Size = New System.Drawing.Size(0, 17) ' 'OpenFileDialog1 ' Me.OpenFileDialog1.DefaultExt = "*.GSI" Me.OpenFileDialog1.Filter = "GSI Files|*.GSI" ' 'SaveFileDialog1 ' Me.SaveFileDialog1.DefaultExt = "*.txt" Me.SaveFileDialog1.Title = "Save As..." ' 'tsbOpenFile ' Me.tsbOpenFile.Image = CType(resources.GetObject("tsbOpenFile.Image"), System.Drawing.Image) Me.tsbOpenFile.ImageTransparentColor = System.Drawing.Color.Magenta Me.tsbOpenFile.Name = "tsbOpenFile" Me.tsbOpenFile.Size = New System.Drawing.Size(83, 26) Me.tsbOpenFile.Text = "Odpri GSI" Me.tsbOpenFile.ToolTipText = "Open File..." ' 'ToolStripSeparator1 ' Me.ToolStripSeparator1.Name = "ToolStripSeparator1" Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 29) ' 'tsbFileName ' Me.tsbFileName.AutoSize = False Me.tsbFileName.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte)) Me.tsbFileName.Name = "tsbFileName" Me.tsbFileName.ReadOnly = True Me.tsbFileName.Size = New System.Drawing.Size(160, 23) Me.tsbFileName.Text = "Odpri GSI datoteko..." ' 'tsbConvert ' Me.tsbConvert.Enabled = False Me.tsbConvert.Image = CType(resources.GetObject("tsbConvert.Image"), System.Drawing.Image) Me.tsbConvert.ImageTransparentColor = System.Drawing.Color.Magenta Me.tsbConvert.Name = "tsbConvert" Me.tsbConvert.Size = New System.Drawing.Size(77, 26) Me.tsbConvert.Text = "Poročilo" Me.tsbConvert.ToolTipText = "Convert" ' 'ToolStripSeparator2 ' Me.ToolStripSeparator2.Name = "ToolStripSeparator2" Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 29) ' 'tsbSaveAs ' Me.tsbSaveAs.Enabled = False Me.tsbSaveAs.Image = CType(resources.GetObject("tsbSaveAs.Image"), System.Drawing.Image) Me.tsbSaveAs.ImageTransparentColor = System.Drawing.Color.Magenta Me.tsbSaveAs.Name = "tsbSaveAs" Me.tsbSaveAs.Size = New System.Drawing.Size(78, 26) Me.tsbSaveAs.Text = "Shrani ..." ' 'ToolStrip1 ' Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(22, 22) Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbFileName, Me.tsbOpenFile, Me.ToolStripSeparator2, Me.ToolStripButton1, Me.ToolStripSeparator1, Me.ToolStripLabel3, Me.tsbConvert, Me.tsbPointsOnly, Me.tsbHelp, Me.ToolStripSeparator4, Me.tsbSaveAs, Me.ToolStripSeparator3, Me.ToolStripComboBox2, Me.ToolStripLabel2, Me.ToolStripComboBox1, Me.ToolStripLabel1}) Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) Me.ToolStrip1.Name = "ToolStrip1" Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0) Me.ToolStrip1.RenderMode = System.Windows.Forms.ToolStripRenderMode.System Me.ToolStrip1.Size = New System.Drawing.Size(1251, 29) Me.ToolStrip1.TabIndex = 0 Me.ToolStrip1.Text = "ToolStrip1" ' 'ToolStripButton1 ' Me.ToolStripButton1.Image = CType(resources.GetObject("ToolStripButton1.Image"), System.Drawing.Image) Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton1.Name = "ToolStripButton1" Me.ToolStripButton1.Size = New System.Drawing.Size(76, 26) Me.ToolStripButton1.Text = "Urejanje" ' 'ToolStripLabel3 ' Me.ToolStripLabel3.Name = "ToolStripLabel3" Me.ToolStripLabel3.Size = New System.Drawing.Size(97, 26) Me.ToolStripLabel3.Text = "Izvoz podatkov >" ' 'tsbPointsOnly ' Me.tsbPointsOnly.Enabled = False Me.tsbPointsOnly.Image = CType(resources.GetObject("tsbPointsOnly.Image"), System.Drawing.Image) Me.tsbPointsOnly.ImageTransparentColor = System.Drawing.Color.Magenta Me.tsbPointsOnly.Name = "tsbPointsOnly" Me.tsbPointsOnly.Size = New System.Drawing.Size(63, 26) Me.tsbPointsOnly.Text = "Točke" Me.tsbPointsOnly.ToolTipText = "Points Only" ' 'tsbHelp ' Me.tsbHelp.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.tsbHelp.Image = CType(resources.GetObject("tsbHelp.Image"), System.Drawing.Image) Me.tsbHelp.ImageTransparentColor = System.Drawing.Color.Magenta Me.tsbHelp.Name = "tsbHelp" Me.tsbHelp.Size = New System.Drawing.Size(71, 26) Me.tsbHelp.Text = "Pomoč" ' 'ToolStripSeparator4 ' Me.ToolStripSeparator4.Name = "ToolStripSeparator4" Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 29) ' 'ToolStripSeparator3 ' Me.ToolStripSeparator3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripSeparator3.Name = "ToolStripSeparator3" Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 29) ' 'ToolStripComboBox2 ' Me.ToolStripComboBox2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripComboBox2.DropDownWidth = 50 Me.ToolStripComboBox2.FlatStyle = System.Windows.Forms.FlatStyle.System Me.ToolStripComboBox2.Items.AddRange(New Object() {"Pika", "Vejica"}) Me.ToolStripComboBox2.Name = "ToolStripComboBox2" Me.ToolStripComboBox2.Size = New System.Drawing.Size(75, 29) ' 'ToolStripLabel2 ' Me.ToolStripLabel2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripLabel2.Name = "ToolStripLabel2" Me.ToolStripLabel2.Size = New System.Drawing.Size(56, 26) Me.ToolStripLabel2.Text = "Decimale" ' 'ToolStripComboBox1 ' Me.ToolStripComboBox1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.System Me.ToolStripComboBox1.Items.AddRange(New Object() {"Da", "Ne"}) Me.ToolStripComboBox1.Name = "ToolStripComboBox1" Me.ToolStripComboBox1.Size = New System.Drawing.Size(75, 29) Me.ToolStripComboBox1.Text = "Da" ' 'ToolStripLabel1 ' Me.ToolStripLabel1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right Me.ToolStripLabel1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text Me.ToolStripLabel1.Image = CType(resources.GetObject("ToolStripLabel1.Image"), System.Drawing.Image) Me.ToolStripLabel1.Name = "ToolStripLabel1" Me.ToolStripLabel1.Size = New System.Drawing.Size(101, 26) Me.ToolStripLabel1.Text = "Uporabi kodiranje" ' 'Form1 ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1251, 741) Me.Controls.Add(Me.StatusStrip1) Me.Controls.Add(Me.RichTextBox1) Me.Controls.Add(Me.ToolStrip1) Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte)) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.MinimumSize = New System.Drawing.Size(1000, 480) Me.Name = "Form1" Me.Text = "TPS1100 Convert" Me.StatusStrip1.ResumeLayout(False) Me.StatusStrip1.PerformLayout() Me.ToolStrip1.ResumeLayout(False) Me.ToolStrip1.PerformLayout() Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents RichTextBox1 As RichTextBox Friend WithEvents StatusStrip1 As StatusStrip Friend WithEvents OpenFileDialog1 As OpenFileDialog Friend WithEvents SaveFileDialog1 As SaveFileDialog Friend WithEvents tsbOpenFile As ToolStripButton Friend WithEvents ToolStripSeparator1 As ToolStripSeparator Friend WithEvents tsbFileName As ToolStripTextBox Friend WithEvents tsbConvert As ToolStripButton Friend WithEvents ToolStripSeparator2 As ToolStripSeparator Friend WithEvents tsbSaveAs As ToolStripButton Friend WithEvents ToolStrip1 As ToolStrip Friend WithEvents ToolStripSeparator3 As ToolStripSeparator Friend WithEvents ToolStripLabel1 As ToolStripLabel Friend WithEvents ToolStripComboBox1 As ToolStripComboBox Friend WithEvents ToolStripLabel2 As ToolStripLabel Friend WithEvents ToolStripComboBox2 As ToolStripComboBox Friend WithEvents ToolStripStatusLabel1 As ToolStripStatusLabel Friend WithEvents ToolStripStatusLabel2 As ToolStripStatusLabel Friend WithEvents tsbPointsOnly As ToolStripButton Friend WithEvents tsbHelp As ToolStripButton Friend WithEvents ToolStripSeparator4 As ToolStripSeparator Friend WithEvents ToolStripButton1 As ToolStripButton Friend WithEvents ToolStripLabel3 As ToolStripLabel End Class