boris/tps1100-convert
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

Compare commits

base: boris:v0.2
Branches Tags
boris:main
boris:v2.8.0.2 boris:latest boris:2.7.0.8 boris:2.7.0.4 boris:2.7.0.3 boris:2.7.0.0 boris:2.5.0.8 boris:2.5.0.7 boris:2.5.0.6 boris:2.5.0.5 boris:2.5.0.4 boris:v0.2
...
compare: boris:2.5.0.7
Branches Tags
boris:main
boris:v2.8.0.2 boris:latest boris:2.7.0.8 boris:2.7.0.4 boris:2.7.0.3 boris:2.7.0.0 boris:2.5.0.8 boris:2.5.0.7 boris:2.5.0.6 boris:2.5.0.5 boris:2.5.0.4 boris:v0.2

12 Commits
v0.2 ... 2.5.0.7

Author SHA1 Message Date
boris
cc1e797316 ver. 2.5.0.7 2024-06-11 03:16:44 +02:00
boris
10f051ba7a Readme 2 2024-06-11 02:48:23 +02:00
boris
76c615df42 README update 2024-06-11 02:47:28 +02:00
boris
c5bff45116 Popravki #2 - 2.5.0.6 2024-06-11 02:38:17 +02:00
boris
d1b495d08e Posodobitev - 2.5.0.6 2024-06-11 02:02:19 +02:00
boris
c3f9ca6f05 Verzija 2.5.0.5 2024-06-10 21:30:16 +02:00
boris
2049936298 Release publish 2.5.0.4 2024-06-10 21:01:21 +02:00
boris
8d7ce390d5 Nova vaerzija 2.5.0.4 2024-06-10 20:57:35 +02:00
boris
9352d85147 Removed INI parser 2024-06-07 00:13:45 +02:00
boris
358294e85b Urejanje podatkov - v1 2024-06-07 00:11:48 +02:00
boris
551fa7691b popravki #1 2024-06-02 05:39:56 +02:00
boris
5a2b5bae31 priprava - v2 2024-06-02 05:35:03 +02:00
81 changed files with 9752 additions and 441 deletions
Expand all files Collapse all files

2
.gitignore vendored
View File

@ -27,7 +27,7 @@ x86/
[Aa][Rr][Mm]/
[Aa][Rr][Mm]64/
bld/
[Bb]in/
#[Bb]in/
[Oo]bj/
[Oo]ut/
[Ll]og/

27
App.config
View File

@ -1,6 +1,33 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="TPS1100_Convert.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
</startup>
<userSettings>
<TPS1100_Convert.My.MySettings>
<setting name="ZadnjaMapa" serializeAs="String">
<value>C:\</value>
</setting>
<setting name="DecimalnoLocilo" serializeAs="String">
<value>Pika</value>
</setting>
<setting name="KodeUporabnik" serializeAs="String">
<value>Da</value>
</setting>
<setting name="Datoteka" serializeAs="String">
<value />
</setting>
<setting name="Stolpci" serializeAs="String">
<value>0</value>
</setting>
<setting name="DatLogfile" serializeAs="String">
<value />
</setting>
</TPS1100_Convert.My.MySettings>
</userSettings>
</configuration>

12
ApplicationEvents.vb Normal file
View File

@ -0,0 +1,12 @@
Namespace My
' The following events are available for MyApplication:
' Startup: Raised when the application starts, before the startup form is created.
' Shutdown: Raised after all application forms are closed. This event is not raised if the application terminates abnormally.
' UnhandledException: Raised if the application encounters an unhandled exception.
' StartupNextInstance: Raised when launching a single-instance application and the application is already active.
' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected.
Partial Friend Class MyApplication
End Class
End Namespace

265
Form1.Designer.vb generated
View File

@ -1,9 +1,9 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class Form1
Inherits System.Windows.Forms.Form
'Form overrides dispose to clean up the component list.
<System.Diagnostics.DebuggerNonUserCode()> _
<System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
@ -20,30 +20,37 @@ Partial Class Form1
'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()> _
<System.Diagnostics.DebuggerStepThrough()>
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.ToolStripProgressBar1 = New System.Windows.Forms.ToolStripProgressBar()
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.tsbOpenFile = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.LabelDatoteka = New System.Windows.Forms.ToolStripLabel()
Me.ButtonUrediDat = New System.Windows.Forms.ToolStripButton()
Me.tsbConvert = New System.Windows.Forms.ToolStripButton()
Me.tsbPointsOnly = New System.Windows.Forms.ToolStripButton()
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.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
Me.tsbHelp = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
Me.tsbSaveAs = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButtonNast = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripComboBox1 = New System.Windows.Forms.ToolStripComboBox()
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
Me.tsbDecimale = New System.Windows.Forms.ToolStripComboBox()
Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
Me.tsbStolpci = New System.Windows.Forms.ToolStripComboBox()
Me.ToolStripLabel3 = New System.Windows.Forms.ToolStripLabel()
Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
Me.StatusStrip1.SuspendLayout()
Me.ToolStrip1.SuspendLayout()
Me.SuspendLayout()
@ -54,31 +61,41 @@ Partial Class Form1
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.BorderStyle = System.Windows.Forms.BorderStyle.None
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(0, 29)
Me.RichTextBox1.Location = New System.Drawing.Point(9, 39)
Me.RichTextBox1.Margin = New System.Windows.Forms.Padding(0)
Me.RichTextBox1.Name = "RichTextBox1"
Me.RichTextBox1.ReadOnly = True
Me.RichTextBox1.Size = New System.Drawing.Size(1251, 690)
Me.RichTextBox1.Size = New System.Drawing.Size(1233, 680)
Me.RichTextBox1.TabIndex = 1
Me.RichTextBox1.Text = ""
Me.RichTextBox1.Text = resources.GetString("RichTextBox1.Text")
Me.RichTextBox1.WordWrap = False
'
'StatusStrip1
'
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1, Me.ToolStripStatusLabel2})
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripProgressBar1, 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"
'
'ToolStripProgressBar1
'
Me.ToolStripProgressBar1.ForeColor = System.Drawing.Color.LimeGreen
Me.ToolStripProgressBar1.Margin = New System.Windows.Forms.Padding(10, 3, 10, 3)
Me.ToolStripProgressBar1.Name = "ToolStripProgressBar1"
Me.ToolStripProgressBar1.Size = New System.Drawing.Size(100, 16)
Me.ToolStripProgressBar1.Step = 1
Me.ToolStripProgressBar1.Style = System.Windows.Forms.ProgressBarStyle.Continuous
'
'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"
Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(236, 17)
Me.ToolStripStatusLabel1.Text = "Made by 2B geoinformatika d.o.o. / Boris Bilc"
'
'ToolStripStatusLabel2
'
@ -95,15 +112,6 @@ Partial Class Form1
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"
@ -112,79 +120,124 @@ Partial Class Form1
'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.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.tsbFileName.Font = New System.Drawing.Font("Segoe UI Semibold", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
Me.tsbFileName.Margin = New System.Windows.Forms.Padding(5, 0, 5, 0)
Me.tsbFileName.Name = "tsbFileName"
Me.tsbFileName.ReadOnly = True
Me.tsbFileName.Size = New System.Drawing.Size(160, 23)
Me.tsbFileName.Size = New System.Drawing.Size(200, 25)
Me.tsbFileName.Text = "Odpri GSI datoteko..."
'
'tsbConvert
'ToolStrip1
'
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"
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.tsbOpenFile, Me.ToolStripSeparator2, Me.LabelDatoteka, Me.tsbFileName, Me.ButtonUrediDat, Me.ToolStripSeparator1, Me.tsbConvert, Me.tsbPointsOnly, Me.tsbHelp, Me.ToolStripSeparator4, Me.tsbSaveAs, Me.ToolStripButtonNast, Me.ToolStripSeparator3, Me.ToolStripComboBox1, Me.ToolStripLabel1, Me.tsbDecimale, Me.ToolStripLabel2, Me.tsbStolpci, Me.ToolStripLabel3, Me.ToolStripSeparator5})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(10, 5, 10, 5)
Me.ToolStrip1.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
Me.ToolStrip1.Size = New System.Drawing.Size(1251, 39)
Me.ToolStrip1.TabIndex = 0
Me.ToolStrip1.Text = "ToolStrip1"
'
'tsbOpenFile
'
Me.tsbOpenFile.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_opened_folder_50
Me.tsbOpenFile.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbOpenFile.Name = "tsbOpenFile"
Me.tsbOpenFile.Size = New System.Drawing.Size(72, 26)
Me.tsbOpenFile.Text = "Odpri..."
Me.tsbOpenFile.ToolTipText = "Izberi GSI datoteko..."
'
'ToolStripSeparator2
'
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 29)
'
'LabelDatoteka
'
Me.LabelDatoteka.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.LabelDatoteka.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_no_entry_50
Me.LabelDatoteka.Name = "LabelDatoteka"
Me.LabelDatoteka.Size = New System.Drawing.Size(22, 26)
Me.LabelDatoteka.Text = "Datoteka"
'
'ButtonUrediDat
'
Me.ButtonUrediDat.Enabled = False
Me.ButtonUrediDat.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_edit_50
Me.ButtonUrediDat.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ButtonUrediDat.Name = "ButtonUrediDat"
Me.ButtonUrediDat.Size = New System.Drawing.Size(61, 26)
Me.ButtonUrediDat.Text = "Uredi"
Me.ButtonUrediDat.ToolTipText = "Uredi GSI"
'
'tsbConvert
'
Me.tsbConvert.Enabled = False
Me.tsbConvert.Font = New System.Drawing.Font("Segoe UI Semibold", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.tsbConvert.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_land_surveying_48
Me.tsbConvert.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbConvert.Name = "tsbConvert"
Me.tsbConvert.Size = New System.Drawing.Size(73, 26)
Me.tsbConvert.Text = "Meritve"
Me.tsbConvert.ToolTipText = "Izvozi zapisnik meritev."
'
'tsbPointsOnly
'
Me.tsbPointsOnly.Enabled = False
Me.tsbPointsOnly.Font = New System.Drawing.Font("Segoe UI Semibold", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.tsbPointsOnly.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_connection_status_on_48
Me.tsbPointsOnly.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbPointsOnly.Name = "tsbPointsOnly"
Me.tsbPointsOnly.Size = New System.Drawing.Size(64, 26)
Me.tsbPointsOnly.Text = "Točke"
Me.tsbPointsOnly.ToolTipText = "Izvozi koordinate točk."
'
'tsbHelp
'
Me.tsbHelp.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.tsbHelp.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_info_50
Me.tsbHelp.ImageTransparentColor = System.Drawing.Color.Magenta
Me.tsbHelp.Name = "tsbHelp"
Me.tsbHelp.Size = New System.Drawing.Size(54, 26)
Me.tsbHelp.Text = "Info"
Me.tsbHelp.ToolTipText = "O programu..."
'
'ToolStripSeparator4
'
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
Me.ToolStripSeparator4.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.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_save_as_50
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
'ToolStripButtonNast
'
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.tsbOpenFile, Me.ToolStripSeparator2, Me.tsbFileName, Me.ToolStripSeparator1, Me.tsbConvert, Me.tsbPointsOnly, Me.ToolStripComboBox2, Me.ToolStripLabel2, Me.ToolStripComboBox1, Me.ToolStripLabel1, Me.ToolStripSeparator3, Me.tsbHelp, Me.ToolStripSeparator4, Me.tsbSaveAs})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
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"
Me.ToolStripButtonNast.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripButtonNast.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_tools_50
Me.ToolStripButtonNast.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButtonNast.Name = "ToolStripButtonNast"
Me.ToolStripButtonNast.Size = New System.Drawing.Size(88, 26)
Me.ToolStripButtonNast.Text = "Nastavitve"
Me.ToolStripButtonNast.ToolTipText = "Odpri Nastavitve..."
'
'tsbPointsOnly
'ToolStripSeparator3
'
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"
'
'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)
Me.ToolStripComboBox2.Text = "Pika"
'
'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"
Me.ToolStripSeparator3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 29)
'
'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)
@ -193,30 +246,46 @@ Partial Class Form1
'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(123, 26)
Me.ToolStripLabel1.Text = "Uporabi kodiranje"
Me.ToolStripLabel1.Size = New System.Drawing.Size(34, 26)
Me.ToolStripLabel1.Text = "Kode"
'
'ToolStripSeparator3
'tsbDecimale
'
Me.ToolStripSeparator3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 29)
Me.tsbDecimale.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.tsbDecimale.DropDownWidth = 50
Me.tsbDecimale.Items.AddRange(New Object() {"Pika", "Vejica"})
Me.tsbDecimale.Name = "tsbDecimale"
Me.tsbDecimale.Size = New System.Drawing.Size(75, 29)
'
'tsbHelp
'ToolStripLabel2
'
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č"
Me.ToolStripLabel2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripLabel2.Name = "ToolStripLabel2"
Me.ToolStripLabel2.Size = New System.Drawing.Size(63, 26)
Me.ToolStripLabel2.Text = "Decimalna"
'
'ToolStripSeparator4
'tsbStolpci
'
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 29)
Me.tsbStolpci.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.tsbStolpci.Items.AddRange(New Object() {"Presledek", "Tabulator"})
Me.tsbStolpci.Name = "tsbStolpci"
Me.tsbStolpci.Size = New System.Drawing.Size(100, 29)
'
'ToolStripLabel3
'
Me.ToolStripLabel3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripLabel3.Name = "ToolStripLabel3"
Me.ToolStripLabel3.Size = New System.Drawing.Size(43, 26)
Me.ToolStripLabel3.Text = "Stolpci"
'
'ToolStripSeparator5
'
Me.ToolStripSeparator5.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 29)
'
'Form1
'
@ -230,7 +299,8 @@ Partial Class Form1
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MinimumSize = New System.Drawing.Size(1000, 480)
Me.Name = "Form1"
Me.Text = "TPS1100 Converter"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "TPS1100 Convert"
Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout()
Me.ToolStrip1.ResumeLayout(False)
@ -247,17 +317,24 @@ Partial Class Form1
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 tsbDecimale 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 ButtonUrediDat As ToolStripButton
Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
Friend WithEvents LabelDatoteka As ToolStripLabel
Friend WithEvents ToolStripSeparator5 As ToolStripSeparator
Friend WithEvents tsbStolpci As ToolStripComboBox
Friend WithEvents ToolStripLabel3 As ToolStripLabel
Friend WithEvents ToolStripProgressBar1 As ToolStripProgressBar
Friend WithEvents ToolStripButtonNast As ToolStripButton
End Class

160
Form1.resx
View File

@ -117,6 +117,16 @@
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<data name="RichTextBox1.Text" xml:space="preserve">
<value>1. Odpri GSI datoteko
2. Preveri podatke in po potrebi uredi datoteko (gumb "Uredi").
3A. Za pripravo Zapisnika Meritev klikni gumb "Meritve".
3B. Za pripravo seznama koordinat točk klikni gumb "Točke".
4. Shrani podatke z klikom na gumb "Shrani...".
Za pregled obdelav podatkov si poglej datoteko zapisnika.
Lokacija zapisnika = </value>
</data>
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>124, 17</value>
</metadata>
@ -126,126 +136,10 @@
<metadata name="SaveFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>383, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="tsbOpenFile.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAALPSURBVGhD7ZZdSFNhGMefAusmgqS6zCwI3DJQw0pDyAuR
AqOClAy8EAm6qQvvu5BqloRYUSanaeqdVPgRgdBN82y6Led0LnN18mM6bfZBVBDb+/QeeuSQZ93U2dwL
5wc/HOP17PcfGztgYmJiYrLuRDth63IXXF/uhOf87+C/GOmC/qVuaAh3w3a6bOqJPIL2SCegES50wMJi
O1jp0qkl3AEhHqBGGOK8HZbWZcycBMqcHdBIZyVYmn0IufQSqWGmDZQZCdBoFQm+vZfAzh/bjJBf6zxe
gY2UrSfEh7xrAxTBtw+gkbL1TLeCEmoFFMHp+xCkbD1Td0GZugcohLyVsvUEboMSvAMogmorZesZbwEl
0MIPCaDaStl6/M2gcFEQ/z7E1wSK7xagEPJWytbjvgmKtwkw2U62ZmKwbcd/+VraGcaJi1so/U/cN0Dh
YjJd7DuMGLxgiCxY95EF6g5RvobLBgoXk+VCbyHiZK2hskBtD+VrOBpAka8CJsPw0wLEQI3hsvGaZ5QP
wN6Ub0b/uW3OxowZl20Tf/eMdf5JHuJEdVJk49V2msGH+Cv96K9EMT1roxl8yNjpYRw7gyLKxk5dphl8
yGhFD/pOoogyX0UVzVCHHG/G0RMoorz9GM3gQzxl9cxbhkL6qtxCM/iQkdIq5ilFIZXLMmkGH+I+Wszc
JSiaseGSn4iwgWbwId4jWWykCEUzNlI0RxN+g56CjJjrYIy5ClEkebOHJmjEnPlh5sxHkYzLeQOUrxFz
7B9m8gH+5RHHuJwrUb5GfCinhw1ZUSTjQ9ZrlK8Rd1iaEx1Ocy9RvgZ/sn7NIRHUbk9WUZ9ccyj9dVi1
25NVmGwtTng4nXVacyhfA19adiU8nM7KFu32ZBX1p/7Hi32fE/5DGvp9cO8HStfzdSA7N9q7e/TTQHb0
S/+elXRUbVvpy/JGH2fpP1YmJiYmJqkF4BfnTMFL1luHfwAAAABJRU5ErkJggg==
</value>
</data>
<data name="tsbConvert.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAYAAABXAvmHAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAV1SURBVGhD7VhbbBRVGN7oi9FoTCy+UKLFN4wvylVae++2
lG1LITExMTEsoD5UWlAwbMv0AqVl2+5tZnd2ZvYye2u3tLRYgjFRRAgPxkSfG14E0Zh0tzei0bTwe87M
P9NBHhTY0mnSL/my2/87c+Y7//n/ObO1rGENJsXFvILaC+sKbhP+8kXexhoMrx5Q4xPrXgOVBbcwvHqw
ZF4lhlcPhvIKIPbSqwrT5DuGVwfmd71bP1lohWlrI0xX7YHJHZUwV9loQ9ncmKvZ1zNfvQ/mq/fCnJWw
qpGY3wOzFQ0wU95wGoeZE/PWvfX3m1aNz5bXw2xZHcyU1sF0sW03DjcfZisbr+jZLqu/mCmrXZ8p3pM/
U2K7NFOyG2aKd0O2sPYyDjcfZsttd2bL1GxniqvzMWzJFtVvmC7aBdOFhDut8xg2H2ZKa++QbCuZvn8B
VRuyO6sh+7YVstsqzLuAbFHNt9Pv1IKabeulzNbqfGp+akfll5ntlZDZVgGZzeXf4HDz4ffCmgY90zuq
QDVNuLUCpraUw9TmMri9ubQOh5sP/X5p71fvf6ybzqDpqbdKYerNErj03kHwBOR6HG4+RIbGJ/o5CSJN
x+Enchb8trUcft1SBj+SAy3cdAwG/GGQUmPjONxcEOKj+VJyfDE8OA6B6CD0sSI4uga+dnS7LtNF8dEh
CKfGIJQYXYimJ9bjZeZBaHCsPTw4ppokFJPnoXNAeP20J7BJIt9pLJSin4TJ0Ta8zBwYHh5+OpQ8f9No
coCP/oyyxRWUbxEd6EKk5CgI8XO36DUorzzE5JhNzaxm8jx0u/hPULacdgdbqHGFCZVicmQXyisPKTky
oWWXkhUTfzMM8xTKClgp+ZeYGAGd8RFzNDNtXsJFPbPEXLc7OIqyjjMeYQyNE54DQU4vBKLplW9mMT7a
bsxsUB6GMwMDG1HW0eVkX+HlNK1/lbFzQP5e2WamjUhM39QyS42d5UKTKD+As1z4hhAbhuASV7aZxdiI
Tc8oZvXUWfYDqpEz4To9E5DXaKy9n7MrxskuBcluUAbkoZVrZj6WntCM08y6BflPlCz0iWQkhi0uXv6D
lpJOcnyj9GRBm5ePphf1ciBZJc0ro2wRDX1BiWHySOUT9FSmDFBGUsvfzPubW68faGkFI5leHxpXS4GL
pODDo4yu0x0xUosf+vQksKEUmh9U2Nbj0XWN9uZWpexyAjqZcfKDR9rAJyaWyoCws89/nwGjRmnUOvs5
xbhfYQrIxilzGsfsb3FcxdvnHnxsyKYYM5RCZw/XiLIC1dwSMayAcXkbqHF/eIlsOPnkmpk03oRew+TN
0+kPzaGkgwslwUgM6+hjw/NcmGiUdAx5bKG0vBDi8XwunFrU6peyo5/zo6zDK8av+aQ4qJQfKIcOJ8dr
i2NDCcIYaebo8p/MxHC7sX49wdg9xuV6EeX/DYbxvOARondZiZjXKMaX92SmpyYbSt401m63m/8e5YdG
t8v/A6vtkhinyVjek5nUq42aJiWk1C7NWkePuxLlh0Zbr6fUK8QU8z6RfsbALcrL18zE9GGtbil7WSGD
0iPjjJfPeolxuhCvIINHkJtQyj38UryOUxpOrdl2p68XpUfGyV6vkxpH8+DlI7Uo5R6+cOINreFcfOQu
+dHyLEqPDIaJPOP0SYueYJT0AGEgtAml3EOSpOe1huty+q9g+LHR2cdepebdfBScsdhzGM49Dh1h8o51
9S30eoV7J071b8fwY6Ot27WNPM3ufdbhXPjoKPMyhnMPe7Pjc/U9pTXnp6a9+cQFfA86jqHc48Bhxw16
E3uLoxpDOQOdU1kAuQeGcg9yg+/shx1X/v0fh1yAzqnNj6E1rGEN/wmL5R8pbWslvt5YFwAAAABJRU5E
rkJggg==
</value>
</data>
<data name="tsbSaveAs.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAbfSURBVGhD7ddJbBvXGQdwH422l5yMBnHoSrYcu/Wi9NhD
br32lC5xb22RLmlRt0bRJW3SLXWCuumCHuo0cSTZsmTtEmWJi8w4sdN4k0RS3DkcbkPOSpGS4mVg4N/3
3gzlITkF5GEJqIU+4A+JF+n7zffevMddO7VTO7VT/x/1XIDf/ezC6u96FyreXn/FR/PMpBTtHhS1LpoL
Ze3r7uy6l1N1H03G+OnlFN2blnVPStLnk5I+lxT12XhZd8dK+kxU0KcjJCuCPhUq6BPBgj6+nNNHl7L6
yJ2MPnyT0781FS0cHhd8h6bl1z4/LXzCbMd5UQQJev1mfBUcnJDgOl/azEu+PGq1ddTWNsyso0o+r1bX
UFmtQatUoWqrkJUKRFlFWVQglGUUBRH5YhnZvIBMtoB0Jo9EOotYKoNT83EcGi/i0JRMIgWOesqfNFty
Vs/6Nb8VYQvx5lnTjak1ItQKJFlDWVJREmW8NPQhXnjnPXyN5KtvBzB3K45UJkcgPGJJDqfm4nhmzIRM
yiCroD1Mr18LWBHHKWS8EfI9b441zGI2XwcoFoTIEHQaEo6/7sael8c20381jCSXRTzFI5rg8OO5mAFh
CDMT5Q8OX5I+Zbb2eMUgFsRxbyvku54cFHWVNV5vnn6mAFnRmhBkSZVEHGuBhMxpZBBJpA3IaNGCkFgO
jEkBR3um12NA6ghbyHwWEmmYNl0P/cwAdE9ICltOBkJCgeyLZkjfe8HNaazEU/jR5RgO1iEmgi5p+r97
xqXfm+1tvSjEirCDfGeeZ0/cGroXDAAJAQgEUN/cuUIJx043Qt4NLG9OIxxLPoI0IWj2j0gLZntbr+MU
YkEc82gtkG/P8eyJN4Q2XwfQKVgQPHlLNUPOEQibRiyFUDSBk7NRHBwxIFZEz5ixvMz2tl5WCEXYQzKs
2ebQ5q2AbJ4gckX2qj12eqYB8s7CEltS4WgSwUgcJ90RBmlGGBDROaSOoKF/zAp58XKGNWuXTQA9KwiC
o+cFn2+BvO1fZEsqGElgeSWGkzMr6KGQJkTPmIgDow4hVsTR+VbIN90cO9Row0bo7wJrnk3AAqBnBX3N
vjjwPr781gKepznrx8T1IEIMEcdiKIrvU8glA2JF9Iw6hByxQCiCQUblBsgXBjnSYJ41zJI1lg9tnuOt
AHrgGWcF3djGG8rY3JuIcBS3gxF8cThKJiLYIdqD1BFH5zRySCkNEFd/AV+ZSKH/Jo/hO2Zu02RYhm5x
uHiTwyBLGhdupHD+oyQG/kWTQN/1OPquxXDuWhT/uBrFibEYuga4/4TAgWGHECuC5sicSkYuo3tIRNfF
spELAvYN5ElyRvofPy4z3YNF1rgtYsQpZN6EWBBHLj/K52bNuFV81q0YmTFymGaaRmYxLoD1u1PjiW33
drJFkOwfFhxCthNipOwQMmtAtg3iUhuQbYUg+YwziBrYToju4f8CZDsg2oZsFwSDDDmE2CGOkLyb/hjC
hg714wdQNu5DXr/HIq3dRbm6gdLqOoTKGopaDQW1ipxcQVbSwIsqMmUFXElGmlwq00URCXK1iecExMit
YJEr4MwNcpaYECuie8ghhAAMSNMkTt6u4eHDh9B1HQ8ePMD9+/dx79493L17FxsbG1hfX8fa2hpqtRqq
1SoqlQo0TYOqqlAUBbIsQ5IkiKKIUqkEQRBQLBZRKBSQz+eRy+XwDb/QgugaKrUBsVlOf4tvdBSRzWbx
62uFFgSDXHACcauBZgTdE3+NrnUUwfM8Xv0g34LouugQcsgtGRALgm5sCukkguM4vPI+uXc1IdqDNCHo
m+kvkVpHEel0mkFaEINOIVMGpPkV++eVWkcRqVQKv7qabUW0A7E7J94MVzuKSCaTBqQZQbLPMcTmsPtT
aLWjiEQigV8GeDtEO5DWE5tCOomIx+MMYoNoD2JF0CvHmWClo4hYLIZfXMnYIbDvvENIM4JBlrWOIiKR
CH6+wNkhsLcdSNfZOPaeuY39/Ry7/P1xSe0oYmVlhUFo80+dTeLTf7iBp95chqstCJnAnp968cQLb8H1
xnUGeWNR6SgiHA7jZ74Ug1DEEyf+iT0/nDQgfcXHhxyclP10KT39+od48tQkuv++xK7ip+8oHUWEQiH8
xGtA6CQo4slXA3ANFOHqy/vN9rZe5On/1u77xIkrckcRwWAQX5rKsj1Bp8BCESR7+wu/MdvberkC/G6K
6ZkoewjAVw/5QuR7+YYU8aRE5UqqrC0kS5o/IWi+WFHzRgssngivzQYzLDNLaW16McUydaeeJMv4rbg2
djPGMvpRVBu6HlZ+MJeKuAYE36PkfU/3FzwU4TrH7zbb26md2qmd+p+uXbv+DbJ3cbrvrqBwAAAAAElF
TkSuQmCC
</value>
</data>
<metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<data name="tsbPointsOnly.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAADIAAAAyCAYAAAAeP4ixAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAYgSURBVGhD7VpdTBxVFEZ88QdZFqSzsyyaNMaHWpPaLn3y
xWiUVCiU8tMiaP19McYYk9Yni0/a2lIxBZ2ZLbuF1qSlWuVNURcwKn3zJ8afpDozS2M0RlgSV7NIx3Nm
D+ydmbuzP+yK1H7JCXDvueecb+7fuSeUXcX/BoZRvm0y/mEwGv8dpWEqPoFt1Lt+sGV6oRaCN1jBNupe
P1jXRAJH9ev9knafqGgv1IVjb9mJYJsoqwf8IfVe1KVh/xEcNMrFkN4qyOp5QdH/EhXdQKkbjllImESg
bbkfdQVFe0eUtRa0QdbWAIZxjU+J9QiK+v1ycKxkI8KKIGnfwc9utEnW/x345dnb4YtO2wNiJR8iaVEn
A4p+G7kpLfyK1iVK2gI/EBR10afon9ZFYmEHEWjzydpnqMMfCyLrcV9I6yB3pQEE+LwoqZd5AUCAX/gV
/dHq0R8qUdft1PJKFz3+kP6YT1K/5NlCHz5Few51iw74Us/wnAqSqsMp9VTZWeNaUjWxfea3yobo3NIK
Efgd26g7Bdjk+PVFSb/Is40fjjSLg9Ry4s7EGVG6dAOpOdAwubArOBV/BWX79EIrNTsgjPx8I9gas9lO
zYystpPa6oAb27EnzKnXXyzqKYOnoKwfdHww2DOrPwDAOJCIWgyDmCRKBFimfXZ/eEKu6qPhPWE3CnKm
pOc9fjzeMpP1vaSRJ2DzOi47SVfd9kSxgD7g1tdY3zAr3xaUAWDawRpC8YXUXuouOeD4fcTuH/K4ndSd
OzB3Yo3gPZHvF9l4tsMjRrq3oXilDg815wY8mh33jHaOenMDZqZsAoiClx11Z0Xg1L47A6O943WRhxb9
J7sNMbzX8J3oTNaG2seFUOdmUssK8PsEG4Mg6X/eGv7pOurOjlQqnjYAkly+sbMhcLqn1T/Sm6gb6THS
JPYYQMDYIHcYNW+2JWoG2zLeKSwg6Cp7OiOEYvdQd3bge4IdjPkRdbkCZ8KNRK3Ubtz8xm7DO9iS8B5v
voOGuQKIzLCxgOynrgyA9/Tdn8x7Ueojs6cxU12W+kgshO2bor9UkDYX5nLKQqJmcJdRfbzV8A60vEfD
uEBf6BP8h9lYAmFtdDlOjJnU08BCAZvgcSU6dzk4OddGQywwN/ZId3KFxLALiddbjKr+pmT1QCN3uQan
5najL24MVpmgIWnAwF85ijzpoyEW1J/sDeZM4rVmw3OsyfD0N22l4RagD5tPvkDMNCSN1RIxj9kVEl2Z
SQw0G1VI4uiDhudI41003AL0YfPJFy4RmCaHol0wLYeMloZYgPeEb7gz6U5i5wqJysM7Mi8tWL6mL14M
jASj8fdpCIMibPbaUNe4hcRQmoSXJXFkh3HTocZ3aRgXBW92FvbjF/7+nLpcAftic43UlshGouLw/X9U
vNq4iYa5AtL6C9ZYsh2/DLDuZB2sLuLzlLpdgZedd6g1gSSqM5F4+YEWUnfFLUOaF4j8zcaS14VopiiQ
DrAG8I1N3VmBlx3eE95jTUmTRH9qT+ByynUmEKIce5KNAbLxRF4pCsIsnjFGMIHLN2nEzYxHrOdQ09ZM
Gzsj4BkBK+ErNgaQMerNHVgBtBnBVOVh6i45BFnbZ/fvV7Rm6s4D+LBKVQBXDOFjBwsFpFEyoI9UdYYh
IuvfFPSwQoCBbouxlIzhc5RUig/zqauds/vFSg5pFAA0Kmsf241itYM0ig7w95LdnyirU6v+eFiKwZKM
xbBZbwIyxZyZ1Ez0OcpBij6/4YS2kbRWh1Q1kFugG3PbM2aqMTl3ICX81AaRKtA5lxOcWks+JcbNtguG
IOtPOx2ZZ3sMgshUMk2n4m4lU0X/0W4XpWT1XzScYWZA4MyX9cfxeYq6W1yK2OaNjZedpH6dwdaSKGnP
om7JgLVYx56xCL6x1ZlA+FLETgTbIPgLIJa0wybzYD/jMiwqzAOAU0plBTNVOxFs4+ky8lHRNnbOgFPG
L+l7sALICSg/InDZwU3eSZbXCLBhsQIIM/Q2m2hmI4IJIPwcM9OOQm/sUgEzU0yzIcD9/sjsKTsRbMM+
1Mk7i10ruJ1a6wpXDBE4DMoh+Anmn2o+wDbqvYorHGVl/wCgZhyIAWVdbAAAAABJRU5ErkJggg==
</value>
</data>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="ToolStripLabel1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAAIAAAACACAYAAADDPmHLAAAABGdBTUEAALGPC/xhBQAAEZJJREFUeF7t
@ -325,38 +219,6 @@
KchCQ5Jn9ki7aLn8iNOxu0ABvAgeAXeD68G3wGLwOaD/coZI3Qu5/Xg0JuHz5JMoEe7G7zcbZu7baDMs
LpVGj64Obh8QH40UZGXz62eCWeKfkfpRTABMCOKfUmXzQ1FRHSlSJIdQakT1/JSaMeP/yToI3IKwINIA
AAAASUVORK5CYII=
</value>
</data>
<data name="tsbHelp.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABgAAAAYCAYAAADgdz34AAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAYWSURBVEhLjVV5TNN3FC/qFmYy8QiBP0aiQmZcPcphwQYK
QhVHIkXBokSosEzOcgaEESyhIJajayYeEwlDAiog8SAQ5wDBecBg0hZajpZDZLp5Ts7CzNt7v3bZFkfm
Sz7w+H3f9/Pe912w/k96d+1arQ4O3q+OiJBqYmPPauLizqjDw4+pgoKCRoTClWaz95OcnJwNKYWFoelF
RcEVCQnJaomkQldWZhxqb4exoSF4PDHBgPShtjbQlJfPaeLjy8sSE5PoTlJxcRhxmOn+LZn5+fzs3Nys
y2lp3KaDB2/e3roVVAoFTALAHGIesWAG6fTtDUKVnQ132GxoEosbL6Wnb0MOaVZenoeZ1iTkFQ9kpBsE
gm863N1BtWcPDAYGwlRfH9IAGOfmwGg0moD6W/w2pVaDYfdu6PPxgW4eD4a9vRXEcVQuz5UeP/4p6Yxg
WsKrUlM9+728Cm+jcZ9IBAaxGAaCg2E0IwOMs7PwBzkxO6BXGKenYTw1FcYOHYJxtB3cuxfueniAyssr
83RWlkcacjLkmLePvlIohFf9/b/9kcsFjVAIg0isj4mB4eRkGERnE8XFTFpmzTAinsjlMIJn42jzSCJh
HPXj3Q4OB64LhScziooCiJtxoszISG8OCIBOFxfQCgRgiI4GQ0IC81u7bx+0b9kCHZmZ0FVRMdlVXT31
U3o6dGzaBHpM4aOoKBglBxSQry88xO/Nfn6gyMxMY8hJGgICcnRaLby4cwcGQkNBFxQE+iNHQOPvD7fw
VQ3e3jdvuru7djk7f1Dz2WcfNvF42xs9PZvb8GwAox6LjAQDOhsOCYGXLS2g6+mBG0JhtoncxWX9DwkJ
95+9pbIBzLx6BWP5+dCDRbvl5ATXzIX7L7m2Y0dJu7Mz9KPthEwG08+fMxzP5uehOTq6tZHL/YRV7+Eh
vFtSMjeFB3PYHZRrKqiuoABqOJxuM9eiUs/h9A7m5f3dvtgE1NqtxcXTdTyeH6vO1ze18/Jlpnhz2C2z
2B3kYGRsDOoEghQzz6JSKxAcHRkfZ+7QXeKYQf1BVRXU+PhIWBf9/I53Xb/ODM4sOUBQNOrWVqjg8YRm
nkWl0t39YN+9e8wdIqcsULAddXVw0dc3i1Xp45P1oLaWaT3GAUZB0q/RwPlt27408ywq593cJEMDA8yd
v15Awd6rroYKT89UVqmTU0jr2bNv6SPljyJZWFgATUoKlDo41Jt5FpVz9vYNKmxhShHdnUUO4vpeqZw/
x+EEsU6uX+9yJTFxmApDfTSJuR/FCe3DDrq6eTN87ei4z8z1jhQ7Oh6ow77vxk7S48S/efwYGQB+R9TG
xmqV69ZtYQxPu7kph0dH4UVDAwzgDBAM4eHQg2ujGgkK2ewYxvAfUsRmJ1RiAJ07d4IObdU4Bxqc7OdN
TWAYGYFTXG6R2ZTFkoWGZlfj0Kjs7KAfh4vWhB6nWI87Ro1ObtjbQ2Vg4EhpcHB16YEDF6tEotF6Bwfo
wjMd2mjRXof2tCDvI8cFNzeQicWmQSM5JpcH59rYqButrKAfLw2GhZkc0EXcluO4kqn0v01NMSB9NDcX
evCMyLW4LnpxA6i8veHKihWQY23dKS0sFEml0iUs/LE8W6n8QhoSwi9fvfouRdCPzx7EyGhl0E6aw+5g
io/TTqCCUrf0JyWBClPTiwGpcIc14135kiVtUpHITXbyZDhxMy84oVCIjmZkHGL05csf/Ywp0bq6ghZf
8xp3Pk3oNEY+MzPDgHRy+Kq3Fx6iTTemt23tWpBbWhqII7egICw3P38/6YzU1NQsVZ45I9vu789ftWqV
VaSFRcs1FguelZQgjWkFGLF1qY0JpJMDkl9OnYJLaBtlYXEVqSxSZDJ+gVIpI04Tu1nEYrFlZExMUqhE
kszl8U5Eubq+LouPBz1u2MmnT5n+pjYmkP7myRPQ4/9lsol2cfmVz+enhMXFRX534UJSeXm5pZn2XVmz
Zs0GGzu7PUutrXfhn/s3WlgoDrPZbflBQaPKiIiXBBl21OGNG1vw7ATafL7M1tZlpa0t38bKah1D8p5C
T6QiLUN8jLBHbEKwEURk+m9lsltEWKw/AT0RdASsd2/NAAAAAElFTkSuQmCC
</value>
</data>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

342
Form1.vb
View File

@ -1,14 +1,48 @@
Imports System.IO
Public Class Form1
Public DatotekaLogfile As String = My.Settings.DatLogfile
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
If DatotekaLogfile = "" Then
DatotekaLogfile = System.IO.Path.Combine(My.Computer.FileSystem.SpecialDirectories.MyDocuments, "tps1100_log.txt")
My.Settings.DatLogfile = DatotekaLogfile
My.Settings.Save()
End If
My.Forms.Form1.Text = My.Application.Info.Title + " " + My.Application.Info.Version.Major.ToString + "." + My.Application.Info.Version.Minor.ToString + "." + My.Application.Info.Version.Build.ToString + "." + My.Application.Info.Version.Revision.ToString
tsbDecimale.Text = My.Settings.DecimalnoLocilo
tsbStolpci.SelectedIndex = My.Settings.Stolpci
RichTextBox1.AppendText(My.Settings.DatLogfile.ToString)
End Sub
Public streamLines As Integer = 0
Private Sub tsbOpenFile_Click(sender As Object, e As EventArgs) Handles tsbOpenFile.Click
OpenFileDialog1.ReadOnlyChecked = False
If OpenFileDialog1.ShowDialog = DialogResult.OK Then
tsbFileName.Text = OpenFileDialog1.SafeFileName
RichTextBox1.Clear()
ToolStripProgressBar1.Value = 0
Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
Do Until streamReader.EndOfStream
RichTextBox1.AppendText(streamReader.ReadLine + vbCrLf)
streamLines = streamLines + 1
Loop
ToolStripProgressBar1.Maximum = streamLines
streamReader.Close()
streamReader.Dispose()
My.Settings.Datoteka = OpenFileDialog1.SafeFileName
My.Settings.ZadnjaMapa = OpenFileDialog1.FileName
My.Settings.Stolpci = tsbStolpci.SelectedIndex
tsbFileName.Text = My.Settings.Datoteka
ToolStripStatusLabel1.Text = My.Settings.ZadnjaMapa
tsbSaveAs.Text = "Shrani ..."
tsbSaveAs.Enabled = False
tsbConvert.Enabled = True
tsbPointsOnly.Enabled = True
ButtonUrediDat.Enabled = True
RichTextBox1.BackColor = SystemColors.Info
LabelDatoteka.Image = My.Resources.icons8_ok_50
My.Settings.Save()
Else
tsbFileName.Text = "Odpri GSI datoteko..."
RichTextBox1.Clear()
@ -17,32 +51,43 @@ Public Class Form1
tsbConvert.Enabled = False
tsbPointsOnly.Enabled = False
End If
OpenFileDialog1.Dispose()
End Sub
Private Sub tsbConvert_Click(sender As Object, e As EventArgs) Handles tsbConvert.Click
ToolStripStatusLabel1.Text = "Procesiranje..."
RichTextBox1.Clear()
RichTextBox1.AppendText("TPS 1100 GSI Conversion" + vbCrLf + "++++++++++++++++++++++++++++++++" + vbCrLf)
RichTextBox1.BackColor = SystemColors.Info
RichTextBox1.AppendText("TPS 1100 Zapisnik" + vbCrLf + "++++++++++++++++++++++++++++++++" + vbCrLf)
ToolStripProgressBar1.Maximum = streamLines
' prepare StreamReader
Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
Dim i As Integer = 0
Dim PodatkiStojisce As Boolean = False
Dim dataStolpci As String = ""
If tsbStolpci.SelectedIndex = 0 Then
dataStolpci = " "
ElseIf tsbStolpci.SelectedIndex = 1 Then
dataStolpci = vbTab
End If
My.Settings.Stolpci = tsbStolpci.SelectedIndex
My.Settings.Save()
' loop untill end of stream
Do Until streamReader.EndOfStream
' Read and Split each line to separate it into fields
Dim line() As String = streamReader.ReadLine().Split(" ")
' Remove * sign from index line
line(0) = Replace(line(0), "*", "")
ToolStripProgressBar1.Value = i
' Check if it's a new station setup
If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "*************" + vbCrLf)
'RichTextBox1.AppendText("PtName:" + vbTab + "Hz.Corr.:" + vbTab + "StnE:" + vbTab + "StnN:" + vbTab + "StnH:" + vbTab + "Refl.h.: " + vbTab + "Inst.h.: " + vbCrLf)
RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "****************" + vbCrLf)
RichTextBox1.AppendText("PtID" + dataStolpci + "HzCor" + dataStolpci + "StnE" + dataStolpci + "StnN" + dataStolpci + "StnH" + dataStolpci + "ReflHt" + dataStolpci + "InstHt" + vbCrLf)
End If
If Microsoft.VisualBasic.Left(line(1), 2) = "84" Then
RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "*************" + vbCrLf)
'RichTextBox1.AppendText("PtName:" + vbTab + "StnE:" + vbTab + "StnN:" + vbTab + "StnH:" + vbTab + "Refl.h.: " + vbTab + "Inst.h.: " + vbCrLf)
RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "****************" + vbCrLf)
RichTextBox1.AppendText("PtID" + dataStolpci + "StnE" + dataStolpci + "StnN" + dataStolpci + "StnH" + dataStolpci + "ReflHt" + dataStolpci + "InstHt" + vbCrLf)
End If
' Seaparate word index and data
For Each readLine As String In line
@ -55,149 +100,167 @@ Public Class Form1
' data is always 17 characters long and is read from right to left and has a +/- sign in first place
Dim data As String
Dim dataTmp As String
Dim numData As Double
data = Microsoft.VisualBasic.Right(readLine, 17)
If wordIndex = "11" Then
data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
ElseIf wordIndex = "19" Then ' Date/Time
data = "DateTime= " + Microsoft.VisualBasic.Right(data, 8)
data = dataStolpci + "DateTime= " + Microsoft.VisualBasic.Right(data, 8)
ElseIf wordIndex = "21" Then ' Horizontal angle
numData = data / 100000
data = Format(numData, "0.0000")
data = dataStolpci + Format(numData, "0.0000")
ElseIf wordIndex = "22" Then ' Vertical angle
numData = data / 100000
data = Format(numData, "0.0000")
data = dataStolpci + Format(numData, "0.0000")
ElseIf wordIndex = "25" Then ' Hz. Orientation correction
numData = data / 100000
data = "HzCor= " + Format(numData, "0.0000")
data = dataStolpci + Format(numData, "0.0000")
ElseIf wordIndex = "31" Then ' Slope distance
numData = data / 1000
data = Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "32" Then ' Horizontal distance
numData = data / 1000
data = Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "33" Then ' Height difference
numData = data / 1000
data = Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "34" Then ' Stationing
numData = data / 1000
data = "Station= " + Format(numData, "0.000")
data = dataStolpci + "Station= " + Format(numData, "0.000")
ElseIf wordIndex = "35" Then ' Info za offset???
numData = data / 1000
data = "Offset= " + Format(numData, "0.000")
data = dataStolpci + "Offset= " + Format(numData, "0.000")
ElseIf wordIndex = "41" Then ' Code
'numData = data
'data = "Code= " + numData.ToString
If ToolStripComboBox1.Text = "Da" Then
If My.Settings.KodeUporabnik = "Da" Then
If data = "+0000000000000010" Then
data = vbCrLf + "Setup: Quick Set" + vbCrLf + "============================="
PodatkiStojisce = True
End If
If data = "+0000000000000020" Then
data = vbCrLf + "Setup: Set Hz" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
data = vbCrLf + "Setup: Set Hz" + vbCrLf + "=============================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "ReflHt" + dataStolpci + "PrCon" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
PodatkiStojisce = True
End If
If data = "+0000000000000030" Then
data = vbCrLf + "Setup: Resection" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
data = vbCrLf + "Setup: Resection" + vbCrLf + "=============================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "ReflHt" + dataStolpci + "PrCon" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
PodatkiStojisce = True
End If
If data = "+0000000000000040" Then
data = vbCrLf + "Setup: Free Station" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
data = vbCrLf + "Setup: Free Station" + vbCrLf + "=============================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "ReflHt" + dataStolpci + "PrCon" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
PodatkiStojisce = True
End If
If data = "+0000000000000050" Then
data = vbCrLf + "Setup: Orientation & Ht. transfer" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
data = vbCrLf + "Setup: Orientation & Ht. transfer" + vbCrLf + "=============================" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "ReflHt" + dataStolpci + "PrCon" + dataStolpci + "HtDif" + dataStolpci + "PtCode"
PodatkiStojisce = True
End If
If data = "+0000000000000090" Then
data = vbCrLf + "Measured:" + vbCrLf + "-------------------" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
data = vbCrLf + "Measured:" + vbCrLf + "----------------------" + vbCrLf + "PtID" + dataStolpci + "HZ" + dataStolpci + "V" + dataStolpci + "SD" + dataStolpci + "HD" + dataStolpci + "ReflHt" + dataStolpci + "PrCon" + dataStolpci + "HtDif" + dataStolpci + "E" + dataStolpci + "N" + dataStolpci + "H" + dataStolpci + "PtCode"
PodatkiStojisce = False
End If
If data = "+0000000000000099" Then
data = "Imported:" + vbCrLf + "-------------------"
data = vbCrLf + "Imported/User-Entered:" + vbCrLf + "----------------------" + vbCrLf + "PtID" + dataStolpci + "E" + dataStolpci + "N" + dataStolpci + "H"
PodatkiStojisce = False
End If
If data = "+00000000STA_OFFS" Then
data = "Offsets: " + vbCrLf
PodatkiStojisce = False
End If
End If
ElseIf wordIndex = "42" Then ' Code: Info 1
data = "Info1= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
data = dataStolpci + "Info1= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
ElseIf wordIndex = "43" Then ' Code: Info 2
data = "Info2= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
data = dataStolpci + "Info2= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
ElseIf wordIndex = "44" Then ' Code: Info 3
data = "Info3= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
data = dataStolpci + "Info3= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
ElseIf wordIndex = "45" Then ' Code: Info 4
data = "Info4= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
data = dataStolpci + "Info4= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
ElseIf wordIndex = "47" Then ' Code: Info 6
data = "Info6= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
data = dataStolpci + "Info6= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
ElseIf wordIndex = "58" Then ' Prism constant
numData = data / 10000
data = numData.ToString
data = dataStolpci + numData.ToString
ElseIf wordIndex = "71" Then ' Point Code
numData = data
data = numData.ToString
ElseIf wordIndex = "81" Then ' Target Easting
dataTmp = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
If dataTmp = "" Then
data = ""
Else
data = dataStolpci + dataTmp
End If
ElseIf wordIndex = "81" And PodatkiStojisce = False Then ' Target Easting
numData = data / 1000
data = Format(numData, "0.000")
ElseIf wordIndex = "82" Then ' Target Northing
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "82" And PodatkiStojisce = False Then ' Target Northing
numData = data / 1000
data = Format(numData, "0.000")
ElseIf wordIndex = "83" Then ' Target Height
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "83" And PodatkiStojisce = False Then ' Target Height
numData = data / 1000
data = Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "84" Then ' Station Easting
numData = data / 1000
data = "StE= " + Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "85" Then ' Station Northing
numData = data / 1000
data = "StN= " + Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "86" Then ' Station Height
numData = data / 1000
data = "StH= " + Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "87" Then ' Reflector height
numData = data / 1000
data = Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "88" Then ' Instriment height
numData = data / 1000
data = "InstHt= " + Format(numData, "0.000")
data = dataStolpci + Format(numData, "0.000")
ElseIf wordIndex = "18" Then ' DATE YY.ss
numData = data / 1000000
data = "Year.Sec= " + Format(numData, "0.00")
data = dataStolpci + "Year.Sec= " + Format(numData, "0.00")
Else
numData = 0
data = ""
End If
If ToolStripComboBox2.Text = "Pika" Then
If tsbDecimale.Text = "Pika" Then
If wordIndex IsNot "11" Then
data = data.ToString.Replace(",", ".")
End If
End If
RichTextBox1.AppendText(data + " ")
RichTextBox1.AppendText(data)
End If
Next
RichTextBox1.AppendText(vbCrLf)
i = i + 1
Loop
ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
ToolStripStatusLabel1.Text = "Prebrano: " + i.ToString + "/" + ToolStripProgressBar1.Maximum.ToString + " vrstic"
SaveFileDialog1.Filter = "Zapisnik meritve|*.mer|Text file|*.txt|All files|*.*"
streamReader.Close()
tsbSaveAs.Enabled = True
tsbSaveAs.Text = "Shrani Zapisnik"
End Sub
Private Sub tsbSaveAs_Click(sender As Object, e As EventArgs) Handles tsbSaveAs.Click
SaveFileDialog1.FileName = Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
If SaveFileDialog1.ShowDialog = DialogResult.OK Then
RichTextBox1.SaveFile(SaveFileDialog1.FileName, RichTextBoxStreamType.PlainText)
ToolStripStatusLabel1.Text = "Shranjeno: " + SaveFileDialog1.FileName.ToString
End If
End Sub
Private Sub tsbPointsOnly_Click(sender As Object, e As EventArgs) Handles tsbPointsOnly.Click
Dim dataStolpci As String = ""
If tsbStolpci.SelectedIndex = 0 Then
dataStolpci = " "
ElseIf tsbStolpci.SelectedIndex = 1 Then
dataStolpci = vbTab
End If
My.Settings.Stolpci = tsbStolpci.SelectedIndex
My.Settings.Save()
RichTextBox1.Clear()
RichTextBox1.BackColor = SystemColors.Info
Dim measuredPoints As Integer = 1
Dim newStation As Integer = 0
Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
Dim i As Integer = 0
Dim lin As Integer = 0
Do Until streamReader.EndOfStream
' Read and Split each line to separate it into fields
Dim line() As String = streamReader.ReadLine().Split(" ")
' Remove * sign from index line
line(0) = Replace(line(0), "*", "")
ToolStripProgressBar1.Value = i
If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
measuredPoints = 1
End If
@ -220,163 +283,108 @@ Public Class Form1
data = "90"
End If
numData = data
If numData >= 90 Then
If numData = 90 Then
measuredPoints = 1
ElseIf numData >= 10 < 90 Then
ElseIf numData < 90 Then
measuredPoints = 0
Else
measuredPoints = 2
End If
End If
If wordIndex = "11" And measuredPoints = 1 Then
If wordIndex = "11" And measuredPoints >= 1 Then
data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "81" And measuredPoints = 1 Then ' Target Easting
RichTextBox1.AppendText(data + dataStolpci)
i = i + 1
ElseIf wordIndex = "81" And measuredPoints >= 1 Then ' Target Easting
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
If tsbDecimale.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "82" And measuredPoints = 1 Then ' Target Northing
RichTextBox1.AppendText(data + dataStolpci)
ElseIf wordIndex = "82" And measuredPoints >= 1 Then ' Target Northing
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
If tsbDecimale.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "83" And measuredPoints = 1 Then ' Target Height
RichTextBox1.AppendText(data + dataStolpci)
ElseIf wordIndex = "83" And measuredPoints >= 1 Then ' Target Height
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
If tsbDecimale.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + vbCrLf)
If measuredPoints = 2 Then
RichTextBox1.AppendText(data + dataStolpci + "REF" + vbCrLf)
Else
RichTextBox1.AppendText(data + dataStolpci + "MEAS" + vbCrLf)
End If
ElseIf wordIndex = "84" And measuredPoints = 1 Then ' Station Easting
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
If tsbDecimale.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
RichTextBox1.AppendText(data + dataStolpci)
ElseIf wordIndex = "85" And measuredPoints = 1 Then ' Station Northing
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
If tsbDecimale.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
RichTextBox1.AppendText(data + dataStolpci)
ElseIf wordIndex = "86" And measuredPoints = 1 Then ' Station Height
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
If tsbDecimale.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + vbCrLf)
RichTextBox1.AppendText(data + dataStolpci + "STA" + vbCrLf)
Else
numData = 0
data = ""
End If
End If
Next
lin = lin + 1
ToolStripProgressBar1.Value = lin
Loop
ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
SaveFileDialog1.Filter = "KOO datoteka|*.koo|Text file|*.txt|All files|*.*"
ToolStripStatusLabel1.Text = "Prebrano točk: " + i.ToString
SaveFileDialog1.Filter = "KOO datoteka|*.koo|Text file (Tab)|*.txt|All files|*.*"
streamReader.Close()
tsbSaveAs.Enabled = True
tsbSaveAs.Text = "Shrani Točke"
End Sub
Private Sub tsbKooConvert_Click(sender As Object, e As EventArgs)
RichTextBox1.Clear()
Dim measuredPoints As Integer = 0
Dim newStation As Integer = 0
Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
Do Until streamReader.EndOfStream
' Read and Split each line to separate it into fields
Dim line() As String = streamReader.ReadLine().Split(" ")
' Remove * sign from index line
line(0) = Replace(line(0), "*", "")
If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
newStation = 1
End If
' Seaparate word index and data
For Each readLine As String In line
If readLine = "" Then
' do nothing
Else
' wordindex is always 6 characters long and is read fron left to right
Dim wordIndex As String
wordIndex = Microsoft.VisualBasic.Left(readLine, 2)
' data is always 17 characters long and is read from right to left and has a +/- sign in first place
Dim data As String
Dim numData As Double
data = Microsoft.VisualBasic.Right(readLine, 17)
If wordIndex = "11" Then
data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "81" Then ' Target Easting
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "82" Then ' Target Northing
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "83" Then ' Target Height
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + vbCrLf)
ElseIf wordIndex = "84" Then ' Station Easting
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "85" Then ' Station Northing
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + " ")
ElseIf wordIndex = "86" Then ' Station Height
numData = data / 1000
data = Format(numData, "0.000")
If ToolStripComboBox2.Text = "Pika" Then
data = data.ToString.Replace(",", ".")
End If
RichTextBox1.AppendText(data + vbCrLf)
Else
numData = 0
data = ""
End If
End If
Next
Loop
ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
SaveFileDialog1.Filter = "KOO datoteka|*.koo|Text file|*.txt|All files|*.*"
streamReader.Close()
tsbSaveAs.Enabled = True
tsbSaveAs.Text = "Shrani Točke"
Private Sub tsbSaveAs_Click(sender As Object, e As EventArgs) Handles tsbSaveAs.Click
SaveFileDialog1.FileName = Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
If SaveFileDialog1.ShowDialog = DialogResult.OK Then
RichTextBox1.SaveFile(SaveFileDialog1.FileName, RichTextBoxStreamType.PlainText)
ToolStripStatusLabel1.Text = "Shranjeno: " + SaveFileDialog1.FileName.ToString
RichTextBox1.BackColor = SystemColors.ControlLightLight
My.Computer.FileSystem.WriteAllText(DatotekaLogfile, System.DateTime.Now.ToString("yyyy/MM/dd HH:mm:ss") + " | " + OpenFileDialog1.FileName.ToString + " -> " + SaveFileDialog1.FileName.ToString + vbCrLf, True)
End If
End Sub
Private Sub tsbHelp_Click(sender As Object, e As EventArgs) Handles tsbHelp.Click
MessageBox.Show("Za konvertiranje GSI datoteke najprej izberi datoteko, ki jo želiš konvertirati z ukazom 'Open File'. Nato izberi metodo konverzije (Poročilo, Merjene točke, Vse točke). Po končani knverziji shrani novo datoteko z ukazom 'Save As...'",
"Kratka navodila")
' MessageBox.Show("Za konvertiranje GSI datoteke najprej izberi datoteko, ki jo želiš konvertirati z ukazom 'Open File'. Nato izberi metodo konverzije (Poročilo, Merjene točke, Vse točke). Po končani knverziji shrani novo datoteko z ukazom 'Save As...'","Kratka navodila")
SplashScreen1.ShowDialog()
End Sub
Private Sub ToolStripComboBox2_Click(sender As Object, e As EventArgs) Handles MyBase.FormClosing
My.Settings.DecimalnoLocilo = tsbDecimale.Text
My.Settings.Save()
End Sub
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ButtonUrediDat.Click
Form2.ShowDialog()
End Sub
Private Sub ToolStripButtonNast_Click(sender As Object, e As EventArgs) Handles ToolStripButtonNast.Click
FormNastavitve.ShowDialog()
End Sub
End Class

204
Form2.Designer.vb generated Normal file
View File

@ -0,0 +1,204 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class Form2
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.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form2))
Me.RichTextBoxEdit = New System.Windows.Forms.RichTextBox()
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
Me.BtnShraniF2 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
Me.ComBoxKoda = New System.Windows.Forms.ToolStripComboBox()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel()
Me.SaveFileDialog2 = New System.Windows.Forms.SaveFileDialog()
Me.MyApplicationBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.MyApplicationBindingSource1 = New System.Windows.Forms.BindingSource(Me.components)
Me.ToolStrip1.SuspendLayout()
Me.StatusStrip1.SuspendLayout()
CType(Me.MyApplicationBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.MyApplicationBindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'RichTextBoxEdit
'
Me.RichTextBoxEdit.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.RichTextBoxEdit.DetectUrls = False
Me.RichTextBoxEdit.EnableAutoDragDrop = True
Me.RichTextBoxEdit.Font = New System.Drawing.Font("Courier New", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.RichTextBoxEdit.Location = New System.Drawing.Point(12, 35)
Me.RichTextBoxEdit.Name = "RichTextBoxEdit"
Me.RichTextBoxEdit.Size = New System.Drawing.Size(1160, 551)
Me.RichTextBoxEdit.TabIndex = 2
Me.RichTextBoxEdit.Text = ""
Me.RichTextBoxEdit.WordWrap = False
'
'ToolStrip1
'
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BtnShraniF2, Me.ToolStripSeparator3, Me.ToolStripButton3, Me.ToolStripSeparator1, Me.ToolStripLabel1, Me.ComBoxKoda, Me.ToolStripButton2, Me.ToolStripSeparator2, Me.ToolStripButton1})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(10, 5, 10, 0)
Me.ToolStrip1.Size = New System.Drawing.Size(1184, 32)
Me.ToolStrip1.TabIndex = 3
Me.ToolStrip1.Text = "ToolStrip1"
'
'BtnShraniF2
'
Me.BtnShraniF2.Enabled = False
Me.BtnShraniF2.Image = Global.TPS1100_Convert.My.Resources.Resources.Save_as_24
Me.BtnShraniF2.ImageTransparentColor = System.Drawing.Color.Magenta
Me.BtnShraniF2.Name = "BtnShraniF2"
Me.BtnShraniF2.Size = New System.Drawing.Size(73, 24)
Me.BtnShraniF2.Text = "Shrani..."
'
'ToolStripSeparator3
'
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 27)
'
'ToolStripButton3
'
Me.ToolStripButton3.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_50
Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton3.Name = "ToolStripButton3"
Me.ToolStripButton3.Size = New System.Drawing.Size(58, 24)
Me.ToolStripButton3.Text = "Zapri"
'
'ToolStripSeparator1
'
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 27)
'
'ToolStripLabel1
'
Me.ToolStripLabel1.Name = "ToolStripLabel1"
Me.ToolStripLabel1.Size = New System.Drawing.Size(45, 24)
Me.ToolStripLabel1.Text = "Koda >"
'
'ComBoxKoda
'
Me.ComBoxKoda.DropDownWidth = 180
Me.ComBoxKoda.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ComBoxKoda.Items.AddRange(New Object() {"10: Quick Set", "20: Set Azimuth", "30: Resection", "40: Free Station", "50: Ori. & Ht. Transfer", "90: Measured", "99: Imported/User-Entered"})
Me.ComBoxKoda.Name = "ComBoxKoda"
Me.ComBoxKoda.Size = New System.Drawing.Size(180, 27)
Me.ComBoxKoda.ToolTipText = "Izberi kodo..."
'
'ToolStripButton2
'
Me.ToolStripButton2.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_advance_48
Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton2.Name = "ToolStripButton2"
Me.ToolStripButton2.Size = New System.Drawing.Size(62, 24)
Me.ToolStripButton2.Text = "Vstavi"
Me.ToolStripButton2.ToolTipText = "Vstavi vrstico..."
'
'ToolStripSeparator2
'
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 27)
'
'ToolStripButton1
'
Me.ToolStripButton1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_undo_48
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton1.Name = "ToolStripButton1"
Me.ToolStripButton1.Size = New System.Drawing.Size(65, 24)
Me.ToolStripButton1.Text = "Povrni"
'
'StatusStrip1
'
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1})
Me.StatusStrip1.Location = New System.Drawing.Point(0, 589)
Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Size = New System.Drawing.Size(1184, 22)
Me.StatusStrip1.TabIndex = 4
Me.StatusStrip1.Text = "StatusStrip1"
'
'ToolStripStatusLabel1
'
Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(69, 17)
Me.ToolStripStatusLabel1.Text = "Nalaganje..."
'
'SaveFileDialog2
'
Me.SaveFileDialog2.Filter = "GSI Files|*.GSI"
'
'MyApplicationBindingSource
'
Me.MyApplicationBindingSource.DataSource = GetType(TPS1100_Convert.My.MyApplication)
'
'MyApplicationBindingSource1
'
Me.MyApplicationBindingSource1.DataSource = GetType(TPS1100_Convert.My.MyApplication)
'
'Form2
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(1184, 611)
Me.Controls.Add(Me.StatusStrip1)
Me.Controls.Add(Me.ToolStrip1)
Me.Controls.Add(Me.RichTextBoxEdit)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "Form2"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "TPS1100 Convert - Urejanje"
Me.ToolStrip1.ResumeLayout(False)
Me.ToolStrip1.PerformLayout()
Me.StatusStrip1.ResumeLayout(False)
Me.StatusStrip1.PerformLayout()
CType(Me.MyApplicationBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.MyApplicationBindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents MyApplicationBindingSource As BindingSource
Friend WithEvents MyApplicationBindingSource1 As BindingSource
Friend WithEvents RichTextBoxEdit As RichTextBox
Friend WithEvents ToolStrip1 As ToolStrip
Friend WithEvents BtnShraniF2 As ToolStripButton
Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
Friend WithEvents ToolStripLabel1 As ToolStripLabel
Friend WithEvents ComBoxKoda As ToolStripComboBox
Friend WithEvents ToolStripButton2 As ToolStripButton
Friend WithEvents StatusStrip1 As StatusStrip
Friend WithEvents ToolStripStatusLabel1 As ToolStripStatusLabel
Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
Friend WithEvents ToolStripButton1 As ToolStripButton
Friend WithEvents SaveFileDialog2 As SaveFileDialog
Friend WithEvents ToolStripButton3 As ToolStripButton
Friend WithEvents ToolStripSeparator3 As ToolStripSeparator
End Class

3080
Form2.resx Normal file
View File

File diff suppressed because it is too large Load Diff

116
Form2.vb Normal file
View File

@ -0,0 +1,116 @@
Imports System.IO
Imports System.Windows.Forms.VisualStyles.VisualStyleElement
Public Class Form2
Public DatotekaSpemembe As Boolean = False
Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Activated
' PropertyGrid1.SelectedObject = My.Settings
' ' Attribute for the user-scope settings.
' Dim userAttr As New System.Configuration.UserScopedSettingAttribute
' Dim attrs As New System.ComponentModel.AttributeCollection(userAttr)
' PropertyGrid1.BrowsableAttributes = attrs
Form1.Hide()
RichTextBoxEdit.Clear()
' prepare StreamReader
Dim streamReader As StreamReader = New StreamReader(My.Settings.ZadnjaMapa)
Dim i As Integer = 0
' loop untill end of stream
Do Until streamReader.EndOfStream
' Beri vrstico po vrstico
Dim line As String = streamReader.ReadLine()
RichTextBoxEdit.AppendText(line + vbCrLf)
i = i + 1
Loop
ToolStripStatusLabel1.Text = "Prebrano: " + i.ToString + " | Datoteka: " + My.Settings.ZadnjaMapa
DatotekaSpemembe = False
BtnShraniF2.Enabled = False
streamReader.Close()
streamReader.Dispose()
End Sub
Private Sub Form2_Close(sender As Object, e As EventArgs) Handles MyBase.Closing
' If DatotekaSpemembe = True Then
' MessageBox.Show("Shranim spremembe?", "Podatki spremenjeni", MessageBoxButtons.YesNo)
' If MessageBoxButtons.YesNo = vbYes Then
' RichTextBoxEdit.SaveFile(My.Settings.ZadnjaMapa, RichTextBoxStreamType.PlainText)
' BtnShraniF2.Enabled = False
' DatotekaSpemembe = False
' End If
' End If
Form1.RichTextBox1.Clear()
Form1.streamLines = 0
Dim streamReader As StreamReader = New StreamReader(Form1.OpenFileDialog1.FileName)
Do Until streamReader.EndOfStream
Form1.RichTextBox1.AppendText(streamReader.ReadLine + vbCrLf)
Form1.streamLines = Form1.streamLines + 1
Loop
Form1.ToolStripProgressBar1.Maximum = Form1.streamLines
streamReader.Close()
streamReader.Dispose()
Form1.Show()
End Sub
Private Sub RichTextBox1_TextChanged(sender As Object, e As EventArgs) Handles RichTextBoxEdit.TextChanged
ToolStripStatusLabel1.Text = "Spremenjeni podatki... datoteka je bila urejana."
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
End Sub
Private Sub BtnShraniF2_Click(sender As Object, e As EventArgs) Handles BtnShraniF2.Click
' SaveFileDialog2.FileName = My.Settings.ZadnjaMapa
' If SaveFileDialog2.ShowDialog = DialogResult.OK Then
RichTextBoxEdit.SaveFile(My.Settings.ZadnjaMapa, RichTextBoxStreamType.PlainText)
ToolStripStatusLabel1.Text = "Shranjeno: " + SaveFileDialog2.FileName.ToString
BtnShraniF2.Enabled = False
DatotekaSpemembe = False
' End If
End Sub
Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
RichTextBoxEdit.Focus()
RichTextBoxEdit.SelectionStart = RichTextBoxEdit.GetFirstCharIndexOfCurrentLine
SendKeys.Send("+{HOME}")
If ComBoxKoda.SelectedIndex = 0 Then
RichTextBoxEdit.SelectedText = "*410000+0000000000000010 " + vbCrLf
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
ElseIf ComBoxKoda.SelectedIndex = 1 Then
RichTextBoxEdit.SelectedText = "*410000+0000000000000020 " + vbCrLf
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
ElseIf ComBoxKoda.SelectedIndex = 2 Then
RichTextBoxEdit.SelectedText = "*410000+0000000000000030 " + vbCrLf
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
ElseIf ComBoxKoda.SelectedIndex = 3 Then
RichTextBoxEdit.SelectedText = "*410000+0000000000000040 " + vbCrLf
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
ElseIf ComBoxKoda.SelectedIndex = 4 Then
RichTextBoxEdit.SelectedText = "*410000+0000000000000050 " + vbCrLf
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
ElseIf ComBoxKoda.SelectedIndex = 5 Then
RichTextBoxEdit.SelectedText = "*410000+0000000000000090 " + vbCrLf
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
ElseIf ComBoxKoda.SelectedIndex = 6 Then
RichTextBoxEdit.SelectedText = "*410000+0000000000000099 " + vbCrLf
BtnShraniF2.Enabled = True
DatotekaSpemembe = True
End If
End Sub
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
RichTextBoxEdit.Undo()
End Sub
Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Handles ToolStripButton3.Click
Me.Close()
End Sub
End Class

279
FormNastavitve.Designer.vb generated Normal file
View File

@ -0,0 +1,279 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class FormNastavitve
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()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FormNastavitve))
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
Me.RadioButton1 = New System.Windows.Forms.RadioButton()
Me.RadioButton2 = New System.Windows.Forms.RadioButton()
Me.GroupBox2 = New System.Windows.Forms.GroupBox()
Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
Me.RadioButton3 = New System.Windows.Forms.RadioButton()
Me.RadioButton4 = New System.Windows.Forms.RadioButton()
Me.GroupBox3 = New System.Windows.Forms.GroupBox()
Me.TextBoxLog = New System.Windows.Forms.TextBox()
Me.ButtonOdpriLog = New System.Windows.Forms.Button()
Me.OpenFileDialogLog = New System.Windows.Forms.OpenFileDialog()
Me.SaveFileDialogLog = New System.Windows.Forms.SaveFileDialog()
Me.ToolStrip1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.TableLayoutPanel1.SuspendLayout()
Me.GroupBox2.SuspendLayout()
Me.TableLayoutPanel2.SuspendLayout()
Me.GroupBox3.SuspendLayout()
Me.SuspendLayout()
'
'ToolStrip1
'
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton1, Me.ToolStripButton2})
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
Me.ToolStrip1.Name = "ToolStrip1"
Me.ToolStrip1.Size = New System.Drawing.Size(309, 25)
Me.ToolStrip1.TabIndex = 1
Me.ToolStrip1.Text = "ToolStrip1"
'
'ToolStripButton1
'
Me.ToolStripButton1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_save_as_50
Me.ToolStripButton1.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton1.Name = "ToolStripButton1"
Me.ToolStripButton1.Size = New System.Drawing.Size(60, 22)
Me.ToolStripButton1.Text = "Shrani"
'
'ToolStripButton2
'
Me.ToolStripButton2.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_50
Me.ToolStripButton2.ImageTransparentColor = System.Drawing.Color.Magenta
Me.ToolStripButton2.Name = "ToolStripButton2"
Me.ToolStripButton2.Size = New System.Drawing.Size(54, 22)
Me.ToolStripButton2.Text = "Zapri"
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.TableLayoutPanel1)
Me.GroupBox1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox1.Location = New System.Drawing.Point(12, 28)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(285, 66)
Me.GroupBox1.TabIndex = 2
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Ločilo med podatki"
'
'TableLayoutPanel1
'
Me.TableLayoutPanel1.ColumnCount = 2
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Controls.Add(Me.RadioButton1, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.RadioButton2, 1, 0)
Me.TableLayoutPanel1.Location = New System.Drawing.Point(7, 22)
Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
Me.TableLayoutPanel1.RowCount = 1
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.Size = New System.Drawing.Size(272, 32)
Me.TableLayoutPanel1.TabIndex = 3
'
'RadioButton1
'
Me.RadioButton1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.RadioButton1.AutoSize = True
Me.RadioButton1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.RadioButton1.Location = New System.Drawing.Point(3, 3)
Me.RadioButton1.Name = "RadioButton1"
Me.RadioButton1.Size = New System.Drawing.Size(80, 26)
Me.RadioButton1.TabIndex = 0
Me.RadioButton1.TabStop = True
Me.RadioButton1.Text = "Presledek"
Me.RadioButton1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
Me.RadioButton1.UseVisualStyleBackColor = True
'
'RadioButton2
'
Me.RadioButton2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.RadioButton2.AutoSize = True
Me.RadioButton2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.RadioButton2.Location = New System.Drawing.Point(139, 3)
Me.RadioButton2.Name = "RadioButton2"
Me.RadioButton2.Size = New System.Drawing.Size(77, 26)
Me.RadioButton2.TabIndex = 2
Me.RadioButton2.TabStop = True
Me.RadioButton2.Text = "Tabulator"
Me.RadioButton2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
Me.RadioButton2.UseVisualStyleBackColor = True
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.TableLayoutPanel2)
Me.GroupBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox2.Location = New System.Drawing.Point(12, 100)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(285, 66)
Me.GroupBox2.TabIndex = 3
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "Decimalno ločilo"
'
'TableLayoutPanel2
'
Me.TableLayoutPanel2.ColumnCount = 2
Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel2.Controls.Add(Me.RadioButton3, 0, 0)
Me.TableLayoutPanel2.Controls.Add(Me.RadioButton4, 1, 0)
Me.TableLayoutPanel2.Location = New System.Drawing.Point(7, 22)
Me.TableLayoutPanel2.Name = "TableLayoutPanel2"
Me.TableLayoutPanel2.RowCount = 1
Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel2.Size = New System.Drawing.Size(272, 32)
Me.TableLayoutPanel2.TabIndex = 3
'
'RadioButton3
'
Me.RadioButton3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.RadioButton3.AutoSize = True
Me.RadioButton3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.RadioButton3.Location = New System.Drawing.Point(3, 3)
Me.RadioButton3.Name = "RadioButton3"
Me.RadioButton3.Size = New System.Drawing.Size(49, 26)
Me.RadioButton3.TabIndex = 0
Me.RadioButton3.TabStop = True
Me.RadioButton3.Text = "Pika"
Me.RadioButton3.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
Me.RadioButton3.UseVisualStyleBackColor = True
'
'RadioButton4
'
Me.RadioButton4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.RadioButton4.AutoSize = True
Me.RadioButton4.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.RadioButton4.Location = New System.Drawing.Point(139, 3)
Me.RadioButton4.Name = "RadioButton4"
Me.RadioButton4.Size = New System.Drawing.Size(58, 26)
Me.RadioButton4.TabIndex = 2
Me.RadioButton4.TabStop = True
Me.RadioButton4.Text = "Vejica"
Me.RadioButton4.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
Me.RadioButton4.UseVisualStyleBackColor = True
'
'GroupBox3
'
Me.GroupBox3.Controls.Add(Me.TextBoxLog)
Me.GroupBox3.Controls.Add(Me.ButtonOdpriLog)
Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.GroupBox3.Location = New System.Drawing.Point(19, 173)
Me.GroupBox3.Name = "GroupBox3"
Me.GroupBox3.Size = New System.Drawing.Size(278, 97)
Me.GroupBox3.TabIndex = 4
Me.GroupBox3.TabStop = False
Me.GroupBox3.Text = "Zapisnik obdelave podatkov"
'
'TextBoxLog
'
Me.TextBoxLog.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.TextBoxLog.Location = New System.Drawing.Point(6, 21)
Me.TextBoxLog.Name = "TextBoxLog"
Me.TextBoxLog.Size = New System.Drawing.Size(231, 22)
Me.TextBoxLog.TabIndex = 1
'
'ButtonOdpriLog
'
Me.ButtonOdpriLog.BackgroundImage = Global.TPS1100_Convert.My.Resources.Resources.icons8_browse_folder_50_2
Me.ButtonOdpriLog.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.ButtonOdpriLog.FlatStyle = System.Windows.Forms.FlatStyle.Popup
Me.ButtonOdpriLog.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.ButtonOdpriLog.Location = New System.Drawing.Point(244, 21)
Me.ButtonOdpriLog.Name = "ButtonOdpriLog"
Me.ButtonOdpriLog.Size = New System.Drawing.Size(28, 22)
Me.ButtonOdpriLog.TabIndex = 0
Me.ButtonOdpriLog.UseVisualStyleBackColor = True
'
'OpenFileDialogLog
'
Me.OpenFileDialogLog.CheckFileExists = False
Me.OpenFileDialogLog.DefaultExt = "Text File|*.txt"
Me.OpenFileDialogLog.FileName = "tps1100_log.txt"
Me.OpenFileDialogLog.Filter = "Text File|*.txt"
'
'SaveFileDialogLog
'
Me.SaveFileDialogLog.DefaultExt = "Text File|*.txt"
Me.SaveFileDialogLog.FileName = "tps1100_log.txt"
Me.SaveFileDialogLog.Filter = "Text File|*.txt"
'
'FormNastavitve
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(309, 282)
Me.Controls.Add(Me.GroupBox3)
Me.Controls.Add(Me.GroupBox2)
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.ToolStrip1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "FormNastavitve"
Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "Nastavitve"
Me.TopMost = True
Me.ToolStrip1.ResumeLayout(False)
Me.ToolStrip1.PerformLayout()
Me.GroupBox1.ResumeLayout(False)
Me.TableLayoutPanel1.ResumeLayout(False)
Me.TableLayoutPanel1.PerformLayout()
Me.GroupBox2.ResumeLayout(False)
Me.TableLayoutPanel2.ResumeLayout(False)
Me.TableLayoutPanel2.PerformLayout()
Me.GroupBox3.ResumeLayout(False)
Me.GroupBox3.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents ToolStrip1 As ToolStrip
Friend WithEvents GroupBox1 As GroupBox
Friend WithEvents RadioButton1 As RadioButton
Friend WithEvents RadioButton2 As RadioButton
Friend WithEvents ToolStripButton1 As ToolStripButton
Friend WithEvents ToolStripButton2 As ToolStripButton
Friend WithEvents TableLayoutPanel1 As TableLayoutPanel
Friend WithEvents GroupBox2 As GroupBox
Friend WithEvents TableLayoutPanel2 As TableLayoutPanel
Friend WithEvents RadioButton3 As RadioButton
Friend WithEvents RadioButton4 As RadioButton
Friend WithEvents GroupBox3 As GroupBox
Friend WithEvents TextBoxLog As TextBox
Friend WithEvents ButtonOdpriLog As Button
Friend WithEvents OpenFileDialogLog As OpenFileDialog
Friend WithEvents SaveFileDialogLog As SaveFileDialog
End Class

3074
FormNastavitve.resx Normal file
View File

File diff suppressed because it is too large Load Diff

76
FormNastavitve.vb Normal file
View File

@ -0,0 +1,76 @@
Public Class FormNastavitve
Private Sub FormNastavitve_Load(sender As Object, e As EventArgs) Handles MyBase.Load
If My.Settings.Stolpci = 0 Then
RadioButton1.Checked = True
ElseIf My.Settings.Stolpci = 1 Then
RadioButton2.Checked = True
End If
If My.Settings.DecimalnoLocilo = "Pika" Then
RadioButton3.Checked = True
ElseIf My.Settings.DecimalnoLocilo = "Vejica" Then
RadioButton4.Checked = True
End If
TextBoxLog.Text = My.Settings.DatLogfile.ToString
End Sub
Private Sub FormNastavitve_Closing(sender As Object, e As EventArgs) Handles MyBase.Closing
If RadioButton1.Checked = True Then
My.Settings.Stolpci = 0
End If
If RadioButton2.Checked = True Then
My.Settings.Stolpci = 1
End If
If RadioButton3.Checked = True Then
My.Settings.DecimalnoLocilo = "Pika"
End If
If RadioButton4.Checked = True Then
My.Settings.DecimalnoLocilo = "Vejica"
End If
My.Settings.Save()
Form1.tsbDecimale.Text = My.Settings.DecimalnoLocilo
Form1.tsbStolpci.SelectedIndex = My.Settings.Stolpci
Form1.DatotekaLogfile = My.Settings.DatLogfile
End Sub
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
If RadioButton1.Checked = True Then
My.Settings.Stolpci = 0
End If
If RadioButton2.Checked = True Then
My.Settings.Stolpci = 1
End If
If RadioButton3.Checked = True Then
My.Settings.DecimalnoLocilo = "Pika"
End If
If RadioButton4.Checked = True Then
My.Settings.DecimalnoLocilo = "Vejica"
End If
My.Settings.DatLogfile = SaveFileDialogLog.FileName.ToString
My.Settings.Save()
End Sub
Private Sub ButtonOdpriLog_Click(sender As Object, e As EventArgs) Handles ButtonOdpriLog.Click
If SaveFileDialogLog.ShowDialog = DialogResult.OK Then
TextBoxLog.Text = SaveFileDialogLog.FileName.ToString
My.Settings.DatLogfile = SaveFileDialogLog.FileName.ToString
End If
End Sub
Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
Me.Close()
End Sub
End Class

4
My Project/Application.Designer.vb generated
View File

@ -25,9 +25,9 @@ Namespace My
Public Sub New()
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
Me.IsSingleInstance = false
Me.EnableVisualStyles = true
Me.EnableVisualStyles = false
Me.SaveMySettingsOnExit = true
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterAllFormsClose
End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _

4
My Project/Application.myapp
View File

@ -3,8 +3,8 @@
<MySubMain>true</MySubMain>
<MainForm>Form1</MainForm>
<SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>
<ShutdownMode>1</ShutdownMode>
<EnableVisualStyles>false</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode>
<MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>

14
My Project/AssemblyInfo.vb
View File

@ -1,4 +1,5 @@
Imports System
Imports System.Resources
Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices
@ -9,10 +10,10 @@ Imports System.Runtime.InteropServices
' Review the values of the assembly attributes
<Assembly: AssemblyTitle("TPS1100 Convert")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")>
<Assembly: AssemblyDescription("Program za konvertiranje GSI datotek")>
<Assembly: AssemblyCompany("2B geoinformatika, d.o.o.")>
<Assembly: AssemblyProduct("TPS1100 Convert")>
<Assembly: AssemblyCopyright("Copyright © 2016")>
<Assembly: AssemblyCopyright("Copyright © 2024")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)>
@ -31,5 +32,6 @@ Imports System.Runtime.InteropServices
' by using the '*' as shown below:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>
<Assembly: AssemblyVersion("2.5.0.7")>
<Assembly: AssemblyFileVersion("2.5.0.7")>
<Assembly: NeutralResourcesLanguage("sl-SI")>

139
My Project/Data/GSI_data.ini Normal file
View File

@ -0,0 +1,139 @@
[WORD_INDEX]
11 = Pointnumber # 11 / block: 11....+00000H66
# PtNo=“H66“
12 = Serial number # 12 / block: 12....+00640054
# S.No. “640054”
13 = Instrument type # 13; 13....+00TCR305
# Instr. “TCR305”
19 = Time # 19 / block: 19....+02081029
# [MM.DD.hh.mm]
21 = Horizontal Angle # 21 / block: 21.102+17920860
# Hz „179.086“ gon
22 = Vertical Angle # 22 / block: 22.102+07567500
# V: „75.675“ gon
25 = Horizontal Angle Delta Azimuth # 22 / block: 22.102+07567500
# V: „75.675“ gon
31 = Slope distance # 31; e-g. 31..00+00003387
# Sdist: „3.387“ m
32 = Horizontal distance # 32 / block: 32..00+00003198
# Hdist: „3.198“ m
33 = Height difference # 33 / block: 33..00+00001119
# Hdiff: „1.119“ m
41 = Code-Block ID # 41 / block: 41....+00000013
# Code: „13“ m
42 = Information 1 # 42 / block: 42....+000TREES
# Info1: „TREES“
43 = Information 2 # 43 / block: 43....+000004.5
# Info2: „4.5“
44 = Information 3 # 44 / block: 44....+00CAT.02
# Info3: „CAT.02“
45 = Information 4 # 45 / block: 45....+000000NN
# Info4: „NN“
46 = Information 5 # 46 / block: 46....+000000NN
# Info5: „NN“
47 = Information 6 # 47 / block: 47....+000000NN
# Info6: „NN“
48 = Information 7 # 48 / block: 48....+000000NN
# Info7: „NN“
49 = Information 8 # 49 / block: 49....+000000NN
# Info8: „NN“
51 = PPM/mm # 51 / block: 51..1.+0000+034
# “0”ppm; “34”mm
58 = Prism constant # 58 / block: 58..16+00000020
# Prism „2“ mm
59 = PPM # 59 / block: 59..16+02200000
# PPM „220“
71 = Remark 1
# (or Attribute 1)
# 71 / block: 71....+0000REM1
# “REM1”
72 = Remark 2
# (or Attribute 2)
# 72 / block: 72....+0000REM2
# “REM2”
73 = Remark 3
# (or Attribute 3)
# 73 / block: 73....+0000REM3
# “REM3”
74 = Remark 4
# (or Attribute 4)
# 74 / block: 74....+0000REM4
# “REM4”
75 = Remark 5
# (or Attribute 5)
# 75 / block: 75....+0000REM5
# “REM5”
76 = Remark 6
# (or Attribute 6)
# 76 / block: 76....+0000REM6
# “REM6”
77 = Remark 7
# (or Attribute 7)
# 77 / block: 77....+0000REM7
# “REM7”
78 = Remark 8 # (or Attribute 8)
# 78 / block: 78....+0000REM8
# “REM8”
79 = Remark 9
# (or Attribute 9)
# 79 / block: 79....+0000REM9
# “REM9”
81 = Easting
# (E)
# 81 / block: 81..00+01999507
# E: “1999.507”m
82 = Northing
# (N)
# 82 / block: 82..00+00213159
# N: “2139.159”m
83 = Elevation
# (H)
# 83 / block: 83..00-00032881
# H: “32.881”m
84 = St. Easting
# (E0)
# 84 / block: 84..11+00393700
# E: “393.700”m
85 = St. Northing
# (N0)
# 85 / block: 85..11+06561220
# N: “6561.220”m
86 = St. Height
# (H0)
# 86 / block: 86..11+00065618
# H: “65.618”m
87 = Reflector height
# (hr)
# 87 / block: 87..11+00001700
# hr: “1.700” m
88 = Instrument height
# (hi)
# 88 / block: 88..11+00001550
# hi: “1.550” m
[AUTOMATIC_INDEX_INFORMATION]
# POS : 4
0 = Automatic index OFF
1 = Automatic index OPERATING
3 = Automatic index OPERATING
[INPUT_MODE]
# POS : 5
0 = Original measured values transferred from the instrument
1 = Manual input from keyboard
2 = Measured value, Hz-Correction ON
3 = Measured value, Hz-Correction OFF
4 = Result of special function
[UNITS]
# POS : 6
0 = Meter # (last digit: 1mm / 0.000m)
1 = Feet # (last digit: 1/1000ft / 0.000ft)
2 = 400 gon
3 = 360° decimal # (DDD.DDDDD)
4 = 360° sexagesimal # (DDD.MMSSS)
5 = 6400 mil
6 = Meter # (last digit: 1/10mm)
7 = Feet # (last digit: 1/10‘000ft)
8 = Meter # (last digit: 1/100mm)

8
My Project/Data/GSI_user.ini Normal file
View File

@ -0,0 +1,8 @@
[CODE]
10 = Quick Set
20 = Set Azimuth
30 = Resection
40 = Free Station
90 = Measured Data
99 = Imported Data

1
TEST.GSI → My Project/Data/TEST.GSI
View File

@ -1,3 +1,4 @@
*410000+0000000000000099
*110001+00000000000GS001 81..00+0000000465423089 82..00+0000000110526243 83..00+0000000000301586
*110002+00000000000GS002 81..00+0000000465437688 82..00+0000000110547569 83..00+0000000000302107
*110003+00000000000GS003 81..00+0000000465472908 82..00+0000000110527226 83..00+0000000000302945

44
My Project/Data/TEST.koo Normal file
View File

@ -0,0 +1,44 @@
GS001 465423.089 110526.243 301.586 REF
GS002 465437.688 110547.569 302.107 REF
GS003 465472.908 110527.226 302.945 REF
11111 465444.529 110546.554 302.353 STA
GS003 465472.895 110527.228 302.954 MEAS
GS001 465423.100 110526.246 301.598 MEAS
GS002 465437.693 110547.564 302.084 MEAS
1 465474.729 110533.795 303.558 MEAS
2 465463.403 110539.024 302.973 MEAS
3 465455.561 110542.757 302.689 MEAS
4 465446.424 110547.098 302.354 MEAS
5 465447.834 110549.258 302.521 MEAS
6 465447.013 110549.645 302.470 MEAS
7 465447.133 110549.911 302.484 MEAS
8 465442.260 110552.180 302.590 MEAS
9 465439.917 110549.069 302.276 MEAS
10 465434.013 110548.886 302.034 MEAS
11 465447.924 110549.193 303.527 MEAS
12 465448.112 110549.481 303.244 MEAS
13 465452.362 110554.843 304.664 MEAS
14 465454.504 110557.544 305.149 MEAS
15 465453.962 110560.654 305.190 MEAS
16 465451.792 110572.598 306.363 MEAS
17 465452.236 110573.476 307.192 MEAS
18 465451.552 110573.751 306.829 MEAS
19 465460.165 110569.493 306.147 MEAS
20 465460.732 110564.366 308.875 MEAS
21 465456.144 110555.142 308.718 MEAS
22 465466.357 110550.055 310.853 MEAS
23 465457.019 110582.726 312.411 MEAS
24 465471.010 110580.229 312.548 MEAS
31 465443.141 110551.729 303.779 MEAS
32 465440.407 110548.265 302.097 MEAS
33 465438.211 110547.118 302.072 MEAS
34 465434.570 110547.693 301.894 MEAS
35 465436.599 110547.165 301.948 MEAS
36 465439.124 110546.897 302.006 MEAS
37 465441.653 110546.549 302.094 MEAS
38 465446.526 110544.850 302.298 MEAS
39 465454.849 110541.033 302.554 MEAS
40 465460.359 110538.438 302.711 MEAS
41 465472.352 110532.887 302.986 MEAS
42 465473.669 110532.696 303.036 MEAS
43 465474.578 110533.313 303.177 MEAS

65
My Project/Data/TEST.mer Normal file
View File

@ -0,0 +1,65 @@
TPS 1100 Zapisnik
++++++++++++++++++++++++++++++++
Imported/User-Entered:
----------------------
PtID E N H
GS001 465423.089 110526.243 301.586
GS002 465437.688 110547.569 302.107
GS003 465472.908 110527.226 302.945
Setup: Free Station
=============================
PtID HZ V SD HD ReflHt PrCon HtDif PtCode
GS001 138.3101 89.3234 29.523 29.522 2.500 0.0175 -0.754
GS002 190.2304 103.3841 7.115 6.914 0.100 0.0175 -0.268
GS003 36.1441 91.2102 34.333 34.324 0.100 0.0175 0.601
Station:
****************
PtID HzCor StnE StnN StnH ReflHt InstHt
11111 88.0119 465444.529 110546.554 302.353 0.100 1.510
Measured:
----------------------
PtID HZ V SD HD ReflHt PrCon HtDif E N H PtCode
GS003 124.1559 91.2102 34.332 34.323 0.100 0.0175 0.601 465472.895 110527.228 302.954
GS001 226.3226 89.3239 29.524 29.523 2.500 0.0175 -0.755 465423.100 110526.246 301.598
GS002 278.2430 103.3939 7.112 6.911 0.100 0.0175 -0.270 465437.693 110547.564 302.084
1 112.5409 88.1545 32.800 32.785 1.300 0.0175 1.205 465474.729 110533.795 303.558
2 111.4452 88.5039 20.325 20.321 1.300 0.0175 0.620 465463.403 110539.024 302.973
3 108.5920 89.2251 11.668 11.667 1.300 0.0175 0.336 465455.561 110542.757 302.689
4 73.5833 96.0303 1.983 1.972 1.300 0.0175 0.001 465446.424 110547.098 302.354
5 50.4246 107.2703 4.476 4.270 0.000 0.0344 0.168 465447.834 110549.258 302.521
6 38.4642 109.2145 4.204 3.966 0.000 0.0344 0.116 465447.013 110549.645 302.470
7 37.4746 107.5859 4.468 4.249 0.000 0.0344 0.131 465447.133 110549.911 302.484
8 338.0216 101.5057 6.199 6.067 0.000 0.0344 0.237 465442.260 110552.180 302.590
9 298.3616 106.4853 5.488 5.254 0.000 0.0344 -0.078 465439.917 110549.069 302.276
10 282.3022 92.4844 10.785 10.772 1.300 0.0175 -0.319 465434.013 110548.886 302.034
11 52.0802 94.2821 4.313 4.300 0.000 0.0344 1.174 465447.924 110549.193 303.527
12 50.4445 81.3752 4.677 4.627 1.300 0.0175 0.891 465448.112 110549.481 303.244
13 43.2242 79.3342 11.597 11.405 1.300 0.0175 2.311 465452.362 110554.843 304.664
14 42.1339 80.0701 15.065 14.842 1.300 0.0175 2.796 465454.504 110557.544 305.149
15 33.4646 81.1159 17.167 16.965 1.300 0.0175 2.836 465453.962 110560.654 305.190
16 15.3456 82.0003 27.304 27.038 1.300 0.0175 4.010 465451.792 110572.598 306.363
17 15.5830 80.3654 28.384 28.004 1.300 0.0175 4.838 465452.236 110573.476 307.192
18 14.2841 81.2154 28.412 28.090 1.300 0.0175 4.476 465451.552 110573.751 306.829
19 34.1646 82.3838 27.992 27.761 1.300 0.0175 3.794 465460.165 110569.493 306.147
20 42.1727 78.1433 24.595 24.079 0.000 0.0344 6.522 465460.732 110564.366 308.875
21 53.3104 71.2531 15.239 14.445 0.000 0.0344 6.364 465456.144 110555.142 308.718
22 80.5316 72.2717 23.186 22.107 0.000 0.0344 8.500 465466.357 110550.055 310.853
23 19.0258 77.2433 39.212 38.269 0.000 0.0344 10.058 465457.019 110582.726 312.411
24 38.1048 78.3224 43.712 42.840 0.000 0.0344 10.195 465471.010 110580.229 312.548
31 344.5857 90.5405 5.359 5.358 0.000 0.0344 1.426 465443.141 110551.729 303.779
32 292.3305 95.5811 4.488 4.464 1.300 0.0175 -0.257 465440.407 110548.265 302.097
33 275.0604 94.2552 6.362 6.343 1.300 0.0175 -0.282 465438.211 110547.118 302.072
34 276.3140 93.4917 10.047 10.024 1.300 0.0175 -0.460 465434.570 110547.693 301.894
35 274.2437 94.2524 7.978 7.954 1.300 0.0175 -0.405 465436.599 110547.165 301.948
36 273.3758 95.5230 5.445 5.416 1.300 0.0175 -0.347 465439.124 110546.897 302.006
37 269.5406 99.1634 2.914 2.876 1.300 0.0175 -0.260 465441.653 110546.549 302.094
38 130.2741 95.4557 2.638 2.625 1.300 0.0175 -0.055 465446.526 110544.850 302.298
39 118.0836 90.0246 11.703 11.703 1.300 0.0175 0.201 465454.849 110541.033 302.554
40 117.0839 89.3129 17.790 17.789 1.300 0.0175 0.358 465460.359 110538.438 302.711
41 116.0938 89.1307 31.001 30.998 1.300 0.0175 0.633 465472.352 110532.887 302.986
42 115.2603 89.0942 32.271 32.268 1.300 0.0175 0.682 465473.669 110532.696 303.036
43 113.4649 88.5545 32.842 32.836 1.300 0.0175 0.824 465474.578 110533.313 303.177

44
My Project/Data/TEST.txt Normal file
View File

@ -0,0 +1,44 @@
GS001 465423.089 110526.243 301.586
GS002 465437.688 110547.569 302.107
GS003 465472.908 110527.226 302.945
11111 465444.529 110546.554 302.353
GS003 465472.895 110527.228 302.954
GS001 465423.100 110526.246 301.598
GS002 465437.693 110547.564 302.084
1 465474.729 110533.795 303.558
2 465463.403 110539.024 302.973
3 465455.561 110542.757 302.689
4 465446.424 110547.098 302.354
5 465447.834 110549.258 302.521
6 465447.013 110549.645 302.470
7 465447.133 110549.911 302.484
8 465442.260 110552.180 302.590
9 465439.917 110549.069 302.276
10 465434.013 110548.886 302.034
11 465447.924 110549.193 303.527
12 465448.112 110549.481 303.244
13 465452.362 110554.843 304.664
14 465454.504 110557.544 305.149
15 465453.962 110560.654 305.190
16 465451.792 110572.598 306.363
17 465452.236 110573.476 307.192
18 465451.552 110573.751 306.829
19 465460.165 110569.493 306.147
20 465460.732 110564.366 308.875
21 465456.144 110555.142 308.718
22 465466.357 110550.055 310.853
23 465457.019 110582.726 312.411
24 465471.010 110580.229 312.548
31 465443.141 110551.729 303.779
32 465440.407 110548.265 302.097
33 465438.211 110547.118 302.072
34 465434.570 110547.693 301.894
35 465436.599 110547.165 301.948
36 465439.124 110546.897 302.006
37 465441.653 110546.549 302.094
38 465446.526 110544.850 302.298
39 465454.849 110541.033 302.554
40 465460.359 110538.438 302.711
41 465472.352 110532.887 302.986
42 465473.669 110532.696 303.036
43 465474.578 110533.313 303.177

10
My Project/DataSources/TPS1100_Convert.My.MyApplication.datasource Normal file
View File

@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="MyApplication" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>TPS1100_Convert.My.MyApplication, My Project.Resources.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

10
My Project/DataSources/TPS1100_Convert.My.MySettings.datasource Normal file
View File

@ -0,0 +1,10 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
This file is automatically generated by Visual Studio .Net. It is
used to store generic object data source configuration information.
Renaming the file extension or editing the content of this file may
cause the file to be unrecognizable by the program.
-->
<GenericObjectDataSource DisplayName="MySettings" Version="1.0" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TypeInfo>TPS1100_Convert.My.MySettings, My Project.Resources.Designer.vb.dll, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null</TypeInfo>
</GenericObjectDataSource>

0
Circled-Right-2-24.png → My Project/Icons/Circled-Right-2-24.png
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 903 B

After

Width:  |  Height:  |  Size: 903 B

0
Fine-Print-24.png → My Project/Icons/Fine-Print-24.png
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 720 B

After

Width:  |  Height:  |  Size: 720 B

0
ModernXP-41-Settings-icon.png → My Project/Icons/ModernXP-41-Settings-icon.png
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 5.9 KiB

After

Width:  |  Height:  |  Size: 5.9 KiB

0
Save-as-24.png → My Project/Icons/Save-as-24.png
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 708 B

After

Width:  |  Height:  |  Size: 708 B

BIN
My Project/Icons/TPS1100CNVRT.ico Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 172 KiB

0
TPS1100CNVRT.png → My Project/Icons/TPS1100CNVRT.png
View File

Side by Side Swipe Overlay

Before

Width:  |  Height:  |  Size: 319 B

After

Width:  |  Height:  |  Size: 319 B

BIN
My Project/Icons/TPS1100CNVRT_logo.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 9.0 KiB

BIN
My Project/Icons/icons8-add-folder-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.2 KiB

BIN
My Project/Icons/icons8-add-new-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.5 KiB

BIN
My Project/Icons/icons8-advance-48.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 671 B

BIN
My Project/Icons/icons8-browse-folder-50-2.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 2.7 KiB

BIN
My Project/Icons/icons8-cancel-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.4 KiB

BIN
My Project/Icons/icons8-clear-symbol-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.5 KiB

BIN
My Project/Icons/icons8-close-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 863 B

BIN
My Project/Icons/icons8-close-window-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.2 KiB

BIN
My Project/Icons/icons8-connection-status-on-48.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 2.3 KiB

BIN
My Project/Icons/icons8-design-48.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 923 B

BIN
My Project/Icons/icons8-do-not-disturb-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.4 KiB

BIN
My Project/Icons/icons8-done-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 829 B

BIN
My Project/Icons/icons8-drawing-compass-48.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.4 KiB

BIN
My Project/Icons/icons8-edit-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 589 B

BIN
My Project/Icons/icons8-folder-50-2.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 2.1 KiB

BIN
My Project/Icons/icons8-info-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.5 KiB

BIN
My Project/Icons/icons8-info-squared-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.5 KiB

BIN
My Project/Icons/icons8-information-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 495 B

BIN
My Project/Icons/icons8-land-surveying-48.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.3 KiB

BIN
My Project/Icons/icons8-no-entry-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.3 KiB

BIN
My Project/Icons/icons8-ok-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.3 KiB

BIN
My Project/Icons/icons8-open-end-wrench-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.2 KiB

BIN
My Project/Icons/icons8-opened-folder-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 739 B

BIN
My Project/Icons/icons8-save-as-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 2.1 KiB

BIN
My Project/Icons/icons8-tools-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.4 KiB

BIN
My Project/Icons/icons8-unavailable-50.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.4 KiB

BIN
My Project/Icons/icons8-undo-48.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 852 B

BIN
My Project/MadMilkman.Ini.dll Normal file
View File

Binary file not shown.

755
My Project/MadMilkman.Ini.xml Normal file
View File

@ -0,0 +1,755 @@
<?xml version="1.0" encoding="utf-8"?>
<doc>
<assembly>
<name>MadMilkman.Ini</name>
</assembly>
<members>
<member name="T:MadMilkman.Ini.IniComment">
<summary>
Represents a comment object used by <see cref="T:MadMilkman.Ini.IniItem" /> objects, <see cref="T:MadMilkman.Ini.IniSection" /> and <see cref="T:MadMilkman.Ini.IniKey" />.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniComment.EmptyLinesBefore">
<summary>
Gets or sets the amount of empty lines before this <see cref="P:MadMilkman.Ini.IniComment.Text">comment's text</see>.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniComment.LeftIndentation">
<summary>
Gets or sets the amount of whitespace characters before this <see cref="P:MadMilkman.Ini.IniComment.Text">comment's text</see>.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniComment.Text">
<summary>
Gets or sets a text of this <see cref="T:MadMilkman.Ini.IniComment" /> instance.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniCommentStarter">
<summary>
Defines <see cref="T:MadMilkman.Ini.IniComment">comment's</see> starting character.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniCommentStarter.Semicolon">
<summary>
Use ';' as <see cref="T:MadMilkman.Ini.IniComment">comment's</see> starting character.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniCommentStarter.Hash">
<summary>
Use '#' as <see cref="T:MadMilkman.Ini.IniComment">comment's</see> starting character.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniDuplication">
<summary>
Defines a behaviour for duplicate <see cref="P:MadMilkman.Ini.IniItem.Name" /> occurences.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniDuplication.Allowed">
<summary>
Allow duplicate names in <see cref="T:MadMilkman.Ini.IniItemCollection`1" />.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniDuplication.Disallowed">
<summary>
Disallow duplicate names in <see cref="T:MadMilkman.Ini.IniItemCollection`1" />.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniDuplication.Ignored">
<summary>
Ignore duplicate names.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniFile">
<summary>
In-memory representation of an INI file.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniFile.#ctor">
<summary>
Initializes a new instance of <see cref="T:MadMilkman.Ini.IniFile" /> class.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniFile.#ctor(MadMilkman.Ini.IniOptions)">
<summary>
Initializes a new instance of <see cref="T:MadMilkman.Ini.IniFile" /> class.
</summary>
<param name="options">
<see cref="T:MadMilkman.Ini.IniOptions" /> object that defines INI file's format, settings for both <see cref="O:MadMilkman.Ini.IniFile.Load">Load</see> and <see cref="O:MadMilkman.Ini.IniFile.Save">Save</see> methods.</param>
</member>
<member name="M:MadMilkman.Ini.IniFile.Load(System.IO.Stream)">
<summary>
Loads a file from a stream.
</summary>
<param name="fileStream">Stream from which to load a file.</param>
</member>
<member name="M:MadMilkman.Ini.IniFile.Load(System.IO.TextReader)">
<summary>
Loads a file from a reader.
</summary>
<param name="fileReader">Reader from which to load a file.</param>
</member>
<member name="M:MadMilkman.Ini.IniFile.Load(System.String)">
<summary>
Loads a file from a path.
</summary>
<param name="filePath">Path from which to load a file.</param>
</member>
<member name="M:MadMilkman.Ini.IniFile.Save(System.IO.Stream)">
<summary>
Saves a file to a stream.
</summary>
<param name="fileStream">Stream to which to save a file.</param>
</member>
<member name="M:MadMilkman.Ini.IniFile.Save(System.IO.TextWriter)">
<summary>
Saves a file to a writer.
</summary>
<param name="fileWriter">Writer to which to save a file.</param>
</member>
<member name="M:MadMilkman.Ini.IniFile.Save(System.String)">
<summary>
Saves a file to a path.
</summary>
<param name="filePath">Path to which to save a file.</param>
</member>
<member name="P:MadMilkman.Ini.IniFile.Sections">
<summary>
Gets file's sections.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniFile.ValueBinding">
<summary>
Gets the object that exposes binding operations, which are executed with <see cref="O:MadMilkman.Ini.IniValueBinding.Bind" /> methods.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniFile.ValueMappings">
<summary>
Gets the mappings of <see cref="P:MadMilkman.Ini.IniKey.Value" />s and their results, used in <see cref="O:MadMilkman.Ini.IniKey.TryParseValue" /> methods.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniItem">
<summary>
Represents a base class for INI content items, <see cref="T:MadMilkman.Ini.IniSection" /> and <see cref="T:MadMilkman.Ini.IniKey" />.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniItem.LeadingComment">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniComment" /> object that represents a comment that follows this <see cref="T:MadMilkman.Ini.IniItem" /> on the same line.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniItem.LeftIndentation">
<summary>
Gets or sets the amount of whitespace characters before this <see cref="P:MadMilkman.Ini.IniItem.Name">item's name</see>.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniItem.Name">
<summary>
Gets and sets the name of the current <see cref="T:MadMilkman.Ini.IniItem" />.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniItem.ParentFile">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniFile" /> to which this <see cref="T:MadMilkman.Ini.IniItem" /> belongs to.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniItem.TrailingComment">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniComment" /> object that represents a comments that occur before this <see cref="T:MadMilkman.Ini.IniItem" />.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniItemCollection`1">
<summary>
Represents a base generic class for INI content item collections, <see cref="T:MadMilkman.Ini.IniSectionCollection" /> and <see cref="T:MadMilkman.Ini.IniKeyCollection" />.
</summary>
<typeparam name="T">
<see cref="T:MadMilkman.Ini.IniItem" /> derived type.</typeparam>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.Add(`0)">
<summary>
Adds an item to the end of this collection.
</summary>
<param name="item">Item to add to this collection.</param>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.Clear">
<summary>
Removes all items from this collection.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.Contains(System.String)">
<summary>
Determines whether an item is in this collection.
</summary>
<param name="name">Name of the item to locate in this collection.</param>
<returns>
<see langword="true" /> if the item with specified name is in the collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.Contains(`0)">
<summary>
Determines whether an item is in this collection.
</summary>
<param name="item">Item to locate in this collection.</param>
<returns>
<see langword="true" /> if the specified item is in the collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.CopyTo(`0[],System.Int32)">
<summary>
Shallow copies the items of this collection to an array.
</summary>
<param name="array">One-dimensional array that is the destination of the items copied from this collection.</param>
<param name="arrayIndex">Zero-based index in array at which copying begins.</param>
</member>
<member name="P:MadMilkman.Ini.IniItemCollection`1.Count">
<summary>
Gets the number of items in this collection.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.GetEnumerator">
<summary>
Returns an enumerator that iterates through the collection.
</summary>
<returns>
<see cref="T:System.Collections.Generic.IEnumerator`1" /> object that can be used to iterate through the collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.IndexOf(System.String)">
<summary>
Searches for the specified item and returns the zero-based index of the first occurrence within this collection.
</summary>
<param name="name">Name of the item to locate in this collection.</param>
<returns>Index of the first occurrence of the item with specified name in the collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.IndexOf(`0)">
<summary>
Searches for the specified item and returns the zero-based index of the first occurrence within this collection.
</summary>
<param name="item">Item to locate in this collection.</param>
<returns>Index of the first occurrence of specified item in the collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.Insert(System.Int32,`0)">
<summary>
Inserts an item to this collection at the specified index.
</summary>
<param name="index">Zero-based index at which item should be inserted.</param>
<param name="item">Item to insert to this collection.</param>
</member>
<member name="P:MadMilkman.Ini.IniItemCollection`1.Item(System.Int32)">
<summary>
Gets or sets the item at the specified index.
</summary>
<param name="index">Zero-based index of the item to get or set.</param>
</member>
<member name="P:MadMilkman.Ini.IniItemCollection`1.Item(System.String)">
<summary>
Gets the first item of the specified name.
</summary>
<param name="name">Name of the item to get.</param>
</member>
<member name="P:MadMilkman.Ini.IniItemCollection`1.Item(System.String[])">
<summary>
Gets the first items of the specified names.
</summary>
<param name="names">Names of the items to get.</param>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.Remove(System.String)">
<summary>
Removes the first occurrence of specific item from this collection.
</summary>
<param name="name">Name of the item to remove from this collection.</param>
<returns>
<see langword="true" /> if the item with specified name is removed from the collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.Remove(`0)">
<summary>
Removes the first occurrence of specific item from this collection.
</summary>
<param name="item">Item to remove from this collection.</param>
<returns>
<see langword="true" /> if the specified item is removed from the collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniItemCollection`1.RemoveAt(System.Int32)">
<summary>
Removes an item at the specified index from this collection.
</summary>
<param name="index">Zero-based index at which item should be inserted.</param>
</member>
<member name="T:MadMilkman.Ini.IniKey">
<summary>
Represents a key item of the INI file with name and value content.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniKey.#ctor(MadMilkman.Ini.IniFile,System.Collections.Generic.KeyValuePair{System.String,System.String})">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniKey" /> class.
</summary>
<param name="parentFile">The owner file.</param>
<param name="nameValuePair">The key's data, pair of key's name and key's value.</param>
</member>
<member name="M:MadMilkman.Ini.IniKey.#ctor(MadMilkman.Ini.IniFile,System.String)">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniKey" /> class.
</summary>
<param name="parentFile">The owner file.</param>
<param name="name">The key's name.</param>
</member>
<member name="M:MadMilkman.Ini.IniKey.#ctor(MadMilkman.Ini.IniFile,System.String,System.String)">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniKey" /> class.
</summary>
<param name="parentFile">The owner file.</param>
<param name="name">The key's name.</param>
<param name="value">The key's value.</param>
</member>
<member name="M:MadMilkman.Ini.IniKey.Copy">
<summary>
Copies this <see cref="T:MadMilkman.Ini.IniKey" /> instance.
</summary>
<returns>Copied <see cref="T:MadMilkman.Ini.IniKey" />.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKey.Copy(MadMilkman.Ini.IniFile)">
<summary>
Copies this <see cref="T:MadMilkman.Ini.IniKey" /> instance and sets copied instance's <see cref="P:MadMilkman.Ini.IniItem.ParentFile">ParentFile</see>.
</summary>
<param name="destinationFile">Copied key's parent file.</param>
<returns>Copied <see cref="T:MadMilkman.Ini.IniKey" /> that belongs to a specified <see cref="T:MadMilkman.Ini.IniFile" />.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKey.IsSupportedValueType(System.Type)">
<summary>
Indicates whether the <see cref="P:MadMilkman.Ini.IniKey.Value" /> can be converted to specified type.
</summary>
<param name="type">Type of the object to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</param>
<returns>
<see langword="true" /> if the specified type is supported.</returns>
</member>
<member name="P:MadMilkman.Ini.IniKey.ParentCollection">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniKeyCollection" /> to which this <see cref="T:MadMilkman.Ini.IniKey" /> belongs to.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniKey.ParentSection">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniSection" /> to which this <see cref="T:MadMilkman.Ini.IniKey" /> belongs to.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniKey.TryParseValue``1(System.Collections.Generic.List{``0}@)">
<summary>
Converts the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to a list of the specified type.
</summary>
<param name="results">Uninitialized list of a specific type which will hold the converted values if the conversion succeeds.</param>
<typeparam name="T">Type of the objects in list to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</typeparam>
<returns>Value that indicates whether the conversion succeeded.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKey.TryParseValue``1(``0@)">
<summary>
Converts the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to an instance of the specified type.
</summary>
<param name="result">Uninitialized instance of a specific type which will hold the converted value if the conversion succeeds.</param>
<typeparam name="T">Type of the object to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</typeparam>
<returns>Value that indicates whether the conversion succeeded.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKey.TryParseValue``1(``0[]@)">
<summary>
Converts the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to an array of the specified type.
</summary>
<param name="results">Uninitialized array of a specific type which will hold the converted values if the conversion succeeds.</param>
<typeparam name="T">Type of the objects in array to convert the <see cref="P:MadMilkman.Ini.IniKey.Value" /> to.</typeparam>
<returns>Value that indicates whether the conversion succeeded.</returns>
</member>
<member name="P:MadMilkman.Ini.IniKey.Value">
<summary>
Gets and sets <see cref="T:MadMilkman.Ini.IniKey" /> value.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniKeyCollection">
<summary>
Represents a collection of <see cref="T:MadMilkman.Ini.IniKey" /> items.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniKeyCollection.Add(System.Collections.Generic.KeyValuePair{System.String,System.String})">
<summary>
Adds an item to the end of this collection.
</summary>
<param name="nameValuePair">The key's data, pair of key's name and key's value, to add to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniKey" /> that was added to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKeyCollection.Add(System.String)">
<summary>
Adds an item to the end of this collection.
</summary>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to add to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniKey" /> that was added to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKeyCollection.Add(System.String,System.String)">
<summary>
Adds an item to the end of this collection.
</summary>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to add to this collection.</param>
<param name="value">Value of the <see cref="T:MadMilkman.Ini.IniKey" /> to add to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniKey" /> that was added to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKeyCollection.Insert(System.Int32,System.Collections.Generic.KeyValuePair{System.String,System.String})">
<summary>
Inserts an item to this collection at the specified index.
</summary>
<param name="index">Zero-based index at which item should be inserted.</param>
<param name="nameValuePair">The key's data, pair of key's name and key's value, to insert to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniKey" /> that was inserted to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKeyCollection.Insert(System.Int32,System.String)">
<summary>
Inserts an item to this collection at the specified index.
</summary>
<param name="index">Zero-based index at which item should be inserted.</param>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to insert to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniKey" /> that was inserted to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniKeyCollection.Insert(System.Int32,System.String,System.String)">
<summary>
Inserts an item to this collection at the specified index.
</summary>
<param name="index">Zero-based index at which item should be inserted.</param>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniKey" /> to insert to this collection.</param>
<param name="value">Value of the <see cref="T:MadMilkman.Ini.IniKey" /> to insert to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniKey" /> that was inserted to this collection.</returns>
</member>
<member name="T:MadMilkman.Ini.IniKeyDelimiter">
<summary>
Defines <see cref="T:MadMilkman.Ini.IniKey">key's</see> name and value delimiter character.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniKeyDelimiter.Equal">
<summary>
Use '=' as <see cref="T:MadMilkman.Ini.IniKey">key's</see> name and value delimiter character.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniKeyDelimiter.Colon">
<summary>
Use ':' as <see cref="T:MadMilkman.Ini.IniKey">key's</see> name and value delimiter character.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniOptions">
<summary>
Represents a class that defines INI file's format, stores properties used for both reading and writing a file.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniOptions.#ctor">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniOptions" /> class.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.CommentStarter">
<summary>
Gets or sets comments starting character.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.Compression">
<summary>
<para>Gets or sets a value indicating if file's size is reduced.</para>
<para>If <see langword="true" /> file is decompressed on Load and compressed on Save.</para>
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.Encoding">
<summary>
Gets or sets encoding for reading and writing an INI file.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.EncryptionPassword">
<summary>
<para>Gets or sets an INI file's protection password.</para>
<para>File is decrypted on Load and encrypted on Save if a password is not <see langword="null" /> or <see cref="F:System.String.Empty" />.</para>
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.KeyDelimiter">
<summary>
Gets or sets keys name and value delimiter character.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.KeyDuplicate">
<summary>
Gets or sets a value indicating whether keys with same name are allowed, disallowed or ignored.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.KeyNameCaseSensitive">
<summary>
Gets or sets a value indicating whether keys name are case sensitive.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.KeySpaceAroundDelimiter">
<summary>
Gets or sets a value indicating whether space is written around the keys delimiter.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.SectionDuplicate">
<summary>
Gets or sets a value indicating whether sections with same name are allowed, disallowed or ignored.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.SectionNameCaseSensitive">
<summary>
Gets or sets a value indicating whether sections name are case sensitive.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniOptions.SectionWrapper">
<summary>
Gets or sets wrapper characters of sections name.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniSection">
<summary>
Represents a section item of the INI file with name and keys content.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String)">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
</summary>
<param name="parentFile">The owner file.</param>
<param name="name">The section's name.</param>
</member>
<member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String,MadMilkman.Ini.IniKey[])">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
</summary>
<param name="parentFile">The owner file.</param>
<param name="name">The section's name.</param>
<param name="keys">The section's keys.</param>
</member>
<member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String,System.Collections.Generic.IEnumerable{MadMilkman.Ini.IniKey})">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
</summary>
<param name="parentFile">The owner file.</param>
<param name="name">The section's name.</param>
<param name="keys">The section's keys.</param>
</member>
<member name="M:MadMilkman.Ini.IniSection.#ctor(MadMilkman.Ini.IniFile,System.String,System.Collections.Generic.IEnumerable{System.Collections.Generic.KeyValuePair{System.String,System.String}})">
<summary>
Initializes a new instance of the <see cref="T:MadMilkman.Ini.IniSection" /> class.
</summary>
<param name="parentFile">The owner file.</param>
<param name="name">The section's name.</param>
<param name="nameValuePairs">The section's keys data, pairs of key's name and key's value.</param>
</member>
<member name="M:MadMilkman.Ini.IniSection.Copy">
<summary>
Copies this <see cref="T:MadMilkman.Ini.IniSection" /> instance.
</summary>
<returns>Copied <see cref="T:MadMilkman.Ini.IniSection" />.</returns>
</member>
<member name="M:MadMilkman.Ini.IniSection.Copy(MadMilkman.Ini.IniFile)">
<summary>
Copies this <see cref="T:MadMilkman.Ini.IniSection" /> instance and sets copied instance's <see cref="P:MadMilkman.Ini.IniItem.ParentFile">ParentFile</see>.
</summary>
<param name="destinationFile">Copied section's parent file.</param>
<returns>Copied <see cref="T:MadMilkman.Ini.IniSection" /> that belongs to a specified <see cref="T:MadMilkman.Ini.IniFile" />.</returns>
</member>
<member name="M:MadMilkman.Ini.IniSection.Deserialize``1">
<summary>
Deserializes this <see cref="T:MadMilkman.Ini.IniSection" /> into an object of specified type.
</summary>
<typeparam name="T">The type of deserialized object.</typeparam>
<returns>The object being deserialized.</returns>
</member>
<member name="F:MadMilkman.Ini.IniSection.GlobalSectionName">
<summary>
Represents a section name which is used to define a global section, used for storing first keys series that don't belong to any section.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniSection.Keys">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniSection">section's</see> key collection.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniSection.ParentCollection">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniSectionCollection" /> to which this <see cref="T:MadMilkman.Ini.IniSection" /> belongs to.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniSection.Serialize``1(``0)">
<summary>
Serializes the specified object into this <see cref="T:MadMilkman.Ini.IniSection" />.
</summary>
<param name="source">The object to serialize.</param>
<typeparam name="T">The type of serialized object.</typeparam>
</member>
<member name="T:MadMilkman.Ini.IniSectionCollection">
<summary>
Represents a collection of <see cref="T:MadMilkman.Ini.IniSection" /> items.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniSectionCollection.Add(System.String)">
<summary>
Adds an item to the end of this collection.
</summary>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to add to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniSection" /> that was added to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniSectionCollection.Add(System.String,System.Collections.Generic.IEnumerable{System.Collections.Generic.KeyValuePair{System.String,System.String}})">
<summary>
Adds an item to the end of this collection.
</summary>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to add to this collection.</param>
<param name="nameValuePairs">The section's keys data, pairs of key's name and key's value, to add to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniSection" /> that was added to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniSectionCollection.Insert(System.Int32,System.String)">
<summary>
Inserts an item to this collection at the specified index.
</summary>
<param name="index">Zero-based index at which item should be inserted.</param>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to insert to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniSection" /> that was inserted to this collection.</returns>
</member>
<member name="M:MadMilkman.Ini.IniSectionCollection.Insert(System.Int32,System.String,System.Collections.Generic.IEnumerable{System.Collections.Generic.KeyValuePair{System.String,System.String}})">
<summary>
Inserts an item to this collection at the specified index.
</summary>
<param name="index">Zero-based index at which item should be inserted.</param>
<param name="name">Name of the <see cref="T:MadMilkman.Ini.IniSection" /> to insert to this collection.</param>
<param name="nameValuePairs">The section's keys data, pairs of key's name and key's value, to insert to this collection.</param>
<returns>
<see cref="T:MadMilkman.Ini.IniSection" /> that was inserted to this collection.</returns>
</member>
<member name="T:MadMilkman.Ini.IniSectionWrapper">
<summary>
Defines <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters around its name.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniSectionWrapper.SquareBrackets">
<summary>
Use '[' and ']' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniSectionWrapper.AngleBrackets">
<summary>
Use '&lt;' and '&gt;' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniSectionWrapper.CurlyBrackets">
<summary>
Use '{' and '}' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
</summary>
</member>
<member name="F:MadMilkman.Ini.IniSectionWrapper.Parentheses">
<summary>
Use '(' and ')' as <see cref="T:MadMilkman.Ini.IniSection">section's</see> wrapper characters.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniSerializationAttribute">
<summary>
Indicates the behavior of public property when serializing or deserializing the object that contains it.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniSerializationAttribute.#ctor(System.Boolean)">
<summary>
Initializes a new instance of the IniSerializationAttribute class and specifies if serialization is ignored.
</summary>
<param name="ignore">The value indicating whether serialization is ignored.</param>
</member>
<member name="M:MadMilkman.Ini.IniSerializationAttribute.#ctor(System.String)">
<summary>
Initializes a new instance of the IniSerializationAttribute class and specifies the <see cref="T:MadMilkman.Ini.IniKey" />'s name.
</summary>
<param name="alias">The name of the generated <see cref="T:MadMilkman.Ini.IniKey" />.</param>
</member>
<member name="P:MadMilkman.Ini.IniSerializationAttribute.Alias">
<summary>
Gets the <see cref="T:MadMilkman.Ini.IniKey" /> name of serialized the property.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniSerializationAttribute.Ignore">
<summary>
Gets the value indicating whether serialization is ignored.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniValueBinding">
<summary>
Represents a class that is used for binding operations, an operation in which the <see cref="T:MadMilkman.Ini.IniKey">placeholder keys</see> values are replaced with an internal or external data.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniValueBinding.Bind">
<summary>
Executes a binding operation with internal data source.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniValueBinding.Bind(System.Object)">
<summary>
Executes a binding operation with external data source.
</summary>
<param name="dataSource">The binding data source.</param>
</member>
<member name="M:MadMilkman.Ini.IniValueBinding.Bind(System.Object,System.String)">
<summary>
Executes a binding operation with external data source, only on specified section.
</summary>
<param name="dataSource">The binding data source.</param>
<param name="sectionName">The <see cref="T:MadMilkman.Ini.IniSection" />'s name.</param>
</member>
<member name="E:MadMilkman.Ini.IniValueBinding.Binding">
<summary>
Occurs when a placeholder is binding with data source value and can be used to customize the binding operation.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniValueBindingEventArgs">
<summary>
Provides data for <see cref="E:MadMilkman.Ini.IniValueBinding.Binding" /> event.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniValueBindingEventArgs.IsValueFound">
<summary>
Gets a value indicating whether value was found in the data source.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniValueBindingEventArgs.PlaceholderKey">
<summary>
Gets the placeholder's <see cref="T:MadMilkman.Ini.IniKey" />.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniValueBindingEventArgs.PlaceholderName">
<summary>
Gets the placeholder's name.
</summary>
</member>
<member name="P:MadMilkman.Ini.IniValueBindingEventArgs.Value">
<summary>
Gets or sets the data source value that will replace the placeholder.
</summary>
</member>
<member name="T:MadMilkman.Ini.IniValueMappings">
<summary>
Represents a class of mapped <see cref="P:MadMilkman.Ini.IniKey.Value" />s and their results, used in <see cref="O:MadMilkman.Ini.IniKey.TryParseValue" /> methods.
</summary>
</member>
<member name="M:MadMilkman.Ini.IniValueMappings.Add``1(System.String,``0)">
<summary>
Adds a new mapping of <see cref="P:MadMilkman.Ini.IniKey.Value" /> to resulting object of parse methods.
</summary>
<param name="value">The key's value.</param>
<param name="mappedResult">The object that represents parsed <see cref="P:MadMilkman.Ini.IniKey.Value" />.</param>
<typeparam name="T">Type of the object that represents parsed <see cref="P:MadMilkman.Ini.IniKey.Value" />.</typeparam>
</member>
<member name="M:MadMilkman.Ini.IniValueMappings.Contains(System.String)">
<summary>
Determines whether the collection contains a mapping for a specified key's value.
</summary>
<param name="value">The key's value to locate in the collection.</param>
<returns>
<see langword="true" /> if the collection contains a mapping for a specified key's value.</returns>
</member>
<member name="M:MadMilkman.Ini.IniValueMappings.Remove(System.String)">
<summary>
Removes a mapping for a specified key's value in the collection.
</summary>
<param name="value">The key's value to remove in the collection.</param>
<returns>
<see langword="true" /> if a mapping for a specified key's value is successfully found and removed.</returns>
</member>
</members>
</doc>

3
My Project/README.md Normal file
View File

@ -0,0 +1,3 @@
# TPS1100-Convert
Program za pretvorbo GSI datotek. VB.NET

330
My Project/Resources.Designer.vb generated
View File

@ -59,5 +59,335 @@ Namespace My.Resources
resourceCulture = value
End Set
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property Circled_Right_2_24() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("Circled_Right_2_24", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property Fine_Print_24() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("Fine_Print_24", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_add_new_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_add_new_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_advance_48() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_advance_48", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_browse_folder_50_2() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_browse_folder_50_2", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_cancel_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_cancel_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_clear_symbol_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_clear_symbol_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_close_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_close_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_close_window_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_close_window_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_connection_status_on_48() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_connection_status_on_48", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_design_48() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_design_48", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_do_not_disturb_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_do_not_disturb_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_done_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_done_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_drawing_compass_48() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_drawing_compass_48", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_edit_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_edit_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_folder_50_2() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_folder_50_2", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_info_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_info_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_info_squared_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_info_squared_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_information_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_information_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_land_surveying_48() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_land_surveying_48", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_no_entry_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_no_entry_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_ok_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_ok_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_open_end_wrench_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_open_end_wrench_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_opened_folder_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_opened_folder_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_save_as_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_save_as_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_tools_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_tools_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_unavailable_50() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_unavailable_50", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property icons8_undo_48() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("icons8_undo_48", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property ModernXP_41_Settings_icon() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("ModernXP_41_Settings_icon", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Byte[].
'''</summary>
Friend ReadOnly Property README() As Byte()
Get
Dim obj As Object = ResourceManager.GetObject("README", resourceCulture)
Return CType(obj,Byte())
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property Save_as_24() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("Save_as_24", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property TPS1100CNVRT() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("TPS1100CNVRT", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Looks up a localized resource of type System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property TPS1100CNVRT_logo() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("TPS1100CNVRT_logo", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
End Module
End Namespace

119
My Project/Resources.resx
View File

@ -46,7 +46,7 @@
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Serialization.Formatters.Binary.BinaryFormatter
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
@ -60,6 +60,7 @@
: 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">
@ -68,9 +69,10 @@
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" />
<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">
@ -85,9 +87,10 @@
<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" msdata:Ordinal="1" />
<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">
@ -109,9 +112,115 @@
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
<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=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="Save_as_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\Save-as-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_clear_symbol_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-clear-symbol-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Fine_Print_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\Fine-Print-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_cancel_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-cancel-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_ok_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-ok-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="TPS1100CNVRT_logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\TPS1100CNVRT_logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Circled_Right_2_24" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\Circled-Right-2-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_open_end_wrench_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-open-end-wrench-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_info_squared_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-info-squared-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_unavailable_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-unavailable-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_save_as_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-save-as-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_close_window_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-close-window-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_design_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-design-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_close_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-close-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_add_folder_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-add-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_info_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-info-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_drawing_compass_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-drawing-compass-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_connection_status_on_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-connection-status-on-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_folder_50_2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-folder-50-2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_opened_folder_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-opened-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ModernXP_41_Settings_icon" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\ModernXP-41-Settings-icon.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_browse_folder_50_2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-browse-folder-50-2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_edit_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-edit-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_add_new_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-add-new-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_done_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-done-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_undo_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-undo-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_no_entry_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-no-entry-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="TPS1100CNVRT" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\TPS1100CNVRT.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_information_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-information-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_advance_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-advance-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_tools_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-tools-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_do_not_disturb_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-do-not-disturb-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8_land_surveying_48" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-land-surveying-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="icons8-add-folder-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>Icons\icons8-add-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="README" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\README.md;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
</root>

78
My Project/Settings.Designer.vb generated
View File

@ -15,7 +15,7 @@ Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.7.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.10.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
@ -53,6 +53,82 @@ Namespace My
Return defaultInstance
End Get
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("C:\")> _
Public Property ZadnjaMapa() As String
Get
Return CType(Me("ZadnjaMapa"),String)
End Get
Set
Me("ZadnjaMapa") = value
End Set
End Property
'''<summary>
'''Znak za decimalno ločilo
'''</summary>
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Configuration.SettingsDescriptionAttribute("Znak za decimalno ločilo"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("Pika")> _
Public Property DecimalnoLocilo() As String
Get
Return CType(Me("DecimalnoLocilo"),String)
End Get
Set
Me("DecimalnoLocilo") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("Da")> _
Public Property KodeUporabnik() As String
Get
Return CType(Me("KodeUporabnik"),String)
End Get
Set
Me("KodeUporabnik") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property Datoteka() As String
Get
Return CType(Me("Datoteka"),String)
End Get
Set
Me("Datoteka") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("0")> _
Public Property Stolpci() As Integer
Get
Return CType(Me("Stolpci"),Integer)
End Get
Set
Me("Stolpci") = value
End Set
End Property
<Global.System.Configuration.UserScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.DefaultSettingValueAttribute("")> _
Public Property DatLogfile() As String
Get
Return CType(Me("DatLogfile"),String)
End Get
Set
Me("DatLogfile") = value
End Set
End Property
End Class
End Namespace

27
My Project/Settings.settings
View File

@ -1,7 +1,24 @@
<?xml version='1.0' encoding='utf-8'?>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
<Profiles>
<Profile Name="(Default)" />
</Profiles>
<Settings />
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
<Profiles />
<Settings>
<Setting Name="ZadnjaMapa" Type="System.String" Scope="User">
<Value Profile="(Default)">C:\</Value>
</Setting>
<Setting Name="DecimalnoLocilo" Description="Znak za decimalno ločilo" Type="System.String" Scope="User">
<Value Profile="(Default)">Pika</Value>
</Setting>
<Setting Name="KodeUporabnik" Type="System.String" Scope="User">
<Value Profile="(Default)">Da</Value>
</Setting>
<Setting Name="Datoteka" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
<Setting Name="Stolpci" Type="System.Int32" Scope="User">
<Value Profile="(Default)">0</Value>
</Setting>
<Setting Name="DatLogfile" Type="System.String" Scope="User">
<Value Profile="(Default)" />
</Setting>
</Settings>
</SettingsFile>

BIN
My Project/img/screen1.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 20 KiB

BIN
My Project/img/screen2.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 69 KiB

BIN
My Project/img/screen3.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 79 KiB

40
README.md
View File

@ -1,3 +1,41 @@
# TPS1100-Convert
Program za pretvorbo GSI datotek. VB.NET
!["logo"](https://multibox.nohost.me/gitea/boris/TPS1100-Convert/raw/branch/main/My%20Project/Icons/TPS1100CNVRT_logo.png)
Program za pretvorbo GSI datotek v obliko primerno za branje.
Enostavna priprava in izvoz podatkov meritev v različnih oblikah...
- Zapisnik Meritev (podatki meritev kot so Hz, V, SD, HD,...)
- Koordinate Točk (seznam točk v obliki E, N, Ht, koda in klasifikacija)
Program uporablja kodiranje za prepoznavo posameznih elementov meritev.
<br>
Aplikacija je še v razvoju, zato so nekatere možnosti omejene.<br>
Prav tako je trenutno potreben točno določen vrstni red zapisa podatkov v GSI datotekah.
Izdelal: Boris Bilc
Programski jezik: VB.NET
---
## Kodiranje Podatkov
| Koda | Podatki |
|------|------------------------|
| 10 | Quick Set |
| 20 | Set Azimuth |
| 30 | Resection |
| 40 | Free Station |
| 50 | Ori. and Ht. Transfer |
| 90 | Measured Data |
| 99 | Imported/User Data |
## Posnetki Programa
!["slika1"](https://multibox.nohost.me/gitea/boris/TPS1100-Convert/raw/branch/main/My%20Project/img/screen1.png)
!["slika2"](https://multibox.nohost.me/gitea/boris/TPS1100-Convert/raw/branch/main/My%20Project/img/screen2.png)
!["slika3"](https://multibox.nohost.me/gitea/boris/TPS1100-Convert/raw/branch/main/My%20Project/img/screen3.png)

BIN
Samples/intersections exe.zip Normal file
View File

Binary file not shown.

221
SplashScreen1.Designer.vb generated Normal file
View File

@ -0,0 +1,221 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class SplashScreen1
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
Friend WithEvents ApplicationTitle As System.Windows.Forms.Label
Friend WithEvents Version As System.Windows.Forms.Label
Friend WithEvents Copyright As System.Windows.Forms.Label
Friend WithEvents MainLayoutPanel As System.Windows.Forms.TableLayoutPanel
Friend WithEvents DetailsLayoutPanel As System.Windows.Forms.TableLayoutPanel
'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.MainLayoutPanel = New System.Windows.Forms.TableLayoutPanel()
Me.DetailsLayoutPanel = New System.Windows.Forms.TableLayoutPanel()
Me.Version = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.Copyright = New System.Windows.Forms.Label()
Me.Button1 = New System.Windows.Forms.Button()
Me.LinkLabel1 = New System.Windows.Forms.LinkLabel()
Me.LabelCompany = New System.Windows.Forms.Label()
Me.ApplicationTitle = New System.Windows.Forms.Label()
Me.LinkLabel2 = New System.Windows.Forms.LinkLabel()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.MainLayoutPanel.SuspendLayout()
Me.DetailsLayoutPanel.SuspendLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'MainLayoutPanel
'
Me.MainLayoutPanel.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
Me.MainLayoutPanel.ColumnCount = 2
Me.MainLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 107.0!))
Me.MainLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 291.0!))
Me.MainLayoutPanel.Controls.Add(Me.DetailsLayoutPanel, 1, 1)
Me.MainLayoutPanel.Controls.Add(Me.PictureBox1, 0, 0)
Me.MainLayoutPanel.Controls.Add(Me.ApplicationTitle, 1, 0)
Me.MainLayoutPanel.Dock = System.Windows.Forms.DockStyle.Fill
Me.MainLayoutPanel.Location = New System.Drawing.Point(0, 0)
Me.MainLayoutPanel.Name = "MainLayoutPanel"
Me.MainLayoutPanel.RowCount = 2
Me.MainLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 108.0!))
Me.MainLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 148.0!))
Me.MainLayoutPanel.Size = New System.Drawing.Size(398, 298)
Me.MainLayoutPanel.TabIndex = 0
'
'DetailsLayoutPanel
'
Me.DetailsLayoutPanel.Anchor = System.Windows.Forms.AnchorStyles.None
Me.DetailsLayoutPanel.BackColor = System.Drawing.Color.Transparent
Me.DetailsLayoutPanel.ColumnCount = 2
Me.DetailsLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 156.0!))
Me.DetailsLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 143.0!))
Me.DetailsLayoutPanel.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Absolute, 142.0!))
Me.DetailsLayoutPanel.Controls.Add(Me.Version, 0, 0)
Me.DetailsLayoutPanel.Controls.Add(Me.Label1, 0, 1)
Me.DetailsLayoutPanel.Controls.Add(Me.Copyright, 0, 4)
Me.DetailsLayoutPanel.Controls.Add(Me.LinkLabel1, 0, 3)
Me.DetailsLayoutPanel.Controls.Add(Me.LabelCompany, 0, 2)
Me.DetailsLayoutPanel.Controls.Add(Me.Button1, 1, 5)
Me.DetailsLayoutPanel.Controls.Add(Me.LinkLabel2, 1, 3)
Me.DetailsLayoutPanel.Location = New System.Drawing.Point(114, 115)
Me.DetailsLayoutPanel.Name = "DetailsLayoutPanel"
Me.DetailsLayoutPanel.RowCount = 6
Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 70.27027!))
Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 29.72973!))
Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 26.0!))
Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 21.0!))
Me.DetailsLayoutPanel.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 31.0!))
Me.DetailsLayoutPanel.Size = New System.Drawing.Size(276, 175)
Me.DetailsLayoutPanel.TabIndex = 1
'
'Version
'
Me.Version.Anchor = System.Windows.Forms.AnchorStyles.Left
Me.Version.AutoSize = True
Me.Version.BackColor = System.Drawing.Color.Transparent
Me.Version.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Version.Location = New System.Drawing.Point(3, 15)
Me.Version.Name = "Version"
Me.Version.Size = New System.Drawing.Size(131, 20)
Me.Version.TabIndex = 1
Me.Version.Text = "Version {0}.{1:00}"
'
'Label1
'
Me.Label1.Anchor = System.Windows.Forms.AnchorStyles.Left
Me.Label1.AutoSize = True
Me.Label1.BackColor = System.Drawing.Color.Transparent
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(3, 54)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(91, 13)
Me.Label1.TabIndex = 4
Me.Label1.Text = "Napisal: Boris Bilc"
'
'Copyright
'
Me.Copyright.Anchor = System.Windows.Forms.AnchorStyles.Left
Me.Copyright.AutoSize = True
Me.Copyright.BackColor = System.Drawing.Color.Transparent
Me.Copyright.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Copyright.Location = New System.Drawing.Point(3, 125)
Me.Copyright.Name = "Copyright"
Me.Copyright.Size = New System.Drawing.Size(58, 15)
Me.Copyright.TabIndex = 2
Me.Copyright.Text = "Copyright"
'
'Button1
'
Me.Button1.Anchor = System.Windows.Forms.AnchorStyles.None
Me.Button1.Location = New System.Drawing.Point(190, 146)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 25)
Me.Button1.TabIndex = 2
Me.Button1.Text = "OK"
Me.Button1.UseVisualStyleBackColor = True
'
'LinkLabel1
'
Me.LinkLabel1.Anchor = System.Windows.Forms.AnchorStyles.Left
Me.LinkLabel1.AutoSize = True
Me.LinkLabel1.Location = New System.Drawing.Point(3, 103)
Me.LinkLabel1.Name = "LinkLabel1"
Me.LinkLabel1.Size = New System.Drawing.Size(71, 13)
Me.LinkLabel1.TabIndex = 5
Me.LinkLabel1.TabStop = True
Me.LinkLabel1.Text = "Spletna Stran"
'
'LabelCompany
'
Me.LabelCompany.Anchor = System.Windows.Forms.AnchorStyles.Left
Me.LabelCompany.AutoSize = True
Me.LabelCompany.BackColor = System.Drawing.Color.Transparent
Me.LabelCompany.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LabelCompany.Location = New System.Drawing.Point(3, 76)
Me.LabelCompany.Name = "LabelCompany"
Me.LabelCompany.Size = New System.Drawing.Size(59, 15)
Me.LabelCompany.TabIndex = 3
Me.LabelCompany.Text = "Company"
'
'ApplicationTitle
'
Me.ApplicationTitle.Anchor = System.Windows.Forms.AnchorStyles.None
Me.ApplicationTitle.BackColor = System.Drawing.Color.Transparent
Me.ApplicationTitle.Font = New System.Drawing.Font("Gill Sans MT Condensed", 24.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ApplicationTitle.Location = New System.Drawing.Point(117, 24)
Me.ApplicationTitle.Name = "ApplicationTitle"
Me.ApplicationTitle.Size = New System.Drawing.Size(270, 59)
Me.ApplicationTitle.TabIndex = 0
Me.ApplicationTitle.Text = "TPS1100 Convert"
Me.ApplicationTitle.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
'
'LinkLabel2
'
Me.LinkLabel2.Anchor = System.Windows.Forms.AnchorStyles.Left
Me.LinkLabel2.AutoSize = True
Me.LinkLabel2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.LinkLabel2.Location = New System.Drawing.Point(159, 103)
Me.LinkLabel2.Name = "LinkLabel2"
Me.LinkLabel2.Size = New System.Drawing.Size(87, 13)
Me.LinkLabel2.TabIndex = 6
Me.LinkLabel2.TabStop = True
Me.LinkLabel2.Text = "Repositorij Git"
'
'PictureBox1
'
Me.PictureBox1.Image = Global.TPS1100_Convert.My.Resources.Resources.TPS1100CNVRT_logo
Me.PictureBox1.Location = New System.Drawing.Point(3, 3)
Me.PictureBox1.Name = "PictureBox1"
Me.PictureBox1.Size = New System.Drawing.Size(101, 101)
Me.PictureBox1.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.PictureBox1.TabIndex = 3
Me.PictureBox1.TabStop = False
'
'SplashScreen1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(398, 298)
Me.ControlBox = False
Me.Controls.Add(Me.MainLayoutPanel)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedSingle
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "SplashScreen1"
Me.ShowInTaskbar = False
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.MainLayoutPanel.ResumeLayout(False)
Me.DetailsLayoutPanel.ResumeLayout(False)
Me.DetailsLayoutPanel.PerformLayout()
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
End Sub
Friend WithEvents Button1 As Button
Friend WithEvents LabelCompany As Label
Friend WithEvents Label1 As Label
Friend WithEvents LinkLabel1 As LinkLabel
Friend WithEvents PictureBox1 As PictureBox
Friend WithEvents LinkLabel2 As LinkLabel
End Class

120
SplashScreen1.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>

51
SplashScreen1.vb Normal file
View File

@ -0,0 +1,51 @@

Public NotInheritable Class SplashScreen1
'TODO: This form can easily be set as the splash screen for the application by going to the "Application" tab
' of the Project Designer ("Properties" under the "Project" menu).
Private Sub SplashScreen1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'Set up the dialog text at runtime according to the application's assembly information.
'TODO: Customize the application's assembly information in the "Application" pane of the project
' properties dialog (under the "Project" menu).
'Application title
If My.Application.Info.Title <> "" Then
ApplicationTitle.Text = My.Application.Info.Title
Else
'If the application title is missing, use the application name, without the extension
ApplicationTitle.Text = System.IO.Path.GetFileNameWithoutExtension(My.Application.Info.AssemblyName)
End If
'Format the version information using the text set into the Version control at design time as the
' formatting string. This allows for effective localization if desired.
' Build and revision information could be included by using the following code and changing the
' Version control's designtime text to "Version {0}.{1:00}.{2}.{3}" or something similar. See
' String.Format() in Help for more information.
'
' Version.Text = System.String.Format(Version.Text, My.Application.Info.Version.Major, My.Application.Info.Version.Minor, My.Application.Info.Version.Build, My.Application.Info.Version.Revision)
Version.Text = "Verzija: " + My.Application.Info.Version.Major.ToString + "." + My.Application.Info.Version.Minor.ToString + "." + My.Application.Info.Version.Build.ToString + "." + My.Application.Info.Version.Revision.ToString
'Copyright info
Copyright.Text = My.Application.Info.Copyright
LabelCompany.Text = My.Application.Info.CompanyName
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.Close()
End Sub
Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
Dim webAddress As String = "https://2bgeo.si/"
Process.Start(webAddress)
End Sub
Private Sub LinkLabel2_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
Dim webAddress2 As String = "https://multibox.nohost.me/gitea/boris/TPS1100-Convert"
Process.Start(webAddress2)
End Sub
End Class

125
TPS1100 Convert.vbproj
View File

@ -15,21 +15,27 @@
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
<IsWebBootstrapper>false</IsWebBootstrapper>
<TargetFrameworkProfile />
<PublishUrl>E:\_Boris\Projekti Boris\VS Projects\TPS1100 Convert\publish\</PublishUrl>
<PublishUrl>E:\_Boris\Git_YunoHost\TPS1100-Convert\publish\</PublishUrl>
<Install>true</Install>
<InstallFrom>Disk</InstallFrom>
<UpdateEnabled>false</UpdateEnabled>
<UpdateMode>Foreground</UpdateMode>
<UpdateMode>Background</UpdateMode>
<UpdateInterval>7</UpdateInterval>
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
<UpdatePeriodically>false</UpdatePeriodically>
<UpdateRequired>false</UpdateRequired>
<MapFileExtensions>true</MapFileExtensions>
<WebPage>publish.htm</WebPage>
<TargetCulture>sl-SI</TargetCulture>
<ProductName>TPS1100 Convert</ProductName>
<PublisherName>2B geoinformatika d.o.o.</PublisherName>
<MinimumRequiredVersion>2.1.0.4</MinimumRequiredVersion>
<CreateWebPageOnPublish>true</CreateWebPageOnPublish>
<WebPage>publish.html</WebPage>
<AutorunEnabled>true</AutorunEnabled>
<ApplicationRevision>4</ApplicationRevision>
<ApplicationVersion>1.1.0.%2a</ApplicationVersion>
<ApplicationRevision>8</ApplicationRevision>
<ApplicationVersion>2.5.0.%2a</ApplicationVersion>
<UseApplicationTrust>false</UseApplicationTrust>
<CreateDesktopShortcut>true</CreateDesktopShortcut>
<PublishWizardCompleted>true</PublishWizardCompleted>
<BootstrapperEnabled>true</BootstrapperEnabled>
</PropertyGroup>
@ -75,7 +81,7 @@
<ManifestKeyFile>TPS1100 Convert_TemporaryKey.pfx</ManifestKeyFile>
</PropertyGroup>
<PropertyGroup>
<GenerateManifests>false</GenerateManifests>
<GenerateManifests>true</GenerateManifests>
</PropertyGroup>
<PropertyGroup>
<SignManifests>false</SignManifests>
@ -112,6 +118,7 @@
<Import Include="System.Threading.Tasks" />
</ItemGroup>
<ItemGroup>
<Compile Include="ApplicationEvents.vb" />
<Compile Include="Form1.vb">
<SubType>Form</SubType>
</Compile>
@ -119,6 +126,18 @@
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="Form2.Designer.vb">
<DependentUpon>Form2.vb</DependentUpon>
</Compile>
<Compile Include="Form2.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="FormNastavitve.Designer.vb">
<DependentUpon>FormNastavitve.vb</DependentUpon>
</Compile>
<Compile Include="FormNastavitve.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
@ -135,16 +154,31 @@
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
<Compile Include="SplashScreen1.Designer.vb">
<DependentUpon>SplashScreen1.vb</DependentUpon>
</Compile>
<Compile Include="SplashScreen1.vb">
<SubType>Form</SubType>
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="Form1.resx">
<DependentUpon>Form1.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="Form2.resx">
<DependentUpon>Form2.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="FormNastavitve.resx">
<DependentUpon>FormNastavitve.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
</EmbeddedResource>
<EmbeddedResource Include="SplashScreen1.resx">
<DependentUpon>SplashScreen1.vb</DependentUpon>
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
@ -153,15 +187,84 @@
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</None>
<None Include="My Project\DataSources\TPS1100_Convert.My.MyApplication.datasource" />
<None Include="My Project\DataSources\TPS1100_Convert.My.MySettings.datasource" />
<None Include="My Project\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator>
<CustomToolNamespace>My</CustomToolNamespace>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
<None Include="App.config" />
<None Include="README.md" />
<None Include="TPS1100 Convert_TemporaryKey.pfx" />
</ItemGroup>
<ItemGroup>
<None Include="Icons\icons8-ok-50.png" />
<None Include="Icons\icons8-add-new-50.png" />
<None Include="Icons\icons8-cancel-50.png" />
<None Include="Icons\icons8-clear-symbol-50.png" />
<None Include="Icons\icons8-close-50.png" />
<None Include="Icons\icons8-close-window-50.png" />
<None Include="Icons\icons8-connection-status-on-48.png" />
<None Include="Icons\icons8-design-48.png" />
<None Include="Icons\icons8-done-50.png" />
<None Include="Icons\icons8-drawing-compass-48.png" />
<None Include="Icons\icons8-edit-50.png" />
<None Include="Icons\icons8-information-50.png" />
<None Include="Icons\icons8-info-squared-50.png" />
<None Include="Icons\icons8-land-surveying-48.png" />
<None Include="Icons\icons8-no-entry-50.png" />
<None Include="Icons\icons8-open-end-wrench-50.png" />
<None Include="Icons\icons8-save-as-50.png" />
<None Include="Icons\icons8-tools-50.png" />
<None Include="Icons\icons8-unavailable-50.png" />
<None Include="Icons\TPS1100CNVRT_logo.png" />
<None Include="Icons\Circled-Right-2-24.png" />
<None Include="Icons\Fine-Print-24.png" />
<None Include="Icons\icons8-advance-48.png" />
<None Include="Icons\icons8-do-not-disturb-50.png" />
<None Include="Icons\icons8-info-50.png" />
<None Include="Icons\icons8-undo-48.png" />
<None Include="Icons\ModernXP-41-Settings-icon.png" />
<None Include="Icons\Save-as-24.png" />
<None Include="Icons\TPS1100CNVRT.png" />
<None Include="Icons\icons8-add-folder-50.png" />
<None Include="Icons\icons8-browse-folder-50-2.png" />
<None Include="Icons\icons8-folder-50-2.png" />
<None Include="Icons\icons8-opened-folder-50.png" />
<None Include="My Project\Icons\Circled-Right-2-24.png" />
<None Include="My Project\Icons\Fine-Print-24.png" />
<None Include="My Project\Icons\icons8-add-folder-50.png" />
<None Include="My Project\Icons\icons8-add-new-50.png" />
<None Include="My Project\Icons\icons8-advance-48.png" />
<None Include="My Project\Icons\icons8-browse-folder-50-2.png" />
<None Include="My Project\Icons\icons8-cancel-50.png" />
<None Include="My Project\Icons\icons8-clear-symbol-50.png" />
<None Include="My Project\Icons\icons8-close-50.png" />
<None Include="My Project\Icons\icons8-close-window-50.png" />
<None Include="My Project\Icons\icons8-connection-status-on-48.png" />
<None Include="My Project\Icons\icons8-design-48.png" />
<None Include="My Project\Icons\icons8-done-50.png" />
<None Include="My Project\Icons\icons8-do-not-disturb-50.png" />
<None Include="My Project\Icons\icons8-drawing-compass-48.png" />
<None Include="My Project\Icons\icons8-edit-50.png" />
<None Include="My Project\Icons\icons8-folder-50-2.png" />
<None Include="My Project\Icons\icons8-info-50.png" />
<None Include="My Project\Icons\icons8-information-50.png" />
<None Include="My Project\Icons\icons8-info-squared-50.png" />
<None Include="My Project\Icons\icons8-land-surveying-48.png" />
<None Include="My Project\Icons\icons8-no-entry-50.png" />
<None Include="My Project\Icons\icons8-ok-50.png" />
<None Include="My Project\Icons\icons8-opened-folder-50.png" />
<None Include="My Project\Icons\icons8-open-end-wrench-50.png" />
<None Include="My Project\Icons\icons8-save-as-50.png" />
<None Include="My Project\Icons\icons8-tools-50.png" />
<None Include="My Project\Icons\icons8-unavailable-50.png" />
<None Include="My Project\Icons\icons8-undo-48.png" />
<None Include="My Project\Icons\ModernXP-41-Settings-icon.png" />
<None Include="My Project\Icons\Save-as-24.png" />
<None Include="My Project\Icons\TPS1100CNVRT.png" />
<None Include="My Project\Icons\TPS1100CNVRT_logo.png" />
<Content Include="TPS1100CNVRT.ico" />
</ItemGroup>
<ItemGroup>
@ -170,12 +273,20 @@
<ProductName>Microsoft .NET Framework 4.5.2 %28x86 and x64%29</ProductName>
<Install>true</Install>
</BootstrapperPackage>
<BootstrapperPackage Include=".NETFramework,Version=v4.8">
<Visible>False</Visible>
<ProductName>Microsoft .NET Framework 4.8 %28x86 and x64%29</ProductName>
<Install>true</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1</ProductName>
<Install>false</Install>
</BootstrapperPackage>
</ItemGroup>
<ItemGroup>
<WCFMetadata Include="Connected Services\" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.

21
bin/Release/TPS1100 Convert.application Normal file
View File

@ -0,0 +1,21 @@
<?xml version="1.0" encoding="utf-8"?>
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xrml="urn:mpeg:mpeg21:2003:01-REL-R-NS" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
<assemblyIdentity name="TPS1100 Convert.application" version="2.5.0.7" publicKeyToken="0000000000000000" language="sl-SI" processorArchitecture="msil" xmlns="urn:schemas-microsoft-com:asm.v1" />
<description asmv2:publisher="2B geoinformatika d.o.o." asmv2:product="TPS1100 Convert" xmlns="urn:schemas-microsoft-com:asm.v1" />
<deployment install="true" mapFileExtensions="true" co.v1:createDesktopShortcut="true" />
<compatibleFrameworks xmlns="urn:schemas-microsoft-com:clickonce.v2">
<framework targetVersion="4.8" profile="Full" supportedRuntime="4.0.30319" />
</compatibleFrameworks>
<dependency>
<dependentAssembly dependencyType="install" codebase="TPS1100 Convert.exe.manifest" size="5098">
<assemblyIdentity name="TPS1100 Convert.exe" version="2.5.0.7" publicKeyToken="0000000000000000" language="sl-SI" processorArchitecture="msil" type="win32" />
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>hKO2v4E5pqGxlyP3tr8AhpJb2l9VocXFXTWKBLLuzXo=</dsig:DigestValue>
</hash>
</dependentAssembly>
</dependency>
</asmv1:assembly>

BIN
bin/Release/TPS1100 Convert.exe Normal file
View File

Binary file not shown.

33
bin/Release/TPS1100 Convert.exe.config Normal file
View File

@ -0,0 +1,33 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<configSections>
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" >
<section name="TPS1100_Convert.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
</sectionGroup>
</configSections>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
</startup>
<userSettings>
<TPS1100_Convert.My.MySettings>
<setting name="ZadnjaMapa" serializeAs="String">
<value>C:\</value>
</setting>
<setting name="DecimalnoLocilo" serializeAs="String">
<value>Pika</value>
</setting>
<setting name="KodeUporabnik" serializeAs="String">
<value>Da</value>
</setting>
<setting name="Datoteka" serializeAs="String">
<value />
</setting>
<setting name="Stolpci" serializeAs="String">
<value>0</value>
</setting>
<setting name="DatLogfile" serializeAs="String">
<value />
</setting>
</TPS1100_Convert.My.MySettings>
</userSettings>
</configuration>

92
bin/Release/TPS1100 Convert.exe.manifest Normal file
View File

@ -0,0 +1,92 @@
<?xml version="1.0" encoding="utf-8"?>
<asmv1:assembly xsi:schemaLocation="urn:schemas-microsoft-com:asm.v1 assembly.adaptive.xsd" manifestVersion="1.0" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns="urn:schemas-microsoft-com:asm.v2" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:co.v1="urn:schemas-microsoft-com:clickonce.v1" xmlns:asmv3="urn:schemas-microsoft-com:asm.v3" xmlns:dsig="http://www.w3.org/2000/09/xmldsig#" xmlns:co.v2="urn:schemas-microsoft-com:clickonce.v2">
<asmv1:assemblyIdentity name="TPS1100 Convert.exe" version="2.5.0.7" publicKeyToken="0000000000000000" language="sl-SI" processorArchitecture="msil" type="win32" />
<description asmv2:iconFile="TPS1100CNVRT.ico" xmlns="urn:schemas-microsoft-com:asm.v1" />
<application />
<entryPoint>
<assemblyIdentity name="TPS1100 Convert" version="2.5.0.7" language="neutral" processorArchitecture="msil" />
<commandLine file="TPS1100 Convert.exe" parameters="" />
</entryPoint>
<trustInfo>
<security>
<applicationRequestMinimum>
<PermissionSet version="1" class="System.Security.NamedPermissionSet" Name="LocalIntranet" Description="Default rights given to applications on the local intranet" Unrestricted="true" ID="Custom" SameSite="site" />
<defaultAssemblyRequest permissionSetReference="Custom" />
</applicationRequestMinimum>
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
<!-- UAC Manifest Options
If you want to change the Windows User Account Control level replace the
requestedExecutionLevel node with one of the following.
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
Specifying requestedExecutionLevel element will disable file and registry virtualization.
Remove this element if your application requires this virtualization for backwards
compatibility.
-->
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
</requestedPrivileges>
</security>
</trustInfo>
<dependency>
<dependentOS>
<osVersionInfo>
<os majorVersion="5" minorVersion="1" buildNumber="2600" servicePackMajor="0" />
</osVersionInfo>
</dependentOS>
</dependency>
<dependency>
<dependentAssembly dependencyType="preRequisite" allowDelayedBinding="true">
<assemblyIdentity name="Microsoft.Windows.CommonLanguageRuntime" version="4.0.30319.0" />
</dependentAssembly>
</dependency>
<dependency>
<dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="TPS1100 Convert.exe" size="837632">
<assemblyIdentity name="TPS1100 Convert" version="2.5.0.7" language="neutral" processorArchitecture="msil" />
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>/7A+F4wCXnaKGKwhzcQpcEfcMlOy58SYt48u+ilAmJc=</dsig:DigestValue>
</hash>
</dependentAssembly>
</dependency>
<file name="TPS1100 Convert.exe.config" size="1511">
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>6UDlOle4IoJRK98Yv+wIR9EGBNDcleq1vUTWUG1+2eI=</dsig:DigestValue>
</hash>
</file>
<file name="TPS1100CNVRT.ico" size="176342">
<hash>
<dsig:Transforms>
<dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
</dsig:Transforms>
<dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha256" />
<dsig:DigestValue>74qm9dMNKX/YirNPCGO0q9XYo6Tzd8K6cBxxg17LnsU=</dsig:DigestValue>
</hash>
</file>
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
<application>
<!-- A list of the Windows versions that this application has been tested on
and is designed to work with. Uncomment the appropriate elements
and Windows will automatically select the most compatible environment. -->
<!-- Windows Vista -->
<!--<supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}" />-->
<!-- Windows 7 -->
<!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}" />-->
<!-- Windows 8 -->
<!--<supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}" />-->
<!-- Windows 8.1 -->
<!--<supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}" />-->
<!-- Windows 10 -->
<!--<supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}" />-->
</application>
</compatibility>
</asmv1:assembly>

196
bin/Release/TPS1100 Convert.xml Normal file
View File

@ -0,0 +1,196 @@
<?xml version="1.0"?>
<doc>
<assembly>
<name>
TPS1100 Convert
</name>
</assembly>
<members>
<member name="T:TPS1100_Convert.My.Resources.Resources">
<summary>
A strongly-typed resource class, for looking up localized strings, etc.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.ResourceManager">
<summary>
Returns the cached ResourceManager instance used by this class.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.Culture">
<summary>
Overrides the current thread's CurrentUICulture property for all
resource lookups using this strongly typed resource class.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.Circled_Right_2_24">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.Fine_Print_24">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_add_new_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_advance_48">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_browse_folder_50_2">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_cancel_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_clear_symbol_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_close_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_close_window_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_connection_status_on_48">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_design_48">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_do_not_disturb_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_done_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_drawing_compass_48">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_edit_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_folder_50_2">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_info_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_info_squared_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_information_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_land_surveying_48">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_no_entry_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_ok_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_open_end_wrench_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_opened_folder_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_save_as_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_tools_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_unavailable_50">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.icons8_undo_48">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.ModernXP_41_Settings_icon">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.README">
<summary>
Looks up a localized resource of type System.Byte[].
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.Save_as_24">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.TPS1100CNVRT">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.Resources.Resources.TPS1100CNVRT_logo">
<summary>
Looks up a localized resource of type System.Drawing.Bitmap.
</summary>
</member>
<member name="P:TPS1100_Convert.My.MySettings.DecimalnoLocilo">
<summary>
Znak za decimalno ločilo
</summary>
</member>
</members>
</doc>

BIN
bin/Release/app.publish/TPS1100 Convert.exe Normal file
View File

Binary file not shown.

BIN
bin/TPS1100-Convert_2.5.0.7_Portable.zip Normal file
View File

Binary file not shown.

BIN
bin/TPS1100-Convert_2.5.0.7_Setup.zip Normal file
View File

Binary file not shown.