Update - 2.8.0.2

CHANGELOG.md

@@ -3,6 +3,29 @@
 Zapisnik razvoja programa TPS1100 Convert.
 
 
+---
+
+## Verzija - 2.8.0.2 (Release)
+
+Datum: 2024/07/24
+
+### Popravki:
+
+- V oknu "Projekti" je popravljena ponastavitev vrednosti za izbran Job pri izbiri drugega projekt-a
+
+### Novo/Dodano:
+
+- Dodana funkcija in UI dialog za uvoz podatkov iz PC-kartice (DialogKartica)
+- Dodana funkcija za uvoz projektov, ki so v mapi "/Projekti"
+- Dodane funkcije za brisanje in arhiviranje projektov in jobov v oknu "Projekti"
+- **Orodja -> PC-Kartica -> Priprava Kartice...** (DialogPripravaKartice)
+    + Dodana geoida SLO1.gem in SLOG200.gem v pripravi kartice
+
+### Razvoj/Priprave:
+
+- Priprava funkcije in UI-ja za izračun podatkov meritve med dvema točkama (FormIzracunMeasure)
+- Delo na funkciji za izračun orientacije
+
 ---
 
 ## v2.8.0.1 - Release

DialogIzracunHzCor.Designer.vb

@@ -22,13 +22,12 @@ Partial Class DialogIzracunHzCor
     '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(DialogIzracunHzCor))
         Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
         Me.OK_Button = New System.Windows.Forms.Button()
         Me.Cancel_Button = New System.Windows.Forms.Button()
         Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
         Me.Label4 = New System.Windows.Forms.Label()
-        Me.MaskedTextBoxMerHz = New System.Windows.Forms.MaskedTextBox()
-        Me.MaskedTextBoxHzCor = New System.Windows.Forms.MaskedTextBox()
         Me.MaskedTextBoxDegHzCor = New System.Windows.Forms.MaskedTextBox()
         Me.MaskedTextBoxDegHz = New System.Windows.Forms.MaskedTextBox()
         Me.Label2 = New System.Windows.Forms.Label()
@@ -38,18 +37,15 @@ Partial Class DialogIzracunHzCor
         Me.MaskedTextBoxGsiHzCor = New System.Windows.Forms.MaskedTextBox()
         Me.Label9 = New System.Windows.Forms.Label()
         Me.ButtonUpGsi = New System.Windows.Forms.Button()
-        Me.ButtonUpDms = New System.Windows.Forms.Button()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
-        Me.ButtonUpDeg = New System.Windows.Forms.Button()
+        Me.TextBox2 = New System.Windows.Forms.TextBox()
-        Me.MaskedTextBox1 = New System.Windows.Forms.MaskedTextBox()
-        Me.MaskedTextBoxHzNov = New System.Windows.Forms.MaskedTextBox()
-        Me.MaskedTextBoxGsiHzNov = New System.Windows.Forms.MaskedTextBox()
-        Me.Label8 = New System.Windows.Forms.Label()
-        Me.Label7 = New System.Windows.Forms.Label()
-        Me.Label6 = New System.Windows.Forms.Label()
-        Me.ButtonKopirajHzGsi = New System.Windows.Forms.Button()
-        Me.ButtonKopirajHzTxt = New System.Windows.Forms.Button()
         Me.ButtonIzr = New System.Windows.Forms.Button()
         Me.Label3 = New System.Windows.Forms.Label()
+        Me.MaskedTextBoxHzNov = New System.Windows.Forms.MaskedTextBox()
+        Me.MaskedTextBoxHzNovDms = New System.Windows.Forms.MaskedTextBox()
+        Me.MaskedTextBoxGsiHzNov = New System.Windows.Forms.MaskedTextBox()
+        Me.ButtonKopirajHzTxt = New System.Windows.Forms.Button()
+        Me.ButtonKopirajHzGsi = New System.Windows.Forms.Button()
         Me.TableLayoutPanel1.SuspendLayout()
         Me.TableLayoutPanel2.SuspendLayout()
         Me.SuspendLayout()
@@ -62,31 +58,42 @@ Partial Class DialogIzracunHzCor
         Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
         Me.TableLayoutPanel1.Controls.Add(Me.OK_Button, 0, 0)
         Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
-        Me.TableLayoutPanel1.Location = New System.Drawing.Point(497, 264)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(456, 219)
         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(146, 29)
+        Me.TableLayoutPanel1.Size = New System.Drawing.Size(187, 45)
         Me.TableLayoutPanel1.TabIndex = 0
         '
         'OK_Button
         '
-        Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.OK_Button.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.OK_Button.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.OK_Button.FlatAppearance.BorderSize = 0
+        Me.OK_Button.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.OK_Button.Location = New System.Drawing.Point(3, 3)
         Me.OK_Button.Name = "OK_Button"
-        Me.OK_Button.Size = New System.Drawing.Size(67, 23)
+        Me.OK_Button.Size = New System.Drawing.Size(87, 39)
-        Me.OK_Button.TabIndex = 0
+        Me.OK_Button.TabIndex = 13
         Me.OK_Button.Text = "Pomoč"
         '
         'Cancel_Button
         '
-        Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.Cancel_Button.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel
-        Me.Cancel_Button.Location = New System.Drawing.Point(76, 3)
+        Me.Cancel_Button.FlatAppearance.BorderSize = 0
+        Me.Cancel_Button.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Cancel_Button.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_24
+        Me.Cancel_Button.Location = New System.Drawing.Point(96, 3)
         Me.Cancel_Button.Name = "Cancel_Button"
-        Me.Cancel_Button.Size = New System.Drawing.Size(67, 23)
+        Me.Cancel_Button.Size = New System.Drawing.Size(88, 39)
-        Me.Cancel_Button.TabIndex = 1
+        Me.Cancel_Button.TabIndex = 14
         Me.Cancel_Button.Text = "Zapri"
+        Me.Cancel_Button.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage
         '
         'TableLayoutPanel2
         '
@@ -94,12 +101,10 @@ Partial Class DialogIzracunHzCor
             Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
         Me.TableLayoutPanel2.ColumnCount = 4
         Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
-        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 25.0!))
+        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
-        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 25.0!))
+        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 20.0!))
-        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 30.0!))
+        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 40.0!))
         Me.TableLayoutPanel2.Controls.Add(Me.Label4, 2, 0)
-        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxMerHz, 2, 1)
-        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxHzCor, 2, 2)
         Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxDegHzCor, 1, 2)
         Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxDegHz, 1, 1)
         Me.TableLayoutPanel2.Controls.Add(Me.Label2, 0, 2)
@@ -108,31 +113,27 @@ Partial Class DialogIzracunHzCor
         Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxGsiHz, 3, 1)
         Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxGsiHzCor, 3, 2)
         Me.TableLayoutPanel2.Controls.Add(Me.Label9, 3, 0)
-        Me.TableLayoutPanel2.Controls.Add(Me.ButtonUpGsi, 3, 3)
+        Me.TableLayoutPanel2.Controls.Add(Me.TextBox1, 2, 1)
-        Me.TableLayoutPanel2.Controls.Add(Me.ButtonUpDms, 2, 3)
+        Me.TableLayoutPanel2.Controls.Add(Me.TextBox2, 2, 2)
-        Me.TableLayoutPanel2.Controls.Add(Me.ButtonUpDeg, 1, 3)
-        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBox1, 1, 7)
-        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxHzNov, 1, 6)
-        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxGsiHzNov, 1, 5)
-        Me.TableLayoutPanel2.Controls.Add(Me.Label8, 2, 7)
-        Me.TableLayoutPanel2.Controls.Add(Me.Label7, 2, 6)
-        Me.TableLayoutPanel2.Controls.Add(Me.Label6, 2, 5)
-        Me.TableLayoutPanel2.Controls.Add(Me.ButtonKopirajHzGsi, 3, 7)
-        Me.TableLayoutPanel2.Controls.Add(Me.ButtonKopirajHzTxt, 3, 6)
-        Me.TableLayoutPanel2.Controls.Add(Me.ButtonIzr, 1, 4)
         Me.TableLayoutPanel2.Controls.Add(Me.Label3, 0, 4)
+        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxHzNov, 1, 4)
+        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxHzNovDms, 2, 4)
+        Me.TableLayoutPanel2.Controls.Add(Me.MaskedTextBoxGsiHzNov, 3, 4)
+        Me.TableLayoutPanel2.Controls.Add(Me.ButtonKopirajHzTxt, 2, 5)
+        Me.TableLayoutPanel2.Controls.Add(Me.ButtonKopirajHzGsi, 3, 5)
+        Me.TableLayoutPanel2.Controls.Add(Me.ButtonUpGsi, 3, 3)
+        Me.TableLayoutPanel2.Controls.Add(Me.ButtonIzr, 1, 3)
         Me.TableLayoutPanel2.Location = New System.Drawing.Point(13, 13)
         Me.TableLayoutPanel2.Name = "TableLayoutPanel2"
-        Me.TableLayoutPanel2.RowCount = 8
+        Me.TableLayoutPanel2.RowCount = 7
         Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 18.0!))
         Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 32.0!))
         Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 32.0!))
+        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 40.0!))
         Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 32.0!))
         Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 32.0!))
-        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 32.0!))
+        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle())
-        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 32.0!))
+        Me.TableLayoutPanel2.Size = New System.Drawing.Size(630, 200)
-        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 20.0!))
-        Me.TableLayoutPanel2.Size = New System.Drawing.Size(630, 245)
         Me.TableLayoutPanel2.TabIndex = 1
         '
         'Label4
@@ -140,53 +141,26 @@ Partial Class DialogIzracunHzCor
         Me.Label4.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Label4.Location = New System.Drawing.Point(286, 0)
+        Me.Label4.Location = New System.Drawing.Point(255, 0)
         Me.Label4.Name = "Label4"
-        Me.Label4.Size = New System.Drawing.Size(151, 18)
+        Me.Label4.Size = New System.Drawing.Size(120, 18)
         Me.Label4.TabIndex = 10
         Me.Label4.Text = "Format DMS [D.MMSS]"
         Me.Label4.TextAlign = System.Drawing.ContentAlignment.BottomCenter
         '
-        'MaskedTextBoxMerHz
-        '
-        Me.MaskedTextBoxMerHz.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.MaskedTextBoxMerHz.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.MaskedTextBoxMerHz.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MaskedTextBoxMerHz.Location = New System.Drawing.Point(288, 23)
-        Me.MaskedTextBoxMerHz.Margin = New System.Windows.Forms.Padding(5)
-        Me.MaskedTextBoxMerHz.Name = "MaskedTextBoxMerHz"
-        Me.MaskedTextBoxMerHz.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
-        Me.MaskedTextBoxMerHz.Size = New System.Drawing.Size(147, 20)
-        Me.MaskedTextBoxMerHz.TabIndex = 6
-        '
-        'MaskedTextBoxHzCor
-        '
-        Me.MaskedTextBoxHzCor.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.MaskedTextBoxHzCor.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.MaskedTextBoxHzCor.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MaskedTextBoxHzCor.Location = New System.Drawing.Point(288, 55)
-        Me.MaskedTextBoxHzCor.Margin = New System.Windows.Forms.Padding(5)
-        Me.MaskedTextBoxHzCor.Name = "MaskedTextBoxHzCor"
-        Me.MaskedTextBoxHzCor.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
-        Me.MaskedTextBoxHzCor.Size = New System.Drawing.Size(147, 20)
-        Me.MaskedTextBoxHzCor.TabIndex = 7
-        '
         'MaskedTextBoxDegHzCor
         '
         Me.MaskedTextBoxDegHzCor.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.MaskedTextBoxDegHzCor.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.MaskedTextBoxDegHzCor.Enabled = False
         Me.MaskedTextBoxDegHzCor.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.MaskedTextBoxDegHzCor.Location = New System.Drawing.Point(131, 55)
         Me.MaskedTextBoxDegHzCor.Margin = New System.Windows.Forms.Padding(5)
         Me.MaskedTextBoxDegHzCor.Name = "MaskedTextBoxDegHzCor"
-        Me.MaskedTextBoxDegHzCor.Size = New System.Drawing.Size(147, 20)
+        Me.MaskedTextBoxDegHzCor.Size = New System.Drawing.Size(116, 20)
-        Me.MaskedTextBoxDegHzCor.TabIndex = 4
+        Me.MaskedTextBoxDegHzCor.TabIndex = 6
         '
         'MaskedTextBoxDegHz
         '
@@ -194,12 +168,13 @@ Partial Class DialogIzracunHzCor
             Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.MaskedTextBoxDegHz.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.MaskedTextBoxDegHz.Enabled = False
         Me.MaskedTextBoxDegHz.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.MaskedTextBoxDegHz.Location = New System.Drawing.Point(131, 23)
         Me.MaskedTextBoxDegHz.Margin = New System.Windows.Forms.Padding(5)
         Me.MaskedTextBoxDegHz.Name = "MaskedTextBoxDegHz"
-        Me.MaskedTextBoxDegHz.Size = New System.Drawing.Size(147, 20)
+        Me.MaskedTextBoxDegHz.Size = New System.Drawing.Size(116, 20)
-        Me.MaskedTextBoxDegHz.TabIndex = 3
+        Me.MaskedTextBoxDegHz.TabIndex = 5
         '
         'Label2
         '
@@ -232,8 +207,8 @@ Partial Class DialogIzracunHzCor
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Label5.Location = New System.Drawing.Point(129, 0)
         Me.Label5.Name = "Label5"
-        Me.Label5.Size = New System.Drawing.Size(151, 18)
+        Me.Label5.Size = New System.Drawing.Size(120, 18)
-        Me.Label5.TabIndex = 11
+        Me.Label5.TabIndex = 15
         Me.Label5.Text = "Format DEG"
         Me.Label5.TextAlign = System.Drawing.ContentAlignment.BottomCenter
         '
@@ -244,13 +219,13 @@ Partial Class DialogIzracunHzCor
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.MaskedTextBoxGsiHz.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.MaskedTextBoxGsiHz.Font = New System.Drawing.Font("Lucida Console", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MaskedTextBoxGsiHz.Location = New System.Drawing.Point(445, 23)
+        Me.MaskedTextBoxGsiHz.Location = New System.Drawing.Point(383, 23)
         Me.MaskedTextBoxGsiHz.Margin = New System.Windows.Forms.Padding(5)
         Me.MaskedTextBoxGsiHz.Mask = "21.324+0000000000000000 "
         Me.MaskedTextBoxGsiHz.Name = "MaskedTextBoxGsiHz"
         Me.MaskedTextBoxGsiHz.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
-        Me.MaskedTextBoxGsiHz.Size = New System.Drawing.Size(180, 19)
+        Me.MaskedTextBoxGsiHz.Size = New System.Drawing.Size(242, 19)
-        Me.MaskedTextBoxGsiHz.TabIndex = 17
+        Me.MaskedTextBoxGsiHz.TabIndex = 2
         '
         'MaskedTextBoxGsiHzCor
         '
@@ -259,22 +234,22 @@ Partial Class DialogIzracunHzCor
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.MaskedTextBoxGsiHzCor.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.MaskedTextBoxGsiHzCor.Font = New System.Drawing.Font("Lucida Console", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MaskedTextBoxGsiHzCor.Location = New System.Drawing.Point(445, 55)
+        Me.MaskedTextBoxGsiHzCor.Location = New System.Drawing.Point(383, 55)
         Me.MaskedTextBoxGsiHzCor.Margin = New System.Windows.Forms.Padding(5)
         Me.MaskedTextBoxGsiHzCor.Mask = "25.344+0000000000000000 "
         Me.MaskedTextBoxGsiHzCor.Name = "MaskedTextBoxGsiHzCor"
         Me.MaskedTextBoxGsiHzCor.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
-        Me.MaskedTextBoxGsiHzCor.Size = New System.Drawing.Size(180, 19)
+        Me.MaskedTextBoxGsiHzCor.Size = New System.Drawing.Size(242, 19)
-        Me.MaskedTextBoxGsiHzCor.TabIndex = 18
+        Me.MaskedTextBoxGsiHzCor.TabIndex = 3
         '
         'Label9
         '
         Me.Label9.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
             Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Label9.Location = New System.Drawing.Point(443, 0)
+        Me.Label9.Location = New System.Drawing.Point(381, 0)
         Me.Label9.Name = "Label9"
-        Me.Label9.Size = New System.Drawing.Size(184, 18)
+        Me.Label9.Size = New System.Drawing.Size(246, 18)
         Me.Label9.TabIndex = 19
         Me.Label9.Text = "Format GSI"
         Me.Label9.TextAlign = System.Drawing.ContentAlignment.BottomCenter
@@ -287,151 +262,34 @@ Partial Class DialogIzracunHzCor
         Me.ButtonUpGsi.AutoSize = True
         Me.ButtonUpGsi.FlatAppearance.BorderColor = System.Drawing.SystemColors.ButtonShadow
         Me.ButtonUpGsi.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.ButtonUpGsi.Location = New System.Drawing.Point(443, 85)
+        Me.ButtonUpGsi.Location = New System.Drawing.Point(381, 85)
         Me.ButtonUpGsi.Name = "ButtonUpGsi"
-        Me.ButtonUpGsi.Size = New System.Drawing.Size(184, 26)
+        Me.ButtonUpGsi.Size = New System.Drawing.Size(246, 34)
-        Me.ButtonUpGsi.TabIndex = 20
+        Me.ButtonUpGsi.TabIndex = 4
-        Me.ButtonUpGsi.Text = "Uporabi GSI"
+        Me.ButtonUpGsi.Text = "Prevedi izi GSI"
         Me.ButtonUpGsi.UseVisualStyleBackColor = True
         '
-        'ButtonUpDms
+        'TextBox1
         '
-        Me.ButtonUpDms.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+        Me.TextBox1.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-            Or System.Windows.Forms.AnchorStyles.Left) _
+        Me.TextBox1.BackColor = System.Drawing.SystemColors.Info
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.ButtonUpDms.AutoSize = True
+        Me.TextBox1.Cursor = System.Windows.Forms.Cursors.IBeam
-        Me.ButtonUpDms.FlatAppearance.BorderColor = System.Drawing.SystemColors.ButtonShadow
+        Me.TextBox1.Location = New System.Drawing.Point(255, 24)
-        Me.ButtonUpDms.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.TextBox1.Name = "TextBox1"
-        Me.ButtonUpDms.Location = New System.Drawing.Point(286, 85)
+        Me.TextBox1.Size = New System.Drawing.Size(120, 20)
-        Me.ButtonUpDms.Name = "ButtonUpDms"
+        Me.TextBox1.TabIndex = 0
-        Me.ButtonUpDms.Size = New System.Drawing.Size(151, 26)
-        Me.ButtonUpDms.TabIndex = 21
-        Me.ButtonUpDms.Text = "Uporabi DMS"
-        Me.ButtonUpDms.UseVisualStyleBackColor = True
         '
-        'ButtonUpDeg
+        'TextBox2
         '
-        Me.ButtonUpDeg.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+        Me.TextBox2.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-            Or System.Windows.Forms.AnchorStyles.Left) _
+        Me.TextBox2.BackColor = System.Drawing.SystemColors.Info
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.TextBox2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.ButtonUpDeg.AutoSize = True
+        Me.TextBox2.Cursor = System.Windows.Forms.Cursors.IBeam
-        Me.ButtonUpDeg.FlatAppearance.BorderColor = System.Drawing.SystemColors.ButtonShadow
+        Me.TextBox2.Location = New System.Drawing.Point(255, 56)
-        Me.ButtonUpDeg.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.TextBox2.Name = "TextBox2"
-        Me.ButtonUpDeg.Location = New System.Drawing.Point(129, 85)
+        Me.TextBox2.Size = New System.Drawing.Size(120, 20)
-        Me.ButtonUpDeg.Name = "ButtonUpDeg"
+        Me.TextBox2.TabIndex = 1
-        Me.ButtonUpDeg.Size = New System.Drawing.Size(151, 26)
-        Me.ButtonUpDeg.TabIndex = 22
-        Me.ButtonUpDeg.Text = "Uporabi DEG"
-        Me.ButtonUpDeg.UseVisualStyleBackColor = True
-        '
-        'MaskedTextBox1
-        '
-        Me.MaskedTextBox1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.MaskedTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.MaskedTextBox1.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MaskedTextBox1.Location = New System.Drawing.Point(131, 215)
-        Me.MaskedTextBox1.Margin = New System.Windows.Forms.Padding(5)
-        Me.MaskedTextBox1.Name = "MaskedTextBox1"
-        Me.MaskedTextBox1.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
-        Me.MaskedTextBox1.ReadOnly = True
-        Me.MaskedTextBox1.Size = New System.Drawing.Size(147, 20)
-        Me.MaskedTextBox1.TabIndex = 13
-        '
-        'MaskedTextBoxHzNov
-        '
-        Me.MaskedTextBoxHzNov.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.MaskedTextBoxHzNov.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.MaskedTextBoxHzNov.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MaskedTextBoxHzNov.Location = New System.Drawing.Point(131, 183)
-        Me.MaskedTextBoxHzNov.Margin = New System.Windows.Forms.Padding(5)
-        Me.MaskedTextBoxHzNov.Name = "MaskedTextBoxHzNov"
-        Me.MaskedTextBoxHzNov.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
-        Me.MaskedTextBoxHzNov.ReadOnly = True
-        Me.MaskedTextBoxHzNov.Size = New System.Drawing.Size(147, 20)
-        Me.MaskedTextBoxHzNov.TabIndex = 8
-        '
-        'MaskedTextBoxGsiHzNov
-        '
-        Me.MaskedTextBoxGsiHzNov.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.MaskedTextBoxGsiHzNov.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
-        Me.MaskedTextBoxGsiHzNov.Cursor = System.Windows.Forms.Cursors.IBeam
-        Me.MaskedTextBoxGsiHzNov.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.MaskedTextBoxGsiHzNov.Location = New System.Drawing.Point(131, 151)
-        Me.MaskedTextBoxGsiHzNov.Margin = New System.Windows.Forms.Padding(5)
-        Me.MaskedTextBoxGsiHzNov.Name = "MaskedTextBoxGsiHzNov"
-        Me.MaskedTextBoxGsiHzNov.ReadOnly = True
-        Me.MaskedTextBoxGsiHzNov.Size = New System.Drawing.Size(147, 20)
-        Me.MaskedTextBoxGsiHzNov.TabIndex = 5
-        '
-        'Label8
-        '
-        Me.Label8.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Label8.Location = New System.Drawing.Point(286, 210)
-        Me.Label8.Name = "Label8"
-        Me.Label8.Size = New System.Drawing.Size(151, 35)
-        Me.Label8.TabIndex = 16
-        Me.Label8.Text = "DMS (GSI)"
-        Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
-        '
-        'Label7
-        '
-        Me.Label7.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Label7.Location = New System.Drawing.Point(286, 178)
-        Me.Label7.Name = "Label7"
-        Me.Label7.Size = New System.Drawing.Size(151, 32)
-        Me.Label7.TabIndex = 15
-        Me.Label7.Text = "D.MMSS"
-        Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
-        '
-        'Label6
-        '
-        Me.Label6.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Label6.Location = New System.Drawing.Point(286, 146)
-        Me.Label6.Name = "Label6"
-        Me.Label6.Size = New System.Drawing.Size(151, 32)
-        Me.Label6.TabIndex = 14
-        Me.Label6.Text = "D.DDDDDD"
-        Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
-        '
-        'ButtonKopirajHzGsi
-        '
-        Me.ButtonKopirajHzGsi.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.ButtonKopirajHzGsi.BackgroundImage = Global.TPS1100_Convert.My.Resources.Resources.icons8_file_GSI_50
-        Me.ButtonKopirajHzGsi.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
-        Me.ButtonKopirajHzGsi.FlatAppearance.BorderSize = 0
-        Me.ButtonKopirajHzGsi.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.ButtonKopirajHzGsi.Location = New System.Drawing.Point(443, 213)
-        Me.ButtonKopirajHzGsi.Name = "ButtonKopirajHzGsi"
-        Me.ButtonKopirajHzGsi.Size = New System.Drawing.Size(40, 29)
-        Me.ButtonKopirajHzGsi.TabIndex = 12
-        Me.ButtonKopirajHzGsi.UseVisualStyleBackColor = True
-        '
-        'ButtonKopirajHzTxt
-        '
-        Me.ButtonKopirajHzTxt.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
-            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.ButtonKopirajHzTxt.BackgroundImage = Global.TPS1100_Convert.My.Resources.Resources.icons8_file_TXT_50
-        Me.ButtonKopirajHzTxt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
-        Me.ButtonKopirajHzTxt.FlatAppearance.BorderSize = 0
-        Me.ButtonKopirajHzTxt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.ButtonKopirajHzTxt.Location = New System.Drawing.Point(443, 181)
-        Me.ButtonKopirajHzTxt.Name = "ButtonKopirajHzTxt"
-        Me.ButtonKopirajHzTxt.Size = New System.Drawing.Size(40, 26)
-        Me.ButtonKopirajHzTxt.TabIndex = 2
-        Me.ButtonKopirajHzTxt.UseVisualStyleBackColor = True
         '
         'ButtonIzr
         '
@@ -443,11 +301,13 @@ Partial Class DialogIzracunHzCor
         Me.ButtonIzr.FlatAppearance.BorderColor = System.Drawing.SystemColors.ButtonShadow
         Me.ButtonIzr.FlatStyle = System.Windows.Forms.FlatStyle.Flat
         Me.ButtonIzr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.ButtonIzr.Location = New System.Drawing.Point(129, 117)
+        Me.ButtonIzr.Image = Global.TPS1100_Convert.My.Resources.Resources.digital_24
+        Me.ButtonIzr.Location = New System.Drawing.Point(129, 85)
         Me.ButtonIzr.Name = "ButtonIzr"
-        Me.ButtonIzr.Size = New System.Drawing.Size(151, 26)
+        Me.ButtonIzr.Size = New System.Drawing.Size(120, 34)
-        Me.ButtonIzr.TabIndex = 9
+        Me.ButtonIzr.TabIndex = 7
         Me.ButtonIzr.Text = "IZRAČUN"
+        Me.ButtonIzr.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
         Me.ButtonIzr.UseVisualStyleBackColor = False
         '
         'Label3
@@ -456,29 +316,110 @@ Partial Class DialogIzracunHzCor
             Or System.Windows.Forms.AnchorStyles.Left) _
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label3.Location = New System.Drawing.Point(3, 114)
+        Me.Label3.Location = New System.Drawing.Point(3, 122)
         Me.Label3.Name = "Label3"
         Me.Label3.Size = New System.Drawing.Size(120, 32)
         Me.Label3.TabIndex = 2
         Me.Label3.Text = "Izračunan Hz"
         Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
         '
+        'MaskedTextBoxHzNov
+        '
+        Me.MaskedTextBoxHzNov.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.MaskedTextBoxHzNov.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.MaskedTextBoxHzNov.Cursor = System.Windows.Forms.Cursors.IBeam
+        Me.MaskedTextBoxHzNov.Enabled = False
+        Me.MaskedTextBoxHzNov.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.MaskedTextBoxHzNov.Location = New System.Drawing.Point(131, 127)
+        Me.MaskedTextBoxHzNov.Margin = New System.Windows.Forms.Padding(5)
+        Me.MaskedTextBoxHzNov.Name = "MaskedTextBoxHzNov"
+        Me.MaskedTextBoxHzNov.ReadOnly = True
+        Me.MaskedTextBoxHzNov.Size = New System.Drawing.Size(116, 20)
+        Me.MaskedTextBoxHzNov.TabIndex = 8
+        '
+        'MaskedTextBoxHzNovDms
+        '
+        Me.MaskedTextBoxHzNovDms.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.MaskedTextBoxHzNovDms.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
+        Me.MaskedTextBoxHzNovDms.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.MaskedTextBoxHzNovDms.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.MaskedTextBoxHzNovDms.Location = New System.Drawing.Point(257, 127)
+        Me.MaskedTextBoxHzNovDms.Margin = New System.Windows.Forms.Padding(5)
+        Me.MaskedTextBoxHzNovDms.Name = "MaskedTextBoxHzNovDms"
+        Me.MaskedTextBoxHzNovDms.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
+        Me.MaskedTextBoxHzNovDms.ReadOnly = True
+        Me.MaskedTextBoxHzNovDms.Size = New System.Drawing.Size(116, 20)
+        Me.MaskedTextBoxHzNovDms.TabIndex = 9
+        '
+        'MaskedTextBoxGsiHzNov
+        '
+        Me.MaskedTextBoxGsiHzNov.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.MaskedTextBoxGsiHzNov.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
+        Me.MaskedTextBoxGsiHzNov.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.MaskedTextBoxGsiHzNov.Font = New System.Drawing.Font("Lucida Console", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.MaskedTextBoxGsiHzNov.Location = New System.Drawing.Point(383, 127)
+        Me.MaskedTextBoxGsiHzNov.Margin = New System.Windows.Forms.Padding(5)
+        Me.MaskedTextBoxGsiHzNov.Name = "MaskedTextBoxGsiHzNov"
+        Me.MaskedTextBoxGsiHzNov.PromptChar = Global.Microsoft.VisualBasic.ChrW(35)
+        Me.MaskedTextBoxGsiHzNov.ReadOnly = True
+        Me.MaskedTextBoxGsiHzNov.Size = New System.Drawing.Size(242, 20)
+        Me.MaskedTextBoxGsiHzNov.TabIndex = 11
+        '
+        'ButtonKopirajHzTxt
+        '
+        Me.ButtonKopirajHzTxt.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
+        Me.ButtonKopirajHzTxt.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.ButtonKopirajHzTxt.FlatAppearance.BorderSize = 0
+        Me.ButtonKopirajHzTxt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.ButtonKopirajHzTxt.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_rename_20
+        Me.ButtonKopirajHzTxt.Location = New System.Drawing.Point(255, 157)
+        Me.ButtonKopirajHzTxt.Name = "ButtonKopirajHzTxt"
+        Me.ButtonKopirajHzTxt.Size = New System.Drawing.Size(100, 26)
+        Me.ButtonKopirajHzTxt.TabIndex = 10
+        Me.ButtonKopirajHzTxt.Text = "Kopiraj"
+        Me.ButtonKopirajHzTxt.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage
+        Me.ButtonKopirajHzTxt.UseVisualStyleBackColor = True
+        '
+        'ButtonKopirajHzGsi
+        '
+        Me.ButtonKopirajHzGsi.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.ButtonKopirajHzGsi.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.ButtonKopirajHzGsi.FlatAppearance.BorderSize = 0
+        Me.ButtonKopirajHzGsi.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.ButtonKopirajHzGsi.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_rename_20
+        Me.ButtonKopirajHzGsi.Location = New System.Drawing.Point(527, 157)
+        Me.ButtonKopirajHzGsi.Name = "ButtonKopirajHzGsi"
+        Me.ButtonKopirajHzGsi.Size = New System.Drawing.Size(100, 26)
+        Me.ButtonKopirajHzGsi.TabIndex = 12
+        Me.ButtonKopirajHzGsi.Text = "Kopiraj"
+        Me.ButtonKopirajHzGsi.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage
+        Me.ButtonKopirajHzGsi.UseVisualStyleBackColor = True
+        '
         'DialogIzracunHzCor
         '
-        Me.AcceptButton = Me.OK_Button
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.CancelButton = Me.Cancel_Button
-        Me.ClientSize = New System.Drawing.Size(655, 305)
+        Me.ClientSize = New System.Drawing.Size(655, 276)
         Me.Controls.Add(Me.TableLayoutPanel2)
         Me.Controls.Add(Me.TableLayoutPanel1)
         Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
         Me.MaximizeBox = False
         Me.MinimizeBox = False
         Me.Name = "DialogIzracunHzCor"
-        Me.ShowInTaskbar = False
+        Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
-        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
-        Me.Text = "DialogIzracunHzCor"
+        Me.Text = "Izračun HzCor"
+        Me.TopMost = True
         Me.TableLayoutPanel1.ResumeLayout(False)
         Me.TableLayoutPanel2.ResumeLayout(False)
         Me.TableLayoutPanel2.PerformLayout()
@@ -492,25 +433,20 @@ Partial Class DialogIzracunHzCor
     Friend WithEvents Label2 As Label
     Friend WithEvents Label3 As Label
     Friend WithEvents MaskedTextBoxDegHz As MaskedTextBox
-    Friend WithEvents MaskedTextBoxMerHz As MaskedTextBox
-    Friend WithEvents MaskedTextBoxGsiHzNov As MaskedTextBox
-    Friend WithEvents MaskedTextBoxDegHzCor As MaskedTextBox
-    Friend WithEvents MaskedTextBoxHzCor As MaskedTextBox
     Friend WithEvents MaskedTextBoxHzNov As MaskedTextBox
+    Friend WithEvents MaskedTextBoxDegHzCor As MaskedTextBox
+    Friend WithEvents MaskedTextBoxHzNovDms As MaskedTextBox
     Friend WithEvents ButtonIzr As Button
     Friend WithEvents Label4 As Label
     Friend WithEvents Label5 As Label
     Friend WithEvents ButtonKopirajHzTxt As Button
     Friend WithEvents ButtonKopirajHzGsi As Button
-    Friend WithEvents MaskedTextBox1 As MaskedTextBox
+    Friend WithEvents MaskedTextBoxGsiHzNov As MaskedTextBox
-    Friend WithEvents Label6 As Label
-    Friend WithEvents Label7 As Label
-    Friend WithEvents Label8 As Label
     Friend WithEvents MaskedTextBoxGsiHz As MaskedTextBox
     Friend WithEvents MaskedTextBoxGsiHzCor As MaskedTextBox
     Friend WithEvents Label9 As Label
     Friend WithEvents ButtonUpGsi As Button
-    Friend WithEvents ButtonUpDms As Button
-    Friend WithEvents ButtonUpDeg As Button
     Friend WithEvents Cancel_Button As Button
+    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents TextBox2 As TextBox
 End Class

DialogIzracunHzCor.vb

@@ -14,53 +14,72 @@ Public Class DialogIzracunHzCor
 
     Private Sub ButtonIzr_Click(sender As Object, e As EventArgs) Handles ButtonIzr.Click
         ' Pretvori DMS v decimalne stopinje za Hz
-        Dim hzMer As Double = MaskedTextBoxDegHz.Text
+        Dim hzMer = TextBox1.Text
-        'Dim hzMerData = Split(hzMer, ".")
+        Dim hzMerData = Split(hzMer, ".")
-        'Dim hzMerDeg As Double = CDbl(hzMerData(0))
+        Dim hzMerDeg As Double = hzMerData(0)
-        'Dim hzMerMin As Double = CDbl(Microsoft.VisualBasic.Left(hzMerData(1).ToString, 2)) / 60
+        Dim hzMerMin As Double = Microsoft.VisualBasic.Left(hzMerData(1), 2) / 60
-        'Dim hzMerSec As Double = CDbl(Microsoft.VisualBasic.Mid(hzMerData(1), 3)) / 3600
+        Dim hzMerSec As Double = Microsoft.VisualBasic.Mid(hzMerData(1), 3) / 3600
-        'Dim hzMerDecDeg As Double = hzMerDeg + hzMerMin + hzMerSec
+        Dim hzMerDecDeg As Double = hzMerDeg + hzMerMin + hzMerSec
+        MaskedTextBoxDegHz.Text = Format(hzMerDecDeg, "0.000000").ToString
         ' Pretvori DMS v decimalne stopinje za HzCor
-        Dim hzPop As Double = MaskedTextBoxDegHzCor.Text
+        Dim hzPop = TextBox2.Text
-        'Dim hzPopData = Split(hzPop, ".")
+        Dim hzPopData = Split(hzPop, ".")
-        'Dim hzPopDeg As Double = hzPopData(0)
+        Dim hzPopDeg As Double = hzPopData(0)
-        'Dim hzPopMin As Double = Microsoft.VisualBasic.Left(hzPopData(1).ToString, 2) / 60
+        Dim hzPopMin As Double = Microsoft.VisualBasic.Left(hzPopData(1).ToString, 2) / 60
-        'Dim hzPopSec As Double = Microsoft.VisualBasic.Mid(hzPopData(1), 3) / 3600
+        Dim hzPopSec As Double = Microsoft.VisualBasic.Mid(hzPopData(1), 3) / 3600
-        'Dim hzPopDecDeg As Double = hzPopDeg + hzPopMin + hzPopSec
+        Dim hzPopDecDeg As Double = hzPopDeg + hzPopMin + hzPopSec
+        MaskedTextBoxDegHzCor.Text = Format(hzPopDecDeg, "0.000000").ToString
         ' Izračunaj nov Azi in izpiši v obeh formatih
-        Dim hzNov As Double = 0
+        Dim hzNovDecDeg As Double = hzMerDecDeg + hzPopDecDeg
-        Dim hzNovDecDeg As Double = hzMer + hzPop
-
         If hzNovDecDeg >= 360 Then
             hzNovDecDeg = hzNovDecDeg - 360
         End If
+        MaskedTextBoxHzNov.Text = Format(hzNovDecDeg, "0.000000").ToString
+        Dim hzNov = MaskedTextBoxHzNov.Text
+        Dim hzNovData = Split(hzNov, ".")
+        Dim hzNovDeg As Double = Int(hzNov)
+        Dim hzNovMin As Double = (hzNov - hzNovDeg) * 60
+        Dim hzNovMinInt As Double = Int(hzNovMin)
+        Dim hzNovSec As Double = Format(((hzNovMin - hzNovMinInt) * 60), "00")
+        Dim hzNovDms As String = hzNovDeg.ToString + "." + hzNovMinInt.ToString + hzNovSec.ToString
+        Dim hzNovDmsGsi As String = "21.324+00000000" + Format(hzNovDeg, "000").ToString + Format(hzNovMinInt, "00").ToString + Format(hzNovSec, "00").ToString + "0 "
+        MaskedTextBoxHzNovDms.Text = hzNovDms
+        MaskedTextBoxGsiHzNov.Text = hzNovDmsGsi
+        'If hzNovDms >= 360 Then
+        '    hzNovDms = hzNovDms - 360
+        'End If
         'MaskedTextBoxDegHz.Text = Format(hzMerDecDeg, "0.000000").ToString
         'MaskedTextBoxDegHzCor.Text = Format(hzPopDecDeg, "0.000000").ToString
-        MaskedTextBoxGsiHzNov.Text = Format(hzNovDecDeg, "0.000000").ToString
+
     End Sub
 
     Private Sub ButtonUpGsi_Click(sender As Object, e As EventArgs) Handles ButtonUpGsi.Click
         ' Pretvori DMS v decimalne stopinje za Hz
         Dim hzMer As Double = Microsoft.VisualBasic.Right(Replace(MaskedTextBoxGsiHz.Text, " ", ""), 8)
         Dim hzMerNumData As Double = CDbl(hzMer / 100000)
-        Dim hzMerData = Split(hzMerNumData.ToString, ".")
+        TextBox1.Text = Format(hzMerNumData, "0.0000").ToString
+        'Dim hzMerData = Split(hzMerNumData.ToString, ".")
         'Dim hzMerDeg As Double = hzMerData(0)
-        'Dim hzMerMin As Double = Microsoft.VisualBasic.Left(hzMerData(1), 2)
+        'Dim hzMerMin As Double = hzMerData(1) * 60
-        'Dim hzMerSec As Double = Microsoft.VisualBasic.Mid(hzMerData(1), 2)
+        'Dim hzMerMinInt As Integer = Int(hzMerMin)
-        'Dim hzMerDecDeg As Double = hzMerDeg + (hzMerMin / 60) + (hzMerSec / 3600)
+        'Dim hzMerSec As Double = Format(((hzMerMin - hzMerMinInt) * 60), "0")
+        'Dim hzMerDms As String = hzMerDeg.ToString + "." + hzMerMinInt.ToString + hzMerSec.ToString
+        'MaskedTextBoxDegHz.Text = hzMerDms.ToString
         ' Pretvori DMS v decimalne stopinje za HzCor
         Dim hzPop As Double = Microsoft.VisualBasic.Right(Replace(MaskedTextBoxGsiHzCor.Text, " ", ""), 8)
         Dim hzMPopNumData As Double = CDbl(hzPop / 100000)
-        Dim hzPopData = Split(hzMPopNumData.ToString, ".")
+        TextBox2.Text = Format(hzMPopNumData, "0.0000").ToString
+        'Dim hzPopData = Split(hzMPopNumData.ToString, ".")
         'Dim hzPopDeg As Double = hzPopData(0)
-        'Dim hzPopMin As Double = Microsoft.VisualBasic.Left(hzPopData(1), 2)
+        'Dim hzPopMin As Double = hzPopData(1) * 60
-        'Dim hzPopSec As Double = Microsoft.VisualBasic.Mid(hzPopData(1), 2)
+        'Dim hzPopMinInt As Double = Int(hzPopMin)
-        'Dim hzPopDecDeg As Double = hzPopDeg + (hzPopMin / 60) + (hzPopSec / 3600)
+        'Dim hzPopSec As Double = Format(((hzPopMin - hzPopMinInt) * 60), "0")
+        'Dim hzPopDms As Double = hzPopDeg.ToString + "." + hzPopMinInt.ToString + hzPopSec.ToString
+        'MaskedTextBoxDegHzCor.Text = hzPopDms.ToString
 
-        MaskedTextBoxMerHz.Text = Format(hzMerNumData, "0.0000").ToString
-        MaskedTextBoxHzCor.Text = Format(hzMPopNumData, "0.0000").ToString
         'MaskedTextBoxDegHz.Text = Format(hzMerDecDeg.ToString, "0.000000").ToString
         'MaskedTextBoxDegHzCor.Text = Format(hzPopDecDeg.ToString, "0.000000").ToString
 
     End Sub
+
 End Class

DialogKartica.Designer.vb

@@ -0,0 +1,221 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class DialogKartica
+    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(DialogKartica))
+        Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
+        Me.OK_Button = New System.Windows.Forms.Button()
+        Me.Cancel_Button = New System.Windows.Forms.Button()
+        Me.ListViewGsiJob = New System.Windows.Forms.ListView()
+        Me.ColumnHeader1 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
+        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
+        Me.cbPgon = New System.Windows.Forms.ComboBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.Label3 = New System.Windows.Forms.Label()
+        Me.ColumnHeader2 = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
+        Me.Label4 = New System.Windows.Forms.Label()
+        Me.TableLayoutPanel1.SuspendLayout()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'TableLayoutPanel1
+        '
+        Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        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.OK_Button, 0, 0)
+        Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(12, 263)
+        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(210, 46)
+        Me.TableLayoutPanel1.TabIndex = 0
+        '
+        'OK_Button
+        '
+        Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.OK_Button.FlatAppearance.BorderSize = 0
+        Me.OK_Button.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.OK_Button.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_move_to_folder_24
+        Me.OK_Button.Location = New System.Drawing.Point(9, 3)
+        Me.OK_Button.Name = "OK_Button"
+        Me.OK_Button.Size = New System.Drawing.Size(86, 39)
+        Me.OK_Button.TabIndex = 3
+        Me.OK_Button.Text = "Uvozi"
+        Me.OK_Button.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.OK_Button.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
+        '
+        'Cancel_Button
+        '
+        Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.Cancel_Button.FlatAppearance.BorderSize = 0
+        Me.Cancel_Button.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Cancel_Button.Location = New System.Drawing.Point(124, 3)
+        Me.Cancel_Button.Name = "Cancel_Button"
+        Me.Cancel_Button.Size = New System.Drawing.Size(67, 40)
+        Me.Cancel_Button.TabIndex = 4
+        Me.Cancel_Button.Text = "Prekini"
+        '
+        'ListViewGsiJob
+        '
+        Me.ListViewGsiJob.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.ListViewGsiJob.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.ColumnHeader1, Me.ColumnHeader2})
+        Me.ListViewGsiJob.FullRowSelect = True
+        Me.ListViewGsiJob.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.Nonclickable
+        Me.ListViewGsiJob.HideSelection = False
+        Me.ListViewGsiJob.LabelWrap = False
+        Me.ListViewGsiJob.Location = New System.Drawing.Point(12, 83)
+        Me.ListViewGsiJob.MultiSelect = False
+        Me.ListViewGsiJob.Name = "ListViewGsiJob"
+        Me.ListViewGsiJob.ShowGroups = False
+        Me.ListViewGsiJob.ShowItemToolTips = True
+        Me.ListViewGsiJob.Size = New System.Drawing.Size(210, 136)
+        Me.ListViewGsiJob.SmallImageList = Me.ImageList1
+        Me.ListViewGsiJob.TabIndex = 1
+        Me.ListViewGsiJob.UseCompatibleStateImageBehavior = False
+        Me.ListViewGsiJob.View = System.Windows.Forms.View.List
+        '
+        'ColumnHeader1
+        '
+        Me.ColumnHeader1.Text = "Datoteka"
+        Me.ColumnHeader1.Width = 140
+        '
+        'ImageList1
+        '
+        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
+        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
+        Me.ImageList1.Images.SetKeyName(0, "icons8-scroll-50.png")
+        Me.ImageList1.Images.SetKeyName(1, "icons8-file-GSI-50.png")
+        '
+        'cbPgon
+        '
+        Me.cbPgon.FlatStyle = System.Windows.Forms.FlatStyle.Popup
+        Me.cbPgon.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cbPgon.FormattingEnabled = True
+        Me.cbPgon.ItemHeight = 16
+        Me.cbPgon.Location = New System.Drawing.Point(110, 31)
+        Me.cbPgon.Name = "cbPgon"
+        Me.cbPgon.Size = New System.Drawing.Size(112, 24)
+        Me.cbPgon.TabIndex = 0
+        '
+        'Label1
+        '
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(66, 36)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(38, 13)
+        Me.Label1.TabIndex = 3
+        Me.Label1.Text = "Pogon"
+        '
+        'Label2
+        '
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(12, 67)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(47, 13)
+        Me.Label2.TabIndex = 4
+        Me.Label2.Text = "GSI Jobi"
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.PictureBox1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_sdb_import_50
+        Me.PictureBox1.InitialImage = Global.TPS1100_Convert.My.Resources.Resources.icons8_sd_50
+        Me.PictureBox1.Location = New System.Drawing.Point(12, 12)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(48, 52)
+        Me.PictureBox1.TabIndex = 5
+        Me.PictureBox1.TabStop = False
+        '
+        'Label3
+        '
+        Me.Label3.Location = New System.Drawing.Point(12, 241)
+        Me.Label3.Name = "Label3"
+        Me.Label3.Size = New System.Drawing.Size(210, 19)
+        Me.Label3.TabIndex = 6
+        Me.Label3.Text = "Datum zapisa:"
+        Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'ColumnHeader2
+        '
+        Me.ColumnHeader2.Text = "Datum"
+        Me.ColumnHeader2.Width = 100
+        '
+        'Label4
+        '
+        Me.Label4.Location = New System.Drawing.Point(12, 222)
+        Me.Label4.Name = "Label4"
+        Me.Label4.Size = New System.Drawing.Size(210, 19)
+        Me.Label4.TabIndex = 6
+        Me.Label4.Text = "Ddatoteka..."
+        Me.Label4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'DialogKartica
+        '
+        Me.AcceptButton = Me.OK_Button
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.CancelButton = Me.Cancel_Button
+        Me.ClientSize = New System.Drawing.Size(234, 321)
+        Me.Controls.Add(Me.Label4)
+        Me.Controls.Add(Me.Label3)
+        Me.Controls.Add(Me.PictureBox1)
+        Me.Controls.Add(Me.Label2)
+        Me.Controls.Add(Me.Label1)
+        Me.Controls.Add(Me.cbPgon)
+        Me.Controls.Add(Me.ListViewGsiJob)
+        Me.Controls.Add(Me.TableLayoutPanel1)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "DialogKartica"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.Text = "Kartica"
+        Me.TopMost = True
+        Me.TableLayoutPanel1.ResumeLayout(False)
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+        Me.PerformLayout()
+
+    End Sub
+    Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
+    Friend WithEvents OK_Button As System.Windows.Forms.Button
+    Friend WithEvents Cancel_Button As System.Windows.Forms.Button
+    Friend WithEvents ListViewGsiJob As ListView
+    Friend WithEvents cbPgon As ComboBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents Label2 As Label
+    Friend WithEvents ColumnHeader1 As ColumnHeader
+    Friend WithEvents ImageList1 As ImageList
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents Label3 As Label
+    Friend WithEvents ColumnHeader2 As ColumnHeader
+    Friend WithEvents Label4 As Label
+End Class

DialogKartica.vb

@@ -0,0 +1,79 @@
+Imports System.IO
+Imports System.Windows.Forms
+
+
+Public Class DialogKartica
+
+    Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
+        ' Uvozi izbrano datoteko v aktivni projekt
+        Dim delovnaMapa = My.Application.Info.DirectoryPath.ToString + "\" + My.Settings.ProjektMapa.ToString + "\"
+        Dim izbran As ListView.SelectedListViewItemCollection = Me.ListViewGsiJob.SelectedItems
+        Dim item As ListViewItem
+        Dim ime As String = ""
+        Dim mapa As String = ""
+        Dim datdatum As String = ""
+
+        For Each item In izbran
+            ime = item.SubItems(0).Text
+            mapa = item.SubItems(1).Text
+            datdatum = My.Computer.FileSystem.GetFileInfo(mapa).LastWriteTime
+            Dim fileUvoz = mapa
+            Dim fileIme = ime
+            Dim fileIzvoz = delovnaMapa + fileIme
+            My.Computer.FileSystem.CopyFile(fileUvoz, fileIzvoz, True)
+            Form1.datJob = fileIzvoz
+        Next
+
+        Form1.NaloziGsiJob()
+
+        Me.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.Close()
+    End Sub
+
+    Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
+        Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.Close()
+    End Sub
+
+    Private Sub DialogKartica_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+        For Each drive In IO.DriveInfo.GetDrives
+            'get all removable and fixed drives
+            If drive.DriveType = IO.DriveType.Removable And drive.IsReady = True Then
+                'add all found drives into the combobox
+                cbPgon.Items.Add(drive)
+            End If
+        Next
+    End Sub
+
+    Private Sub cbPgon_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbPgon.SelectedIndexChanged
+        Dim delovnaMapa = cbPgon.Text + "GSI"
+        ListViewGsiJob.Clear()
+        If My.Computer.FileSystem.DirectoryExists(delovnaMapa) Then
+            Dim ix As Integer = 0
+            Dim datotekeJobi = My.Computer.FileSystem.GetFiles(delovnaMapa, FileIO.SearchOption.SearchTopLevelOnly, "*.GSI")
+            For Each datJob In datotekeJobi
+                Dim datdatum = My.Computer.FileSystem.GetFileInfo(datJob).LastWriteTime
+                ListViewGsiJob.Items.Add(Path.GetFileName(datJob).ToString, 1).SubItems.Add(Path.GetFullPath(datJob))
+                ListViewGsiJob.Items.Item(ix).ToolTipText = datdatum.ToString
+                ix = ix + 1
+            Next
+        End If
+
+    End Sub
+
+    Private Sub ListViewGsiJob_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListViewGsiJob.SelectedIndexChanged
+        Dim izbran As ListView.SelectedListViewItemCollection = Me.ListViewGsiJob.SelectedItems
+        Dim item As ListViewItem
+        Dim ime As String = ""
+        Dim mapa As String = ""
+        Dim datdatum As String = ""
+        For Each item In izbran
+            ime = item.SubItems(0).Text
+            mapa = item.SubItems(1).Text
+            datdatum = My.Computer.FileSystem.GetFileInfo(mapa).LastWriteTime
+        Next
+
+        Label3.Text = "Datum zapisa: " + datdatum.ToString
+        Label4.Text = "Datoteka: " + mapa.ToString
+    End Sub
+End Class

DialogPripravaKartice.Designer.vb

@@ -37,8 +37,9 @@ Partial Class DialogPripravaKartice
         Me.Label4 = New System.Windows.Forms.Label()
         Me.Label5 = New System.Windows.Forms.Label()
         Me.Label6 = New System.Windows.Forms.Label()
-        Me.ProgressBar1 = New System.Windows.Forms.ProgressBar()
         Me.TextBoxPogonIme = New System.Windows.Forms.TextBox()
+        Me.ProgressBar1 = New System.Windows.Forms.ProgressBar()
+        Me.Label7 = New System.Windows.Forms.Label()
         Me.TableLayoutPanel1.SuspendLayout()
         Me.TableLayoutPanel2.SuspendLayout()
         Me.SuspendLayout()
@@ -232,15 +233,6 @@ Partial Class DialogPripravaKartice
         Me.Label6.Text = "Format"
         Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
         '
-        'ProgressBar1
-        '
-        Me.ProgressBar1.ForeColor = System.Drawing.Color.YellowGreen
-        Me.ProgressBar1.Location = New System.Drawing.Point(12, 157)
-        Me.ProgressBar1.Name = "ProgressBar1"
-        Me.ProgressBar1.Size = New System.Drawing.Size(340, 16)
-        Me.ProgressBar1.Step = 1
-        Me.ProgressBar1.TabIndex = 6
-        '
         'TextBoxPogonIme
         '
         Me.TextBoxPogonIme.Anchor = System.Windows.Forms.AnchorStyles.Left
@@ -250,11 +242,31 @@ Partial Class DialogPripravaKartice
         Me.TextBoxPogonIme.Size = New System.Drawing.Size(100, 21)
         Me.TextBoxPogonIme.TabIndex = 7
         '
+        'ProgressBar1
+        '
+        Me.ProgressBar1.ForeColor = System.Drawing.Color.YellowGreen
+        Me.ProgressBar1.Location = New System.Drawing.Point(58, 157)
+        Me.ProgressBar1.Name = "ProgressBar1"
+        Me.ProgressBar1.Size = New System.Drawing.Size(294, 16)
+        Me.ProgressBar1.Step = 1
+        Me.ProgressBar1.TabIndex = 6
+        '
+        'Label7
+        '
+        Me.Label7.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.Label7.Location = New System.Drawing.Point(9, 154)
+        Me.Label7.Name = "Label7"
+        Me.Label7.Size = New System.Drawing.Size(43, 22)
+        Me.Label7.TabIndex = 7
+        Me.Label7.Text = "Prostor"
+        Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
         'DialogPripravaKartice
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(364, 231)
+        Me.Controls.Add(Me.Label7)
         Me.Controls.Add(Me.ProgressBar1)
         Me.Controls.Add(Me.TableLayoutPanel2)
         Me.Controls.Add(Me.Label2)
@@ -291,4 +303,5 @@ Partial Class DialogPripravaKartice
     Friend WithEvents Label5 As Label
     Friend WithEvents Label6 As Label
     Friend WithEvents TextBoxPogonIme As TextBox
+    Friend WithEvents Label7 As Label
 End Class

DialogPripravaKartice.vb

@@ -21,8 +21,12 @@ Public Class DialogPripravaKartice
         Dim karticaMapa = ComboBox1.Text
         Dim fileUvozCode = delovnaMapa + "\Virtualna Kartica\CODE\TPS1100.crf"
         Dim fileIzvozCode = karticaMapa + "CODE\TPS1100.crf"
-        Dim fileUvozGeoid = delovnaMapa + "\Virtualna Kartica\DATA\GPS\GEOID\SLOV2016.GEM"
+        Dim fileUvozGeoid1 = delovnaMapa + "\Virtualna Kartica\DATA\GPS\GEOID\SLO1.GEM"
-        Dim fileIzvozGeoid = karticaMapa + "DATA\GPS\GEOID\SLOV2016.GEM"
+        Dim fileIzvozGeoid1 = karticaMapa + "DATA\GPS\GEOID\SLO1.GEM"
+        Dim fileUvozGeoid2 = delovnaMapa + "\Virtualna Kartica\DATA\GPS\GEOID\SLOG2000.GEM"
+        Dim fileIzvozGeoid2 = karticaMapa + "DATA\GPS\GEOID\SLOG2000.GEM"
+        Dim fileUvozGeoid3 = delovnaMapa + "\Virtualna Kartica\DATA\GPS\GEOID\SLOV2016.GEM"
+        Dim fileIzvozGeoid3 = karticaMapa + "DATA\GPS\GEOID\SLOV2016.GEM"
         Dim fileUvozTps = delovnaMapa + "\Virtualna Kartica\TPS\CONF\1102_BB.PAR"
         Dim fileIzvozTps = karticaMapa + "TPS\CONF\1102_BB.PAR"
         Dim fileUvozGpsGsi = delovnaMapa + "\Virtualna Kartica\CONVERT\GPS-GSI.FRT"
@@ -36,8 +40,16 @@ Public Class DialogPripravaKartice
             My.Computer.FileSystem.CopyFile(fileUvozCode, fileIzvozCode, True)
         End If
 
-        If My.Computer.FileSystem.FileExists(fileUvozGeoid) Then
+        If My.Computer.FileSystem.FileExists(fileUvozGeoid1) Then
-            My.Computer.FileSystem.CopyFile(fileUvozGeoid, fileIzvozGeoid, True)
+            My.Computer.FileSystem.CopyFile(fileUvozGeoid1, fileIzvozGeoid1, True)
+        End If
+
+        If My.Computer.FileSystem.FileExists(fileUvozGeoid2) Then
+            My.Computer.FileSystem.CopyFile(fileUvozGeoid2, fileIzvozGeoid2, True)
+        End If
+
+        If My.Computer.FileSystem.FileExists(fileUvozGeoid3) Then
+            My.Computer.FileSystem.CopyFile(fileUvozGeoid3, fileIzvozGeoid3, True)
         End If
 
         If My.Computer.FileSystem.FileExists(fileUvozTps) Then
@@ -64,18 +76,35 @@ Public Class DialogPripravaKartice
             My.Computer.FileSystem.CreateDirectory(karticaMapa + "LOG")
         End If
 
-        Process.Start(karticaMapa)
     End Sub
 
     Private Sub Button_Pripravi_Click(ByVal sender As Object, e As EventArgs) Handles Button_Pripravi.Click
-        PripravaKartice()
+        Dim karticaMapa As String = ComboBox1.Text
+        Dim kartica As String = ComboBox1.Text.Replace("\", "")
+        Dim karticaTip As String = LabelTip.Text
+        Dim karticaLabel As String = TextBoxPogonIme.Text
 
-        MsgBox("Kartica pripravljena...
+        Dim msgPriprava = MsgBox("Priprava pogona: " + kartica + " [" + karticaLabel + "]" + vbCrLf + vbCrLf +
-Naloženo:
+                                 "Na kartico bodo naloženi podatki za TPS110x in GPS500." + vbCrLf +
-- knjižnica z kodami TPS1100
+                                 "Nadaljujem?",
-- Nastavitve za instrument TPS110x
+                                 vbYesNo + vbExclamation, "Formatiranje kartice...")
-- Formati za izvoz podatkov na GPS500
+
-- Geoid SLOV2016.GEM za uporabo na GPS500", vbOKOnly, "Priprava Kartice")
+        If msgPriprava = DialogResult.Yes Then
+            ' Zaženi pripravo kartice
+            PripravaKartice()
+            ' Priprava končana...
+            Dim msgPripravaOk = MsgBox("Kartica pripravljena... podatki naloženi." + vbCrLf + vbCrLf +
+                                       "- CODE: Kode za TPS1100" + vbCrLf +
+                                       "- CONVERT: Formati izvoza podatkov za GPS500" + vbCrLf +
+                                       "- DATA/GPS/GEOID: Geoidi za GPS500" + vbCrLf +
+                                       "- TPS/CONF: Nastavitve za TPS110x" + vbCrLf + vbCrLf +
+                                       "Odprem mapo kartice?",
+                                       vbYesNo + vbInformation, "Priprava Kartice")
+
+            If msgPripravaOk = DialogResult.Yes Then
+                Process.Start(karticaMapa)
+            End If
+        End If
 
         Dim allDrives() As DriveInfo = DriveInfo.GetDrives()
         Dim d As DriveInfo
@@ -101,15 +130,15 @@ Naloženo:
     Private Sub Button_Format_Click(sender As Object, e As EventArgs) Handles Button_Format.Click
         Dim kartica As String = ComboBox1.Text.Replace("\", "")
         Dim karticaTip As String = LabelTip.Text
-        Dim kartivaLabel As String = TextBoxPogonIme.Text
+        Dim karticaLabel As String = TextBoxPogonIme.Text
 
-        Dim msgFormat = MsgBox("Formatiran bo pogona [" + kartica + "]. Nadaljujem?", vbOKCancel, "Formatiranje kartice...")
+        Dim msgFormat = MsgBox("Formatiranje pogona: " + kartica + " [" + karticaLabel + "]" + vbCrLf + "Vsi podatki na pogonu bodo izbrisani!" + vbCrLf + "Nadaljujem?", vbYesNo + vbExclamation, "Formatiranje kartice...")
 
-        If msgFormat = DialogResult.OK Then
+        If msgFormat = DialogResult.Yes Then
-            Shell("cmd /c format " + kartica + " /fs:" + karticaTip + " /v:" + kartivaLabel + " /q", AppWinStyle.NormalFocus)
+            Shell("cmd /c format " + kartica + " /fs:" + karticaTip + " /v:" + karticaLabel + " /q", AppWinStyle.NormalFocus)
             ProgressBar1.Value = 0
         Else
-            MsgBox("Postopek prekinjen.", vbOKOnly)
+            MsgBox("Postopek prekinjen.", vbOKOnly + vbInformation)
         End If
 
     End Sub

DialogProjektUvoz.Designer.vb

@@ -0,0 +1,214 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class DialogProjektUvoz
+    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(DialogProjektUvoz))
+        Dim ListViewItem1 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("Test Projekt", 1)
+        Dim ListViewItem2 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("Mapa Projekt 2", 4)
+        Dim ListViewItem3 As System.Windows.Forms.ListViewItem = New System.Windows.Forms.ListViewItem("Mapa Projekt 3", 4)
+        Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
+        Me.OK_Button = New System.Windows.Forms.Button()
+        Me.Cancel_Button = New System.Windows.Forms.Button()
+        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
+        Me.ListView1 = New System.Windows.Forms.ListView()
+        Me.colProjIme = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
+        Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
+        Me.PictureBox1 = New System.Windows.Forms.PictureBox()
+        Me.Label1 = New System.Windows.Forms.Label()
+        Me.PictureBox2 = New System.Windows.Forms.PictureBox()
+        Me.Label2 = New System.Windows.Forms.Label()
+        Me.TableLayoutPanel1.SuspendLayout()
+        Me.TableLayoutPanel2.SuspendLayout()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.SuspendLayout()
+        '
+        'TableLayoutPanel1
+        '
+        Me.TableLayoutPanel1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        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.OK_Button, 0, 0)
+        Me.TableLayoutPanel1.Controls.Add(Me.Cancel_Button, 1, 0)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(276, 270)
+        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(146, 29)
+        Me.TableLayoutPanel1.TabIndex = 0
+        '
+        'OK_Button
+        '
+        Me.OK_Button.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.OK_Button.Location = New System.Drawing.Point(3, 3)
+        Me.OK_Button.Name = "OK_Button"
+        Me.OK_Button.Size = New System.Drawing.Size(67, 23)
+        Me.OK_Button.TabIndex = 0
+        Me.OK_Button.Text = "OK"
+        '
+        'Cancel_Button
+        '
+        Me.Cancel_Button.Anchor = System.Windows.Forms.AnchorStyles.None
+        Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.Cancel_Button.Location = New System.Drawing.Point(76, 3)
+        Me.Cancel_Button.Name = "Cancel_Button"
+        Me.Cancel_Button.Size = New System.Drawing.Size(67, 23)
+        Me.Cancel_Button.TabIndex = 1
+        Me.Cancel_Button.Text = "Cancel"
+        '
+        'ImageList1
+        '
+        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
+        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
+        Me.ImageList1.Images.SetKeyName(0, "icons8-folder-tree-50.png")
+        Me.ImageList1.Images.SetKeyName(1, "icons8-folder-50-2.png")
+        Me.ImageList1.Images.SetKeyName(2, "icons8-error-48.png")
+        Me.ImageList1.Images.SetKeyName(3, "icons8-done-50.png")
+        Me.ImageList1.Images.SetKeyName(4, "icons8-close-50.png")
+        Me.ImageList1.Images.SetKeyName(5, "icons8-ok-50.png")
+        Me.ImageList1.Images.SetKeyName(6, "icons8-cancel-50.png")
+        '
+        'ListView1
+        '
+        Me.ListView1.Columns.AddRange(New System.Windows.Forms.ColumnHeader() {Me.colProjIme})
+        Me.ListView1.FullRowSelect = True
+        Me.ListView1.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.Nonclickable
+        Me.ListView1.HideSelection = False
+        ListViewItem1.StateImageIndex = 0
+        Me.ListView1.Items.AddRange(New System.Windows.Forms.ListViewItem() {ListViewItem1, ListViewItem2, ListViewItem3})
+        Me.ListView1.LabelWrap = False
+        Me.ListView1.Location = New System.Drawing.Point(13, 13)
+        Me.ListView1.Name = "ListView1"
+        Me.ListView1.ShowGroups = False
+        Me.ListView1.Size = New System.Drawing.Size(257, 286)
+        Me.ListView1.SmallImageList = Me.ImageList1
+        Me.ListView1.TabIndex = 1
+        Me.ListView1.UseCompatibleStateImageBehavior = False
+        Me.ListView1.View = System.Windows.Forms.View.Details
+        '
+        'colProjIme
+        '
+        Me.colProjIme.Text = "Mape"
+        Me.colProjIme.Width = 235
+        '
+        'TableLayoutPanel2
+        '
+        Me.TableLayoutPanel2.ColumnCount = 2
+        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 25.0!))
+        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 75.0!))
+        Me.TableLayoutPanel2.Controls.Add(Me.PictureBox1, 0, 0)
+        Me.TableLayoutPanel2.Controls.Add(Me.Label1, 1, 0)
+        Me.TableLayoutPanel2.Controls.Add(Me.PictureBox2, 0, 1)
+        Me.TableLayoutPanel2.Controls.Add(Me.Label2, 1, 1)
+        Me.TableLayoutPanel2.Location = New System.Drawing.Point(277, 13)
+        Me.TableLayoutPanel2.Name = "TableLayoutPanel2"
+        Me.TableLayoutPanel2.RowCount = 3
+        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
+        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle())
+        Me.TableLayoutPanel2.Size = New System.Drawing.Size(145, 251)
+        Me.TableLayoutPanel2.TabIndex = 2
+        '
+        'PictureBox1
+        '
+        Me.PictureBox1.BackgroundImage = Global.TPS1100_Convert.My.Resources.Resources.icons8_folder_50_2
+        Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox1.Location = New System.Drawing.Point(3, 3)
+        Me.PictureBox1.Name = "PictureBox1"
+        Me.PictureBox1.Size = New System.Drawing.Size(30, 24)
+        Me.PictureBox1.TabIndex = 0
+        Me.PictureBox1.TabStop = False
+        '
+        'Label1
+        '
+        Me.Label1.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.Label1.AutoSize = True
+        Me.Label1.Location = New System.Drawing.Point(39, 8)
+        Me.Label1.Name = "Label1"
+        Me.Label1.Size = New System.Drawing.Size(49, 13)
+        Me.Label1.TabIndex = 1
+        Me.Label1.Text = "Obstoječ"
+        Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'PictureBox2
+        '
+        Me.PictureBox2.BackgroundImage = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_50
+        Me.PictureBox2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
+        Me.PictureBox2.Location = New System.Drawing.Point(3, 33)
+        Me.PictureBox2.Name = "PictureBox2"
+        Me.PictureBox2.Size = New System.Drawing.Size(30, 24)
+        Me.PictureBox2.TabIndex = 0
+        Me.PictureBox2.TabStop = False
+        '
+        'Label2
+        '
+        Me.Label2.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.Label2.AutoSize = True
+        Me.Label2.Location = New System.Drawing.Point(39, 38)
+        Me.Label2.Name = "Label2"
+        Me.Label2.Size = New System.Drawing.Size(57, 13)
+        Me.Label2.TabIndex = 1
+        Me.Label2.Text = "Ni naložen"
+        Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+        '
+        'DialogProjektUvoz
+        '
+        Me.AcceptButton = Me.OK_Button
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.CancelButton = Me.Cancel_Button
+        Me.ClientSize = New System.Drawing.Size(434, 311)
+        Me.Controls.Add(Me.TableLayoutPanel2)
+        Me.Controls.Add(Me.ListView1)
+        Me.Controls.Add(Me.TableLayoutPanel1)
+        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MaximizeBox = False
+        Me.MinimizeBox = False
+        Me.Name = "DialogProjektUvoz"
+        Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.Text = "Uvoz Projektov"
+        Me.TopMost = True
+        Me.TableLayoutPanel1.ResumeLayout(False)
+        Me.TableLayoutPanel2.ResumeLayout(False)
+        Me.TableLayoutPanel2.PerformLayout()
+        CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.ResumeLayout(False)
+
+    End Sub
+    Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
+    Friend WithEvents OK_Button As System.Windows.Forms.Button
+    Friend WithEvents Cancel_Button As System.Windows.Forms.Button
+    Friend WithEvents ImageList1 As ImageList
+    Friend WithEvents ListView1 As ListView
+    Friend WithEvents colProjIme As ColumnHeader
+    Friend WithEvents TableLayoutPanel2 As TableLayoutPanel
+    Friend WithEvents PictureBox1 As PictureBox
+    Friend WithEvents Label1 As Label
+    Friend WithEvents PictureBox2 As PictureBox
+    Friend WithEvents Label2 As Label
+End Class

DialogProjektUvoz.vb

@@ -0,0 +1,18 @@
+Imports System.Windows.Forms
+
+Public Class DialogProjektUvoz
+
+    Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click
+        Me.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.Close()
+    End Sub
+
+    Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
+        Me.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.Close()
+    End Sub
+
+    Private Sub ListView1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListView1.SelectedIndexChanged
+
+    End Sub
+End Class

Form1.Designer.vb

@@ -35,6 +35,7 @@ Partial Class Form1
         Me.ToolStripButtonpROJ = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator()
+        Me.tsbKartica = New System.Windows.Forms.ToolStripButton()
         Me.tsbOpenFile = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripButtonPripravi = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripSeparator11 = New System.Windows.Forms.ToolStripSeparator()
@@ -67,9 +68,12 @@ Partial Class Form1
         Me.OrodjaToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.PripraviKarticoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.tsbPripravaFormat = New System.Windows.Forms.ToolStripMenuItem()
-        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
         Me.tsbPripravaZav = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
         Me.tsbMapaZav = New System.Windows.Forms.ToolStripMenuItem()
+        Me.IzračunToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.tsbPodMer = New System.Windows.Forms.ToolStripMenuItem()
+        Me.tsbHzCor = New System.Windows.Forms.ToolStripMenuItem()
         Me.FolderDialogKartica = New System.Windows.Forms.FolderBrowserDialog()
         Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
         Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
@@ -91,11 +95,11 @@ Partial Class Form1
         Me.RichTextBox1.Cursor = System.Windows.Forms.Cursors.Default
         Me.RichTextBox1.DetectUrls = False
         Me.RichTextBox1.Font = New System.Drawing.Font("Courier New", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
-        Me.RichTextBox1.Location = New System.Drawing.Point(9, 123)
+        Me.RichTextBox1.Location = New System.Drawing.Point(9, 121)
         Me.RichTextBox1.Margin = New System.Windows.Forms.Padding(0)
         Me.RichTextBox1.Name = "RichTextBox1"
         Me.RichTextBox1.ReadOnly = True
-        Me.RichTextBox1.Size = New System.Drawing.Size(1233, 596)
+        Me.RichTextBox1.Size = New System.Drawing.Size(1233, 598)
         Me.RichTextBox1.TabIndex = 1
         Me.RichTextBox1.Text = resources.GetString("RichTextBox1.Text")
         Me.RichTextBox1.WordWrap = False
@@ -123,8 +127,8 @@ Partial Class Form1
         '
         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(189, 17)
+        Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(157, 17)
-        Me.ToolStripStatusLabel1.Text = "2B geoinformatika d.o.o. / Boris Bilc"
+        Me.ToolStripStatusLabel1.Text = "Made by: Boris Bilc / MultiBox"
         '
         'ToolStripStatusLabel2
         '
@@ -150,11 +154,11 @@ Partial Class Form1
         '
         Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
         Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(24, 24)
-        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButtonpROJ, Me.ToolStripButton2, Me.ToolStripSeparator8, Me.tsbOpenFile, Me.ToolStripButtonPripravi, Me.ToolStripSeparator11, Me.ButtonUrediDat, Me.ToolStripSeparator1, Me.tsbConvert, Me.ToolStripButtonGeo, Me.tsbPointsOnly, Me.ToolStripButton3, Me.ToolStripSeparator4, Me.ToolStripLabel1})
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButtonpROJ, Me.ToolStripButton2, Me.ToolStripSeparator8, Me.tsbKartica, Me.tsbOpenFile, Me.ToolStripButtonPripravi, Me.ToolStripSeparator11, Me.ButtonUrediDat, Me.ToolStripSeparator1, Me.tsbConvert, Me.ToolStripButtonGeo, Me.tsbPointsOnly, Me.ToolStripButton3, Me.ToolStripSeparator4, Me.ToolStripLabel1})
-        Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 28)
         Me.ToolStrip1.Name = "ToolStrip1"
-        Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(5)
+        Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(10, 0, 10, 0)
-        Me.ToolStrip1.Size = New System.Drawing.Size(1251, 62)
+        Me.ToolStrip1.Size = New System.Drawing.Size(1251, 52)
         Me.ToolStrip1.TabIndex = 0
         Me.ToolStrip1.Text = "ToolStrip1"
         '
@@ -183,6 +187,15 @@ Partial Class Form1
         Me.ToolStripSeparator8.Name = "ToolStripSeparator8"
         Me.ToolStripSeparator8.Size = New System.Drawing.Size(6, 52)
         '
+        'tsbKartica
+        '
+        Me.tsbKartica.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_sdb_import_50
+        Me.tsbKartica.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.tsbKartica.Name = "tsbKartica"
+        Me.tsbKartica.Size = New System.Drawing.Size(47, 49)
+        Me.tsbKartica.Text = "Kartica"
+        Me.tsbKartica.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
+        '
         'tsbOpenFile
         '
         Me.tsbOpenFile.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_move_to_folder_50
@@ -283,10 +296,11 @@ Partial Class Form1
         '
         'MenuStrip1
         '
+        Me.MenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
         Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MenuToolStripMenuItem, Me.ToolStripMenuItem1, Me.OrodjaToolStripMenuItem})
         Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
         Me.MenuStrip1.Name = "MenuStrip1"
-        Me.MenuStrip1.Size = New System.Drawing.Size(1251, 24)
+        Me.MenuStrip1.Size = New System.Drawing.Size(1251, 28)
         Me.MenuStrip1.TabIndex = 3
         Me.MenuStrip1.Text = "MenuStrip1"
         '
@@ -295,40 +309,40 @@ Partial Class Form1
         Me.MenuToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OdpriGSIToolStripMenuItem, Me.ToolStripSeparator6, Me.PripraviGSIToolStripMenuItem, Me.ToolStripSeparator7, Me.PosodobitevToolStripMenuItem, Me.InfoOAplikacijiToolStripMenuItem, Me.ToolStripSeparator12, Me.IzhodToolStripMenuItem})
         Me.MenuToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_menu_50
         Me.MenuToolStripMenuItem.Name = "MenuToolStripMenuItem"
-        Me.MenuToolStripMenuItem.Size = New System.Drawing.Size(81, 20)
+        Me.MenuToolStripMenuItem.Size = New System.Drawing.Size(85, 24)
         Me.MenuToolStripMenuItem.Text = "Program"
         '
         'OdpriGSIToolStripMenuItem
         '
         Me.OdpriGSIToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_tools_50
         Me.OdpriGSIToolStripMenuItem.Name = "OdpriGSIToolStripMenuItem"
-        Me.OdpriGSIToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.OdpriGSIToolStripMenuItem.Size = New System.Drawing.Size(153, 26)
         Me.OdpriGSIToolStripMenuItem.Text = "Nastavitve"
         Me.OdpriGSIToolStripMenuItem.ToolTipText = "Odpri Nastavitve aplikacije..."
         '
         'ToolStripSeparator6
         '
         Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
-        Me.ToolStripSeparator6.Size = New System.Drawing.Size(177, 6)
+        Me.ToolStripSeparator6.Size = New System.Drawing.Size(150, 6)
         '
         'PripraviGSIToolStripMenuItem
         '
         Me.PripraviGSIToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_question_mark_48
         Me.PripraviGSIToolStripMenuItem.Name = "PripraviGSIToolStripMenuItem"
-        Me.PripraviGSIToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.PripraviGSIToolStripMenuItem.Size = New System.Drawing.Size(153, 26)
         Me.PripraviGSIToolStripMenuItem.Text = "Navodila"
         Me.PripraviGSIToolStripMenuItem.ToolTipText = "Odpri navodila za uporabo aplikacije..."
         '
         'ToolStripSeparator7
         '
         Me.ToolStripSeparator7.Name = "ToolStripSeparator7"
-        Me.ToolStripSeparator7.Size = New System.Drawing.Size(177, 6)
+        Me.ToolStripSeparator7.Size = New System.Drawing.Size(150, 6)
         '
         'PosodobitevToolStripMenuItem
         '
         Me.PosodobitevToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_rotate_48
         Me.PosodobitevToolStripMenuItem.Name = "PosodobitevToolStripMenuItem"
-        Me.PosodobitevToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.PosodobitevToolStripMenuItem.Size = New System.Drawing.Size(153, 26)
         Me.PosodobitevToolStripMenuItem.Text = "Posodobitev..."
         Me.PosodobitevToolStripMenuItem.ToolTipText = "Preveri za nove posodobitve..."
         '
@@ -336,20 +350,20 @@ Partial Class Form1
         '
         Me.InfoOAplikacijiToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_information_50
         Me.InfoOAplikacijiToolStripMenuItem.Name = "InfoOAplikacijiToolStripMenuItem"
-        Me.InfoOAplikacijiToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.InfoOAplikacijiToolStripMenuItem.Size = New System.Drawing.Size(153, 26)
         Me.InfoOAplikacijiToolStripMenuItem.Text = "Info"
         Me.InfoOAplikacijiToolStripMenuItem.ToolTipText = "Pokaži podatke o aplikaciji..."
         '
         'ToolStripSeparator12
         '
         Me.ToolStripSeparator12.Name = "ToolStripSeparator12"
-        Me.ToolStripSeparator12.Size = New System.Drawing.Size(177, 6)
+        Me.ToolStripSeparator12.Size = New System.Drawing.Size(150, 6)
         '
         'IzhodToolStripMenuItem
         '
         Me.IzhodToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_50
         Me.IzhodToolStripMenuItem.Name = "IzhodToolStripMenuItem"
-        Me.IzhodToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.IzhodToolStripMenuItem.Size = New System.Drawing.Size(153, 26)
         Me.IzhodToolStripMenuItem.Text = "I&zhod"
         Me.IzhodToolStripMenuItem.ToolTipText = "Izhod iz programa..."
         '
@@ -358,27 +372,27 @@ Partial Class Form1
         Me.ToolStripMenuItem1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ManagerToolStripMenuItem, Me.ToolStripSeparator10, Me.ToolStripMenuItem2, Me.ToolStripMenuItem4, Me.tsbUvoziTocke, Me.ToolStripSeparator13, Me.ShraniToolStripMenuItem})
         Me.ToolStripMenuItem1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_folder_tree_50
         Me.ToolStripMenuItem1.Name = "ToolStripMenuItem1"
-        Me.ToolStripMenuItem1.Size = New System.Drawing.Size(75, 20)
+        Me.ToolStripMenuItem1.Size = New System.Drawing.Size(79, 24)
         Me.ToolStripMenuItem1.Text = "Podatki"
         '
         'ManagerToolStripMenuItem
         '
         Me.ManagerToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_tree_structure_50
         Me.ManagerToolStripMenuItem.Name = "ManagerToolStripMenuItem"
-        Me.ManagerToolStripMenuItem.Size = New System.Drawing.Size(209, 22)
+        Me.ManagerToolStripMenuItem.Size = New System.Drawing.Size(213, 26)
         Me.ManagerToolStripMenuItem.Text = "&Projekti | Virtualna Kartica"
         Me.ManagerToolStripMenuItem.ToolTipText = "Urejevalnik projektov"
         '
         'ToolStripSeparator10
         '
         Me.ToolStripSeparator10.Name = "ToolStripSeparator10"
-        Me.ToolStripSeparator10.Size = New System.Drawing.Size(206, 6)
+        Me.ToolStripSeparator10.Size = New System.Drawing.Size(210, 6)
         '
         'ToolStripMenuItem2
         '
         Me.ToolStripMenuItem2.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_product_documents_50
         Me.ToolStripMenuItem2.Name = "ToolStripMenuItem2"
-        Me.ToolStripMenuItem2.Size = New System.Drawing.Size(209, 22)
+        Me.ToolStripMenuItem2.Size = New System.Drawing.Size(213, 26)
         Me.ToolStripMenuItem2.Text = "&Odpri Job"
         Me.ToolStripMenuItem2.ToolTipText = "Odpri GSI Job..."
         '
@@ -386,7 +400,7 @@ Partial Class Form1
         '
         Me.ToolStripMenuItem4.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_move_to_folder_50
         Me.ToolStripMenuItem4.Name = "ToolStripMenuItem4"
-        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(209, 22)
+        Me.ToolStripMenuItem4.Size = New System.Drawing.Size(213, 26)
         Me.ToolStripMenuItem4.Text = "&Uvozi Job"
         Me.ToolStripMenuItem4.ToolTipText = "Uvozi GSI v aktivni projekt..."
         '
@@ -394,30 +408,30 @@ Partial Class Form1
         '
         Me.tsbUvoziTocke.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_send_file_50
         Me.tsbUvoziTocke.Name = "tsbUvoziTocke"
-        Me.tsbUvoziTocke.Size = New System.Drawing.Size(209, 22)
+        Me.tsbUvoziTocke.Size = New System.Drawing.Size(213, 26)
         Me.tsbUvoziTocke.Text = "Uvozi Točke"
         Me.tsbUvoziTocke.ToolTipText = "Uvozi TXT/KOO in pretvori v GSI format."
         '
         'ToolStripSeparator13
         '
         Me.ToolStripSeparator13.Name = "ToolStripSeparator13"
-        Me.ToolStripSeparator13.Size = New System.Drawing.Size(206, 6)
+        Me.ToolStripSeparator13.Size = New System.Drawing.Size(210, 6)
         '
         'ShraniToolStripMenuItem
         '
         Me.ShraniToolStripMenuItem.Enabled = False
         Me.ShraniToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_save_as_50
         Me.ShraniToolStripMenuItem.Name = "ShraniToolStripMenuItem"
-        Me.ShraniToolStripMenuItem.Size = New System.Drawing.Size(209, 22)
+        Me.ShraniToolStripMenuItem.Size = New System.Drawing.Size(213, 26)
         Me.ShraniToolStripMenuItem.Text = "&Shrani..."
         Me.ShraniToolStripMenuItem.ToolTipText = "Shrani podatke rezultata procesiranja..."
         '
         'OrodjaToolStripMenuItem
         '
-        Me.OrodjaToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.PripraviKarticoToolStripMenuItem})
+        Me.OrodjaToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.PripraviKarticoToolStripMenuItem, Me.IzračunToolStripMenuItem})
         Me.OrodjaToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_support_50
         Me.OrodjaToolStripMenuItem.Name = "OrodjaToolStripMenuItem"
-        Me.OrodjaToolStripMenuItem.Size = New System.Drawing.Size(71, 20)
+        Me.OrodjaToolStripMenuItem.Size = New System.Drawing.Size(75, 24)
         Me.OrodjaToolStripMenuItem.Text = "Orodja"
         Me.OrodjaToolStripMenuItem.ToolTipText = "Uvozi točke iz TXT v GSI"
         '
@@ -426,39 +440,59 @@ Partial Class Form1
         Me.PripraviKarticoToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbPripravaFormat, Me.tsbPripravaZav, Me.ToolStripSeparator3, Me.tsbMapaZav})
         Me.PripraviKarticoToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_sd_50
         Me.PripraviKarticoToolStripMenuItem.Name = "PripraviKarticoToolStripMenuItem"
-        Me.PripraviKarticoToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
+        Me.PripraviKarticoToolStripMenuItem.Size = New System.Drawing.Size(184, 26)
         Me.PripraviKarticoToolStripMenuItem.Text = "PC-Kartica"
         Me.PripraviKarticoToolStripMenuItem.ToolTipText = "Pripravi kartico instrumenta za delo..."
         '
         'tsbPripravaFormat
         '
-        Me.tsbPripravaFormat.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_micro_sd_50
+        Me.tsbPripravaFormat.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_sd_import_50
         Me.tsbPripravaFormat.Name = "tsbPripravaFormat"
-        Me.tsbPripravaFormat.Size = New System.Drawing.Size(180, 22)
+        Me.tsbPripravaFormat.Size = New System.Drawing.Size(181, 26)
         Me.tsbPripravaFormat.Text = "Priprava Kartice"
         Me.tsbPripravaFormat.ToolTipText = "Pripravi kartico za delo z instrumentom..."
         '
-        'ToolStripSeparator3
-        '
-        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
-        Me.ToolStripSeparator3.Size = New System.Drawing.Size(177, 6)
-        '
         'tsbPripravaZav
         '
         Me.tsbPripravaZav.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_add_to_collection_50
         Me.tsbPripravaZav.Name = "tsbPripravaZav"
-        Me.tsbPripravaZav.Size = New System.Drawing.Size(180, 22)
+        Me.tsbPripravaZav.Size = New System.Drawing.Size(181, 26)
         Me.tsbPripravaZav.Text = "Zavarovanje Kartive"
         Me.tsbPripravaZav.ToolTipText = "Zavaruj podatke kartice v zavarovanja..."
         '
+        'ToolStripSeparator3
+        '
+        Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
+        Me.ToolStripSeparator3.Size = New System.Drawing.Size(178, 6)
+        '
         'tsbMapaZav
         '
         Me.tsbMapaZav.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_browse_folder_50_2
         Me.tsbMapaZav.Name = "tsbMapaZav"
-        Me.tsbMapaZav.Size = New System.Drawing.Size(180, 22)
+        Me.tsbMapaZav.Size = New System.Drawing.Size(181, 26)
-        Me.tsbMapaZav.Text = "Pokaži Mapo..."
+        Me.tsbMapaZav.Text = "Odpri Zavarovanja"
         Me.tsbMapaZav.ToolTipText = "Odpri mapo z zavarovanji podatkov..."
         '
+        'IzračunToolStripMenuItem
+        '
+        Me.IzračunToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbPodMer, Me.tsbHzCor})
+        Me.IzračunToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.digital_32
+        Me.IzračunToolStripMenuItem.Name = "IzračunToolStripMenuItem"
+        Me.IzračunToolStripMenuItem.Size = New System.Drawing.Size(184, 26)
+        Me.IzračunToolStripMenuItem.Text = "Izračun"
+        '
+        'tsbPodMer
+        '
+        Me.tsbPodMer.Name = "tsbPodMer"
+        Me.tsbPodMer.Size = New System.Drawing.Size(252, 22)
+        Me.tsbPodMer.Text = "Podatki Meritve (Stojišče > Točka)"
+        '
+        'tsbHzCor
+        '
+        Me.tsbHzCor.Name = "tsbHzCor"
+        Me.tsbHzCor.Size = New System.Drawing.Size(252, 22)
+        Me.tsbHzCor.Text = "Popravek Orientacije (HzCor)"
+        '
         'FolderDialogKartica
         '
         Me.FolderDialogKartica.RootFolder = System.Environment.SpecialFolder.MyComputer
@@ -467,21 +501,22 @@ Partial Class Form1
         'ToolStrip2
         '
         Me.ToolStrip2.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
-        Me.ToolStrip2.ImageScalingSize = New System.Drawing.Size(20, 20)
+        Me.ToolStrip2.ImageScalingSize = New System.Drawing.Size(24, 24)
         Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripLabel2, Me.tsbFileName, Me.LabelDatoteka, Me.tsbZacetek, Me.ToolStripSeparator2, Me.tsbSaveAs})
-        Me.ToolStrip2.Location = New System.Drawing.Point(0, 86)
+        Me.ToolStrip2.Location = New System.Drawing.Point(0, 80)
         Me.ToolStrip2.Name = "ToolStrip2"
         Me.ToolStrip2.Padding = New System.Windows.Forms.Padding(5)
-        Me.ToolStrip2.Size = New System.Drawing.Size(1251, 37)
+        Me.ToolStrip2.Size = New System.Drawing.Size(1251, 41)
         Me.ToolStrip2.TabIndex = 4
         Me.ToolStrip2.Text = "ToolStrip2"
         '
         'ToolStripLabel2
         '
+        Me.ToolStripLabel2.Font = New System.Drawing.Font("Segoe UI Semibold", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.ToolStripLabel2.ForeColor = System.Drawing.SystemColors.ControlText
         Me.ToolStripLabel2.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_micro_sd_50
         Me.ToolStripLabel2.Name = "ToolStripLabel2"
-        Me.ToolStripLabel2.Size = New System.Drawing.Size(80, 24)
+        Me.ToolStripLabel2.Size = New System.Drawing.Size(84, 28)
         Me.ToolStripLabel2.Text = "<projekt>"
         Me.ToolStripLabel2.ToolTipText = "Izbran projekt"
         '
@@ -502,7 +537,7 @@ Partial Class Form1
         Me.LabelDatoteka.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_close_window_50
         Me.LabelDatoteka.Name = "LabelDatoteka"
         Me.LabelDatoteka.Padding = New System.Windows.Forms.Padding(0, 0, 5, 0)
-        Me.LabelDatoteka.Size = New System.Drawing.Size(25, 24)
+        Me.LabelDatoteka.Size = New System.Drawing.Size(29, 28)
         Me.LabelDatoteka.ToolTipText = "Ni datoteke"
         '
         'tsbZacetek
@@ -511,14 +546,14 @@ Partial Class Form1
         Me.tsbZacetek.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_caps_lock_on_50
         Me.tsbZacetek.ImageTransparentColor = System.Drawing.Color.Magenta
         Me.tsbZacetek.Name = "tsbZacetek"
-        Me.tsbZacetek.Size = New System.Drawing.Size(90, 24)
+        Me.tsbZacetek.Size = New System.Drawing.Size(94, 28)
         Me.tsbZacetek.Text = "Na Začetek"
         Me.tsbZacetek.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage
         '
         'ToolStripSeparator2
         '
         Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
-        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 27)
+        Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 31)
         '
         'tsbSaveAs
         '
@@ -527,7 +562,7 @@ Partial Class Form1
         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(83, 24)
+        Me.tsbSaveAs.Size = New System.Drawing.Size(87, 28)
         Me.tsbSaveAs.Text = "Shrani ..."
         '
         'Form1
@@ -614,4 +649,8 @@ Partial Class Form1
     Friend WithEvents tsbPripravaZav As ToolStripMenuItem
     Friend WithEvents ToolStripSeparator3 As ToolStripSeparator
     Friend WithEvents tsbMapaZav As ToolStripMenuItem
+    Friend WithEvents IzračunToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents tsbPodMer As ToolStripMenuItem
+    Friend WithEvents tsbHzCor As ToolStripMenuItem
+    Friend WithEvents tsbKartica As ToolStripButton
 End Class

Form1.vb

@@ -1032,11 +1032,6 @@ Public Class Form1
         Application.Exit()
     End Sub
 
-    Private Sub IzračunHzKotaToolStripMenuItem_Click(sender As Object, e As EventArgs)
-        DialogIzracunHzCor.ShowDialog()
-
-    End Sub
-
     Private Sub tsbZacetek_Click(sender As Object, e As EventArgs) Handles tsbZacetek.Click
         RichTextBox1.SelectionStart = 0
     End Sub
@@ -1053,4 +1048,17 @@ Public Class Form1
         Dim mapaZav = My.Application.Info.DirectoryPath.ToString + "\Zavarovanja"
         Process.Start(mapaZav)
     End Sub
+
+    Private Sub tsbPodMer_Click(sender As Object, e As EventArgs) Handles tsbPodMer.Click
+        FormIzracunMeasure.Show()
+    End Sub
+
+    Private Sub tsbKartica_Click(sender As Object, e As EventArgs) Handles tsbKartica.Click
+        DialogKartica.ShowDialog()
+
+    End Sub
+
+    Private Sub tsbHzCor_Click(sender As Object, e As EventArgs) Handles tsbHzCor.Click
+        DialogIzracunHzCor.Show()
+    End Sub
 End Class

Form2.Designer.vb

@@ -58,23 +58,25 @@ Partial Class Form2
         Me.SkripteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.IzračunMeritveStMerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
         Me.IzračunOrientacijeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.MyApplicationBindingSource2 = 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.MenuStrip1.SuspendLayout()
+        CType(Me.MyApplicationBindingSource2, System.ComponentModel.ISupportInitialize).BeginInit()
         Me.SuspendLayout()
         '
         'RichTextBoxEdit
         '
         Me.RichTextBoxEdit.BackColor = System.Drawing.Color.Ivory
-        Me.RichTextBoxEdit.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.RichTextBoxEdit.BorderStyle = System.Windows.Forms.BorderStyle.None
         Me.RichTextBoxEdit.DetectUrls = False
         Me.RichTextBoxEdit.EnableAutoDragDrop = True
         Me.RichTextBoxEdit.Font = New System.Drawing.Font("Courier New", 11.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.RichTextBoxEdit.Location = New System.Drawing.Point(12, 67)
+        Me.RichTextBoxEdit.Location = New System.Drawing.Point(12, 68)
         Me.RichTextBoxEdit.Name = "RichTextBoxEdit"
-        Me.RichTextBoxEdit.Size = New System.Drawing.Size(1160, 549)
+        Me.RichTextBoxEdit.Size = New System.Drawing.Size(1160, 548)
         Me.RichTextBoxEdit.TabIndex = 2
         Me.RichTextBoxEdit.Text = ""
         Me.RichTextBoxEdit.WordWrap = False
@@ -119,9 +121,10 @@ Partial Class Form2
         '
         'ToolStripLabel1
         '
+        Me.ToolStripLabel1.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_scroll_50
         Me.ToolStripLabel1.Name = "ToolStripLabel1"
-        Me.ToolStripLabel1.Size = New System.Drawing.Size(37, 32)
+        Me.ToolStripLabel1.Size = New System.Drawing.Size(54, 32)
-        Me.ToolStripLabel1.Text = "Koda:"
+        Me.ToolStripLabel1.Text = "Koda"
         '
         'ComBoxKoda
         '
@@ -333,15 +336,19 @@ Partial Class Form2
         Me.IzračunOrientacijeToolStripMenuItem.Size = New System.Drawing.Size(261, 22)
         Me.IzračunOrientacijeToolStripMenuItem.Text = "Preračun Hz Orientacije (HzCor)"
         '
+        'MyApplicationBindingSource2
+        '
+        Me.MyApplicationBindingSource2.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, 641)
+        Me.Controls.Add(Me.RichTextBoxEdit)
         Me.Controls.Add(Me.StatusStrip1)
         Me.Controls.Add(Me.ToolStrip1)
         Me.Controls.Add(Me.MenuStrip1)
-        Me.Controls.Add(Me.RichTextBoxEdit)
         Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
         Me.MainMenuStrip = Me.MenuStrip1
         Me.Name = "Form2"
@@ -355,6 +362,7 @@ Partial Class Form2
         CType(Me.MyApplicationBindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
         Me.MenuStrip1.ResumeLayout(False)
         Me.MenuStrip1.PerformLayout()
+        CType(Me.MyApplicationBindingSource2, System.ComponentModel.ISupportInitialize).EndInit()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
@@ -394,4 +402,5 @@ Partial Class Form2
     Friend WithEvents SkripteToolStripMenuItem As ToolStripMenuItem
     Friend WithEvents IzračunMeritveStMerToolStripMenuItem As ToolStripMenuItem
     Friend WithEvents IzračunOrientacijeToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents MyApplicationBindingSource2 As BindingSource
 End Class

Form2.resx

@@ -135,6 +135,9 @@
   <metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>914, 17</value>
   </metadata>
+  <metadata name="MyApplicationBindingSource2.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>1029, 17</value>
+  </metadata>
   <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
   <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>

FormGrafika.vb

@@ -12,6 +12,7 @@ Public Class FormGrafika
     Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
         GrafikaIzris()
         Form1.tsbSaveAs.Enabled = False
+        Form1.ShraniToolStripMenuItem.Enabled = False
     End Sub
 
     ' Gumb: Zapri

FormGsiJobs.Designer.vb

@@ -24,14 +24,9 @@ Partial Class FormGsiJobs
     Private Sub InitializeComponent()
         Me.components = New System.ComponentModel.Container()
         Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FormGsiJobs))
-        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
         Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
         Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton()
-        Me.ToolStripButton4 = 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.TSButtonUvozi = New System.Windows.Forms.ToolStripButton()
         Me.TSButonNalozi = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
         Me.Label1 = New System.Windows.Forms.Label()
@@ -50,44 +45,45 @@ Partial Class FormGsiJobs
         Me.ButtonDelovni = New System.Windows.Forms.Button()
         Me.Label12 = New System.Windows.Forms.Label()
         Me.LabelJobIme = New System.Windows.Forms.Label()
-        Me.ButtonNalJob2 = New System.Windows.Forms.Button()
-        Me.Label8 = New System.Windows.Forms.Label()
         Me.ListViewProj = New System.Windows.Forms.ListView()
         Me.ProjektImeHeader = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
+        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
         Me.ListView2 = New System.Windows.Forms.ListView()
         Me.JobImeHeader = CType(New System.Windows.Forms.ColumnHeader(), System.Windows.Forms.ColumnHeader)
         Me.OpenFileDialogUvoziJob = New System.Windows.Forms.OpenFileDialog()
         Me.TextBoxJobDat = New System.Windows.Forms.TextBox()
-        Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
         Me.ToolStrip2 = New System.Windows.Forms.ToolStrip()
         Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
         Me.ToolStrip3 = New System.Windows.Forms.ToolStrip()
         Me.ToolStripButton6 = New System.Windows.Forms.ToolStripButton()
         Me.ToolStripButton7 = New System.Windows.Forms.ToolStripButton()
-        Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
+        Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
+        Me.ProjektiToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.NovProjektToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.UvoziProjekteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
+        Me.OdpriMapoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator()
+        Me.ToolStripButton8 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripButton9 = New System.Windows.Forms.ToolStripButton()
+        Me.ToolStripSeparator6 = New System.Windows.Forms.ToolStripSeparator()
         Me.ToolStrip1.SuspendLayout()
         Me.TableLayoutPanel1.SuspendLayout()
-        Me.TableLayoutPanel2.SuspendLayout()
         Me.ToolStrip2.SuspendLayout()
         Me.ToolStrip3.SuspendLayout()
+        Me.MenuStrip1.SuspendLayout()
         Me.SuspendLayout()
         '
-        'StatusStrip1
-        '
-        Me.StatusStrip1.Location = New System.Drawing.Point(0, 419)
-        Me.StatusStrip1.Name = "StatusStrip1"
-        Me.StatusStrip1.Size = New System.Drawing.Size(704, 22)
-        Me.StatusStrip1.SizingGrip = False
-        Me.StatusStrip1.TabIndex = 1
-        Me.StatusStrip1.Text = "StatusStrip1"
-        '
         'ToolStrip1
         '
         Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
         Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(24, 24)
-        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton5, Me.ToolStripButton4, Me.ToolStripSeparator3, Me.ToolStripButton3, Me.ToolStripSeparator1, Me.TSButtonUvozi, Me.TSButonNalozi, Me.ToolStripSeparator2})
+        Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton5, Me.ToolStripSeparator3, Me.TSButonNalozi, Me.ToolStripSeparator2})
-        Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.ToolStrip1.Location = New System.Drawing.Point(0, 24)
         Me.ToolStrip1.Name = "ToolStrip1"
         Me.ToolStrip1.Padding = New System.Windows.Forms.Padding(5)
         Me.ToolStrip1.Size = New System.Drawing.Size(704, 56)
@@ -100,48 +96,15 @@ Partial Class FormGsiJobs
         Me.ToolStripButton5.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_caps_lock_on_501
         Me.ToolStripButton5.ImageTransparentColor = System.Drawing.Color.Magenta
         Me.ToolStripButton5.Name = "ToolStripButton5"
-        Me.ToolStripButton5.Size = New System.Drawing.Size(91, 43)
+        Me.ToolStripButton5.Size = New System.Drawing.Size(93, 43)
-        Me.ToolStripButton5.Text = "Delovni Projekt"
+        Me.ToolStripButton5.Text = "Nastavi Delovni"
         Me.ToolStripButton5.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
         '
-        'ToolStripButton4
-        '
-        Me.ToolStripButton4.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_folder_tree_50
-        Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.ToolStripButton4.Name = "ToolStripButton4"
-        Me.ToolStripButton4.Size = New System.Drawing.Size(73, 43)
-        Me.ToolStripButton4.Text = "Nov Projekt"
-        Me.ToolStripButton4.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
-        '
         'ToolStripSeparator3
         '
         Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
         Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 46)
         '
-        'ToolStripButton3
-        '
-        Me.ToolStripButton3.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_opened_folder_50
-        Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.ToolStripButton3.Name = "ToolStripButton3"
-        Me.ToolStripButton3.Size = New System.Drawing.Size(75, 43)
-        Me.ToolStripButton3.Text = "Odpri Mapo"
-        Me.ToolStripButton3.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
-        '
-        'ToolStripSeparator1
-        '
-        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
-        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 46)
-        '
-        'TSButtonUvozi
-        '
-        Me.TSButtonUvozi.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_move_to_folder_50
-        Me.TSButtonUvozi.ImageTransparentColor = System.Drawing.Color.Magenta
-        Me.TSButtonUvozi.Name = "TSButtonUvozi"
-        Me.TSButtonUvozi.Size = New System.Drawing.Size(61, 43)
-        Me.TSButtonUvozi.Text = "Uvozi Job"
-        Me.TSButtonUvozi.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageAboveText
-        Me.TSButtonUvozi.ToolTipText = "Uvozi Job v delovni projekt..."
-        '
         'TSButonNalozi
         '
         Me.TSButonNalozi.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_send_file_50
@@ -159,9 +122,9 @@ Partial Class FormGsiJobs
         'Label1
         '
         Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label1.Location = New System.Drawing.Point(9, 56)
+        Me.Label1.Location = New System.Drawing.Point(12, 80)
         Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(164, 26)
+        Me.Label1.Size = New System.Drawing.Size(161, 26)
         Me.Label1.TabIndex = 8
         Me.Label1.Text = "Projekt"
         Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -169,7 +132,7 @@ Partial Class FormGsiJobs
         'Label2
         '
         Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label2.Location = New System.Drawing.Point(179, 56)
+        Me.Label2.Location = New System.Drawing.Point(179, 80)
         Me.Label2.Name = "Label2"
         Me.Label2.Size = New System.Drawing.Size(160, 26)
         Me.Label2.TabIndex = 9
@@ -179,7 +142,7 @@ Partial Class FormGsiJobs
         'Label3
         '
         Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label3.Location = New System.Drawing.Point(345, 56)
+        Me.Label3.Location = New System.Drawing.Point(345, 80)
         Me.Label3.Name = "Label3"
         Me.Label3.Size = New System.Drawing.Size(347, 26)
         Me.Label3.TabIndex = 10
@@ -206,7 +169,7 @@ Partial Class FormGsiJobs
         Me.TableLayoutPanel1.Controls.Add(Me.ButtonDelovni, 0, 2)
         Me.TableLayoutPanel1.Controls.Add(Me.Label12, 1, 2)
         Me.TableLayoutPanel1.Controls.Add(Me.LabelJobIme, 1, 6)
-        Me.TableLayoutPanel1.Location = New System.Drawing.Point(345, 86)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(345, 109)
         Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
         Me.TableLayoutPanel1.RowCount = 7
         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
@@ -216,7 +179,7 @@ Partial Class FormGsiJobs
         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
-        Me.TableLayoutPanel1.Size = New System.Drawing.Size(347, 181)
+        Me.TableLayoutPanel1.Size = New System.Drawing.Size(347, 189)
         Me.TableLayoutPanel1.TabIndex = 11
         '
         'Label4
@@ -304,11 +267,11 @@ Partial Class FormGsiJobs
         '
         Me.LabelIzbProj.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.LabelIzbProj.AutoSize = True
-        Me.LabelIzbProj.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.LabelIzbProj.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.LabelIzbProj.ForeColor = System.Drawing.Color.SteelBlue
+        Me.LabelIzbProj.ForeColor = System.Drawing.Color.DarkOrange
-        Me.LabelIzbProj.Location = New System.Drawing.Point(122, 80)
+        Me.LabelIzbProj.Location = New System.Drawing.Point(122, 79)
         Me.LabelIzbProj.Name = "LabelIzbProj"
-        Me.LabelIzbProj.Size = New System.Drawing.Size(222, 15)
+        Me.LabelIzbProj.Size = New System.Drawing.Size(222, 16)
         Me.LabelIzbProj.TabIndex = 1
         Me.LabelIzbProj.Text = "(izberi projekt)"
         Me.LabelIzbProj.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
@@ -318,7 +281,7 @@ Partial Class FormGsiJobs
         Me.Label10.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Label10.AutoSize = True
         Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label10.Location = New System.Drawing.Point(3, 159)
+        Me.Label10.Location = New System.Drawing.Point(3, 163)
         Me.Label10.Name = "Label10"
         Me.Label10.Size = New System.Drawing.Size(113, 13)
         Me.Label10.TabIndex = 8
@@ -356,47 +319,14 @@ Partial Class FormGsiJobs
         '
         Me.LabelJobIme.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.LabelJobIme.AutoSize = True
-        Me.LabelJobIme.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.LabelJobIme.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.LabelJobIme.ForeColor = System.Drawing.Color.DarkOrange
+        Me.LabelJobIme.ForeColor = System.Drawing.Color.SteelBlue
-        Me.LabelJobIme.Location = New System.Drawing.Point(122, 159)
+        Me.LabelJobIme.Location = New System.Drawing.Point(122, 161)
         Me.LabelJobIme.Name = "LabelJobIme"
-        Me.LabelJobIme.Size = New System.Drawing.Size(222, 13)
+        Me.LabelJobIme.Size = New System.Drawing.Size(222, 16)
         Me.LabelJobIme.TabIndex = 12
         Me.LabelJobIme.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
         '
-        'ButtonNalJob2
-        '
-        Me.ButtonNalJob2.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.ButtonNalJob2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.None
-        Me.ButtonNalJob2.Enabled = False
-        Me.ButtonNalJob2.FlatAppearance.BorderSize = 0
-        Me.ButtonNalJob2.FlatAppearance.MouseOverBackColor = System.Drawing.SystemColors.ActiveCaption
-        Me.ButtonNalJob2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.ButtonNalJob2.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_send_file_50
-        Me.ButtonNalJob2.Location = New System.Drawing.Point(0, 67)
-        Me.ButtonNalJob2.Margin = New System.Windows.Forms.Padding(0)
-        Me.ButtonNalJob2.Name = "ButtonNalJob2"
-        Me.ButtonNalJob2.Padding = New System.Windows.Forms.Padding(3)
-        Me.ButtonNalJob2.Size = New System.Drawing.Size(347, 59)
-        Me.ButtonNalJob2.TabIndex = 14
-        Me.ButtonNalJob2.Text = "Naloži Job"
-        Me.ButtonNalJob2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.ButtonNalJob2.TextImageRelation = System.Windows.Forms.TextImageRelation.ImageBeforeText
-        Me.ButtonNalJob2.UseVisualStyleBackColor = True
-        '
-        'Label8
-        '
-        Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Left Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Label8.AutoSize = True
-        Me.Label8.ForeColor = System.Drawing.SystemColors.ControlDarkDark
-        Me.Label8.Location = New System.Drawing.Point(3, 31)
-        Me.Label8.Margin = New System.Windows.Forms.Padding(3)
-        Me.Label8.Name = "Label8"
-        Me.Label8.Size = New System.Drawing.Size(341, 13)
-        Me.Label8.TabIndex = 15
-        Me.Label8.Text = "Naloži izbran Job za obdelavo"
-        Me.Label8.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
-        '
         'ListViewProj
         '
         Me.ListViewProj.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
@@ -406,19 +336,30 @@ Partial Class FormGsiJobs
         Me.ListViewProj.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.None
         Me.ListViewProj.HideSelection = False
         Me.ListViewProj.LabelWrap = False
-        Me.ListViewProj.Location = New System.Drawing.Point(13, 86)
+        Me.ListViewProj.Location = New System.Drawing.Point(13, 109)
         Me.ListViewProj.MultiSelect = False
         Me.ListViewProj.Name = "ListViewProj"
-        Me.ListViewProj.Size = New System.Drawing.Size(160, 290)
+        Me.ListViewProj.Size = New System.Drawing.Size(160, 285)
+        Me.ListViewProj.SmallImageList = Me.ImageList1
         Me.ListViewProj.TabIndex = 12
         Me.ListViewProj.UseCompatibleStateImageBehavior = False
-        Me.ListViewProj.View = System.Windows.Forms.View.Details
+        Me.ListViewProj.View = System.Windows.Forms.View.List
         '
         'ProjektImeHeader
         '
         Me.ProjektImeHeader.Text = "Projekt Ime"
         Me.ProjektImeHeader.Width = 140
         '
+        'ImageList1
+        '
+        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
+        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
+        Me.ImageList1.Images.SetKeyName(0, "icons8-file-GSI-50.png")
+        Me.ImageList1.Images.SetKeyName(1, "icons8-program-50.png")
+        Me.ImageList1.Images.SetKeyName(2, "icons8-sd-50.png")
+        Me.ImageList1.Images.SetKeyName(3, "icons8-product-documents-50.png")
+        Me.ImageList1.Images.SetKeyName(4, "icons8-documents-folder-50.png")
+        '
         'ListView2
         '
         Me.ListView2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
@@ -428,10 +369,11 @@ Partial Class FormGsiJobs
         Me.ListView2.HeaderStyle = System.Windows.Forms.ColumnHeaderStyle.None
         Me.ListView2.HideSelection = False
         Me.ListView2.LargeImageList = Me.ImageList1
-        Me.ListView2.Location = New System.Drawing.Point(179, 85)
+        Me.ListView2.Location = New System.Drawing.Point(179, 109)
         Me.ListView2.MultiSelect = False
         Me.ListView2.Name = "ListView2"
-        Me.ListView2.Size = New System.Drawing.Size(160, 290)
+        Me.ListView2.Size = New System.Drawing.Size(160, 285)
+        Me.ListView2.SmallImageList = Me.ImageList1
         Me.ListView2.TabIndex = 13
         Me.ListView2.UseCompatibleStateImageBehavior = False
         Me.ListView2.View = System.Windows.Forms.View.List
@@ -453,38 +395,22 @@ Partial Class FormGsiJobs
         Me.TextBoxJobDat.BackColor = System.Drawing.SystemColors.Control
         Me.TextBoxJobDat.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.TextBoxJobDat.Cursor = System.Windows.Forms.Cursors.IBeam
-        Me.TextBoxJobDat.Location = New System.Drawing.Point(10, 5)
+        Me.TextBoxJobDat.Location = New System.Drawing.Point(352, 306)
         Me.TextBoxJobDat.Margin = New System.Windows.Forms.Padding(10, 5, 10, 0)
         Me.TextBoxJobDat.Name = "TextBoxJobDat"
         Me.TextBoxJobDat.ReadOnly = True
-        Me.TextBoxJobDat.Size = New System.Drawing.Size(327, 20)
+        Me.TextBoxJobDat.Size = New System.Drawing.Size(333, 20)
         Me.TextBoxJobDat.TabIndex = 16
         Me.TextBoxJobDat.WordWrap = False
         '
-        'TableLayoutPanel2
-        '
-        Me.TableLayoutPanel2.ColumnCount = 1
-        Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
-        Me.TableLayoutPanel2.Controls.Add(Me.Label8, 0, 1)
-        Me.TableLayoutPanel2.Controls.Add(Me.ButtonNalJob2, 0, 2)
-        Me.TableLayoutPanel2.Controls.Add(Me.TextBoxJobDat, 0, 0)
-        Me.TableLayoutPanel2.Location = New System.Drawing.Point(345, 273)
-        Me.TableLayoutPanel2.Name = "TableLayoutPanel2"
-        Me.TableLayoutPanel2.RowCount = 3
-        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
-        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 25.0!))
-        Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle())
-        Me.TableLayoutPanel2.Size = New System.Drawing.Size(347, 143)
-        Me.TableLayoutPanel2.TabIndex = 14
-        '
         'ToolStrip2
         '
         Me.ToolStrip2.AutoSize = False
         Me.ToolStrip2.Dock = System.Windows.Forms.DockStyle.None
         Me.ToolStrip2.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
         Me.ToolStrip2.ImageScalingSize = New System.Drawing.Size(24, 24)
-        Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton2, Me.ToolStripButton1})
+        Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton3, Me.ToolStripSeparator1, Me.ToolStripButton1, Me.ToolStripButton2, Me.ToolStripSeparator6, Me.ToolStripButton9})
-        Me.ToolStrip2.Location = New System.Drawing.Point(13, 381)
+        Me.ToolStrip2.Location = New System.Drawing.Point(13, 397)
         Me.ToolStrip2.Name = "ToolStrip2"
         Me.ToolStrip2.RenderMode = System.Windows.Forms.ToolStripRenderMode.Professional
         Me.ToolStrip2.Size = New System.Drawing.Size(160, 35)
@@ -519,11 +445,11 @@ Partial Class FormGsiJobs
         Me.ToolStrip3.Dock = System.Windows.Forms.DockStyle.None
         Me.ToolStrip3.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
         Me.ToolStrip3.ImageScalingSize = New System.Drawing.Size(24, 24)
-        Me.ToolStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton6, Me.ToolStripButton7})
+        Me.ToolStrip3.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripButton4, Me.ToolStripSeparator5, Me.ToolStripButton7, Me.ToolStripButton6, Me.ToolStripButton8})
-        Me.ToolStrip3.Location = New System.Drawing.Point(179, 381)
+        Me.ToolStrip3.Location = New System.Drawing.Point(179, 397)
         Me.ToolStrip3.Name = "ToolStrip3"
         Me.ToolStrip3.RenderMode = System.Windows.Forms.ToolStripRenderMode.Professional
-        Me.ToolStrip3.Size = New System.Drawing.Size(160, 38)
+        Me.ToolStrip3.Size = New System.Drawing.Size(160, 35)
         Me.ToolStrip3.TabIndex = 15
         Me.ToolStrip3.Text = "ToolStrip2"
         '
@@ -549,20 +475,114 @@ Partial Class FormGsiJobs
         Me.ToolStripButton7.Text = "ToolStripButton1"
         Me.ToolStripButton7.ToolTipText = "Arhiviraj Job"
         '
-        'ImageList1
+        'MenuStrip1
         '
-        Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
+        Me.MenuStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
-        Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
+        Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ProjektiToolStripMenuItem})
-        Me.ImageList1.Images.SetKeyName(0, "icons8-file-GSI-50.png")
+        Me.MenuStrip1.Location = New System.Drawing.Point(0, 0)
+        Me.MenuStrip1.Name = "MenuStrip1"
+        Me.MenuStrip1.Size = New System.Drawing.Size(704, 24)
+        Me.MenuStrip1.TabIndex = 16
+        Me.MenuStrip1.Text = "MenuStrip1"
+        '
+        'ProjektiToolStripMenuItem
+        '
+        Me.ProjektiToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NovProjektToolStripMenuItem, Me.UvoziProjekteToolStripMenuItem, Me.ToolStripSeparator4, Me.OdpriMapoToolStripMenuItem})
+        Me.ProjektiToolStripMenuItem.Name = "ProjektiToolStripMenuItem"
+        Me.ProjektiToolStripMenuItem.Size = New System.Drawing.Size(56, 20)
+        Me.ProjektiToolStripMenuItem.Text = "Projekt"
+        '
+        'NovProjektToolStripMenuItem
+        '
+        Me.NovProjektToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_folder_tree_50
+        Me.NovProjektToolStripMenuItem.Name = "NovProjektToolStripMenuItem"
+        Me.NovProjektToolStripMenuItem.Size = New System.Drawing.Size(184, 26)
+        Me.NovProjektToolStripMenuItem.Text = "Nov/Dodaj..."
+        Me.NovProjektToolStripMenuItem.ToolTipText = "Ustvari nov projekt..."
+        '
+        'UvoziProjekteToolStripMenuItem
+        '
+        Me.UvoziProjekteToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_tree_structure_50
+        Me.UvoziProjekteToolStripMenuItem.Name = "UvoziProjekteToolStripMenuItem"
+        Me.UvoziProjekteToolStripMenuItem.Size = New System.Drawing.Size(184, 26)
+        Me.UvoziProjekteToolStripMenuItem.Text = "Uvozi Mape"
+        Me.UvoziProjekteToolStripMenuItem.ToolTipText = "Uvozi mape projektov..."
+        '
+        'ToolStripSeparator4
+        '
+        Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
+        Me.ToolStripSeparator4.Size = New System.Drawing.Size(153, 6)
+        '
+        'OdpriMapoToolStripMenuItem
+        '
+        Me.OdpriMapoToolStripMenuItem.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_opened_folder_50
+        Me.OdpriMapoToolStripMenuItem.Name = "OdpriMapoToolStripMenuItem"
+        Me.OdpriMapoToolStripMenuItem.Size = New System.Drawing.Size(184, 26)
+        Me.OdpriMapoToolStripMenuItem.Text = "Odpri Mapo..."
+        Me.OdpriMapoToolStripMenuItem.ToolTipText = "Odpri mapo z projekti..."
+        '
+        'ToolStripButton3
+        '
+        Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton3.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_add_folder_50
+        Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton3.Name = "ToolStripButton3"
+        Me.ToolStripButton3.Size = New System.Drawing.Size(28, 32)
+        Me.ToolStripButton3.Text = "Nov/Dodaj"
+        Me.ToolStripButton3.ToolTipText = "Nov/Dodaj"
+        '
+        'ToolStripSeparator1
+        '
+        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
+        Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 35)
+        '
+        'ToolStripButton4
+        '
+        Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton4.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_move_to_folder_50
+        Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton4.Name = "ToolStripButton4"
+        Me.ToolStripButton4.Size = New System.Drawing.Size(28, 32)
+        Me.ToolStripButton4.Text = "Uvozi Job"
+        Me.ToolStripButton4.ToolTipText = "Uvozi Job"
+        '
+        'ToolStripSeparator5
+        '
+        Me.ToolStripSeparator5.Name = "ToolStripSeparator5"
+        Me.ToolStripSeparator5.Size = New System.Drawing.Size(6, 35)
+        '
+        'ToolStripButton8
+        '
+        Me.ToolStripButton8.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.ToolStripButton8.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton8.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_send_file_50
+        Me.ToolStripButton8.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton8.Name = "ToolStripButton8"
+        Me.ToolStripButton8.Size = New System.Drawing.Size(28, 32)
+        Me.ToolStripButton8.Text = "Naloži Job"
+        '
+        'ToolStripButton9
+        '
+        Me.ToolStripButton9.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
+        Me.ToolStripButton9.Image = Global.TPS1100_Convert.My.Resources.Resources.icons8_caps_lock_on_50
+        Me.ToolStripButton9.ImageTransparentColor = System.Drawing.Color.Magenta
+        Me.ToolStripButton9.Name = "ToolStripButton9"
+        Me.ToolStripButton9.Size = New System.Drawing.Size(28, 32)
+        Me.ToolStripButton9.Text = "Nastavi kot delovni"
+        '
+        'ToolStripSeparator6
+        '
+        Me.ToolStripSeparator6.Name = "ToolStripSeparator6"
+        Me.ToolStripSeparator6.Size = New System.Drawing.Size(6, 35)
         '
         'FormGsiJobs
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
         Me.ClientSize = New System.Drawing.Size(704, 441)
+        Me.Controls.Add(Me.TextBoxJobDat)
         Me.Controls.Add(Me.ToolStrip3)
         Me.Controls.Add(Me.ToolStrip2)
-        Me.Controls.Add(Me.TableLayoutPanel2)
         Me.Controls.Add(Me.ListView2)
         Me.Controls.Add(Me.ListViewProj)
         Me.Controls.Add(Me.TableLayoutPanel1)
@@ -570,8 +590,9 @@ Partial Class FormGsiJobs
         Me.Controls.Add(Me.Label2)
         Me.Controls.Add(Me.Label1)
         Me.Controls.Add(Me.ToolStrip1)
-        Me.Controls.Add(Me.StatusStrip1)
+        Me.Controls.Add(Me.MenuStrip1)
         Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+        Me.MainMenuStrip = Me.MenuStrip1
         Me.MaximizeBox = False
         Me.MinimizeBox = False
         Me.MinimumSize = New System.Drawing.Size(720, 480)
@@ -583,26 +604,22 @@ Partial Class FormGsiJobs
         Me.ToolStrip1.PerformLayout()
         Me.TableLayoutPanel1.ResumeLayout(False)
         Me.TableLayoutPanel1.PerformLayout()
-        Me.TableLayoutPanel2.ResumeLayout(False)
-        Me.TableLayoutPanel2.PerformLayout()
         Me.ToolStrip2.ResumeLayout(False)
         Me.ToolStrip2.PerformLayout()
         Me.ToolStrip3.ResumeLayout(False)
         Me.ToolStrip3.PerformLayout()
+        Me.MenuStrip1.ResumeLayout(False)
+        Me.MenuStrip1.PerformLayout()
         Me.ResumeLayout(False)
         Me.PerformLayout()
 
     End Sub
-    Friend WithEvents StatusStrip1 As StatusStrip
     Friend WithEvents ToolStrip1 As ToolStrip
     Friend WithEvents TSButonNalozi As ToolStripButton
-    Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
-    Friend WithEvents TSButtonUvozi As ToolStripButton
     Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
     Friend WithEvents Label1 As Label
     Friend WithEvents Label2 As Label
     Friend WithEvents Label3 As Label
-    Friend WithEvents ToolStripButton4 As ToolStripButton
     Friend WithEvents TableLayoutPanel1 As TableLayoutPanel
     Friend WithEvents Label4 As Label
     Friend WithEvents LabelIzbProj As Label
@@ -613,7 +630,6 @@ Partial Class FormGsiJobs
     Friend WithEvents LabelDeloProj As Label
     Friend WithEvents LabelDeloMapa As Label
     Friend WithEvents Label10 As Label
-    Friend WithEvents ToolStripButton3 As ToolStripButton
     Friend WithEvents ButtonDelovni As Button
     Friend WithEvents Label12 As Label
     Friend WithEvents ListViewProj As ListView
@@ -624,10 +640,7 @@ Partial Class FormGsiJobs
     Friend WithEvents JobImeHeader As ColumnHeader
     Friend WithEvents OpenFileDialogUvoziJob As OpenFileDialog
     Friend WithEvents LabelJobIme As Label
-    Friend WithEvents ButtonNalJob2 As Button
-    Friend WithEvents Label8 As Label
     Friend WithEvents TextBoxJobDat As TextBox
-    Friend WithEvents TableLayoutPanel2 As TableLayoutPanel
     Friend WithEvents ToolStrip2 As ToolStrip
     Friend WithEvents ToolStripButton2 As ToolStripButton
     Friend WithEvents ToolStripButton1 As ToolStripButton
@@ -635,4 +648,17 @@ Partial Class FormGsiJobs
     Friend WithEvents ToolStripButton6 As ToolStripButton
     Friend WithEvents ToolStripButton7 As ToolStripButton
     Friend WithEvents ImageList1 As ImageList
+    Friend WithEvents MenuStrip1 As MenuStrip
+    Friend WithEvents ProjektiToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents NovProjektToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents UvoziProjekteToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents OdpriMapoToolStripMenuItem As ToolStripMenuItem
+    Friend WithEvents ToolStripSeparator4 As ToolStripSeparator
+    Friend WithEvents ToolStripButton3 As ToolStripButton
+    Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
+    Friend WithEvents ToolStripButton4 As ToolStripButton
+    Friend WithEvents ToolStripSeparator5 As ToolStripSeparator
+    Friend WithEvents ToolStripButton9 As ToolStripButton
+    Friend WithEvents ToolStripButton8 As ToolStripButton
+    Friend WithEvents ToolStripSeparator6 As ToolStripSeparator
 End Class

FormGsiJobs.resx

@@ -117,9 +117,6 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
-  <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>128, 17</value>
-  </metadata>
   <metadata name="ToolStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>244, 17</value>
   </metadata>
@@ -130,42 +127,157 @@
     <value>
         AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
         LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
-        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAD8
+        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAAD+
-        BwAAAk1TRnQBSQFMAwEBAAEIAQABCAEAARABAAEQAQAE/wEJAQAI/wFCAU0BNgEEBgABNgEEAgABKAMA
+        IgAAAk1TRnQBSQFMAgEBBQEAAUABAAFAAQABFAEAARQBAAT/ASEBAAj/AUIBTQE2BwABNgMAASgDAAFQ
-        AUADAAEQAwABAQEAAQgGAAEEGAABgAIAAYADAAKAAQABgAMAAYABAAGAAQACgAIAA8ABAAHAAdwBwAEA
+        AwABKAMAAQEBAAEgBgABMv8A/wCYAAMFAQYDQwF2AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3
-        AfABygGmAQABMwUAATMBAAEzAQABMwEAAjMCAAMWAQADHAEAAyIBAAMpAQADVQEAA00BAANCAQADOQEA
+        AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3AUMCRAF3
-        AYABfAH/AQACUAH/AQABkwEAAdYBAAH/AewBzAEAAcYB1gHvAQAB1gLnAQABkAGpAa0CAAH/ATMDAAFm
+        AzsBY/gAA0YBfQEvAcYB/gH/AS8BxgH+Af8BLwHGAf4B/wEvAcYB/gH/AS8BxgH+Af8BLwHGAf4B/wEv
-        AwABmQMAAcwCAAEzAwACMwIAATMBZgIAATMBmQIAATMBzAIAATMB/wIAAWYDAAFmATMCAAJmAgABZgGZ
+        AcYB/gH/AS8BxgH+Af8BLwHGAf4B/wEvAcYB/gH/AS8BxgH+Af8BLwHGAf4B/wEvAcYB/gH/AS8BxgH+
-        AgABZgHMAgABZgH/AgABmQMAAZkBMwIAAZkBZgIAApkCAAGZAcwCAAGZAf8CAAHMAwABzAEzAgABzAFm
+        Af8BLwHGAf4B/wEvAcYB/gH/AS8BxgH+Af/4AANGAX4BNAHIAf4B/wE0AcgB/gH/ATQByAH+Af8BNAHI
-        AgABzAGZAgACzAIAAcwB/wIAAf8BZgIAAf8BmQIAAf8BzAEAATMB/wIAAf8BAAEzAQABMwEAAWYBAAEz
+        Af4B/wE0AcgB/gH/AXEBxwG7Af8BzgHaAXIB/wHOAdoBcgH/Ac4B2gFyAf8BzgHaAXIB/wHMAdkBdAH/
-        AQABmQEAATMBAAHMAQABMwEAAf8BAAH/ATMCAAMzAQACMwFmAQACMwGZAQACMwHMAQACMwH/AQABMwFm
+        ATgBwwHyAf8BNAHIAf4B/wE0AcgB/gH/ATQByAH+Af8BNAHIAf4B/wE0AcgB/gH/+AADRgF+ATkByQH+
-        AgABMwFmATMBAAEzAmYBAAEzAWYBmQEAATMBZgHMAQABMwFmAf8BAAEzAZkCAAEzAZkBMwEAATMBmQFm
+        Af8BOQHJAf4B/wE5AckB/gH/ATkByQH+Af8BOQHJAf4B/wG3AdUBhQL/AeYBUAL/AeYBUAL/AeYBUAL/
-        AQABMwKZAQABMwGZAcwBAAEzAZkB/wEAATMBzAIAATMBzAEzAQABMwHMAWYBAAEzAcwBmQEAATMCzAEA
+        AeYBUAL/AeYBUAH/AVQBxQHaAf8BOQHJAf4B/wE5AckB/gH/ATkByQH+Af8BOQHJAf4B/wE5AckB/gH/
-        ATMBzAH/AQABMwH/ATMBAAEzAf8BZgEAATMB/wGZAQABMwH/AcwBAAEzAv8BAAFmAwABZgEAATMBAAFm
+        +AADRgF+AT4BywH+Af8BPgHLAf4B/wE+AcsB/gH/AT4BywH+Af8BPgHLAf4B/wG5AdUBhQL/AeYBUAL/
-        AQABZgEAAWYBAAGZAQABZgEAAcwBAAFmAQAB/wEAAWYBMwIAAWYCMwEAAWYBMwFmAQABZgEzAZkBAAFm
+        AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAH/AVgBxgHaAf8BPgHLAf4B/wE+AcsB/gH/AT4BywH+Af8BPgHL
-        ATMBzAEAAWYBMwH/AQACZgIAAmYBMwEAA2YBAAJmAZkBAAJmAcwBAAFmAZkCAAFmAZkBMwEAAWYBmQFm
+        Af4B/wE+AcsB/gH/+AADRgF+AUMBzAH+Af8BQwHMAf4B/wFDAcwB/gH/AUMBzAH+Af8BQwHMAf4B/wG6
-        AQABZgKZAQABZgGZAcwBAAFmAZkB/wEAAWYBzAIAAWYBzAEzAQABZgHMAZkBAAFmAswBAAFmAcwB/wEA
+        AdYBhQL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAH/AVwBxwHaAf8BQwHMAf4B/wFDAcwB/gH/
-        AWYB/wIAAWYB/wEzAQABZgH/AZkBAAFmAf8BzAEAAcwBAAH/AQAB/wEAAcwBAAKZAgABmQEzAZkBAAGZ
+        AUMBzAH+Af8BQwHMAf4B/wFDAcwB/gH/+AADRgF+AUgBzgH+Af8BSAHOAf4B/wFIAc4B/gH/AUgBzgH+
-        AQABmQEAAZkBAAHMAQABmQMAAZkCMwEAAZkBAAFmAQABmQEzAcwBAAGZAQAB/wEAAZkBZgIAAZkBZgEz
+        Af8BSAHOAf4B/wG8AdcBhQL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAH/AWAByQHaAf8BSAHO
-        AQABmQEzAWYBAAGZAWYBmQEAAZkBZgHMAQABmQEzAf8BAAKZATMBAAKZAWYBAAOZAQACmQHMAQACmQH/
+        Af4B/wFIAc4B/gH/AUgBzgH+Af8BSAHOAf4B/wFIAc4B/gH/+AADRgF+AU0BzwL/AU0BzwL/AU0BzwL/
-        AQABmQHMAgABmQHMATMBAAFmAcwBZgEAAZkBzAGZAQABmQLMAQABmQHMAf8BAAGZAf8CAAGZAf8BMwEA
+        AU0BzwL/AU0BzwL/Ab4B1wGFAv8B5gFQAv8B5gFQAv8B5gFQAf8B6QGtAT8B/wHcAZABMgH/AVYBxgHm
-        AZkBzAFmAQABmQH/AZkBAAGZAf8BzAEAAZkC/wEAAcwDAAGZAQABMwEAAcwBAAFmAQABzAEAAZkBAAHM
+        Af8BTQHPAv8BTQHPAv8BTQHPAv8BTQHPAv8BTQHPAv/4AANGAX4BUgHRAv8BUgHRAv8BUgHRAv8BUgHR
-        AQABzAEAAZkBMwIAAcwCMwEAAcwBMwFmAQABzAEzAZkBAAHMATMBzAEAAcwBMwH/AQABzAFmAgABzAFm
+        Av8BUgHRAv8BvwHXAYUC/wHmAVAC/wHmAVAC/wHmAVAB/wHUAX4BLQH/AWEBwwHbAf8BUgHRAv8BUgHR
-        ATMBAAGZAmYBAAHMAWYBmQEAAcwBZgHMAQABmQFmAf8BAAHMAZkCAAHMAZkBMwEAAcwBmQFmAQABzAKZ
+        Av8BUgHRAv8BUgHRAv8BUgHRAv8BUgHRAv/4AANGAX4BVwHSAv8BVwHSAv8BVwHSAv8BVwHSAv8BVwHS
-        AQABzAGZAcwBAAHMAZkB/wEAAswCAALMATMBAALMAWYBAALMAZkBAAPMAQACzAH/AQABzAH/AgABzAH/
+        Av8BbQHJAdUB/wHEAdcBgQH/AcQB1wGBAf8BxAHXAYEB/wFlAcQB2wH/AVcB0gL/AVcB0gL/AVcB0gL/
-        ATMBAAGZAf8BZgEAAcwB/wGZAQABzAH/AcwBAAHMAv8BAAHMAQABMwEAAf8BAAFmAQAB/wEAAZkBAAHM
+        AVcB0gL/AVcB0gL/AVcB0gL/AVcB0gL/+AADRgF+AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/
-        ATMCAAH/AjMBAAH/ATMBZgEAAf8BMwGZAQAB/wEzAcwBAAH/ATMB/wEAAf8BZgIAAf8BZgEzAQABzAJm
+        AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/AVwB1AL/
-        AQAB/wFmAZkBAAH/AWYBzAEAAcwBZgH/AQAB/wGZAgAB/wGZATMBAAH/AZkBZgEAAf8CmQEAAf8BmQHM
+        AVwB1AL/AVwB1AL/+AADQgF0AScBowHaAf8BJwGjAdoB/wEnAaMB2gH/AScBowHaAf8BJwGjAdoB/wEn
-        AQAB/wGZAf8BAAH/AcwCAAH/AcwBMwEAAf8BzAFmAQAB/wHMAZkBAAH/AswBAAH/AcwB/wEAAv8BMwEA
+        AaMB2gH/AScBowHaAf8BXQHSAf0B/wFhAdUC/wFhAdUC/wFhAdUC/wFhAdUC/wFhAdUC/wFhAdUC/wFh
-        AcwB/wFmAQAC/wGZAQAC/wHMAQACZgH/AQABZgH/AWYBAAFmAv8BAAH/AmYBAAH/AWYB/wEAAv8BZgEA
+        AdUC/wFhAdUC/wFhAdUC//gAAUACQQFwAQABjQHPAf8BAAGNAc8B/wEAAY0BzwH/AQABjQHPAf8BAAGN
-        ASEBAAGlAQADXwEAA3cBAAOGAQADlgEAA8sBAAOyAQAD1wEAA90BAAPjAQAD6gEAA/EBAAP4AQAB8AH7
+        Ac8B/wEAAY0BzwH/AQABjQHPAf8BAwGQAdAB/wFgAdMB/AH/AWYB1wL/AWYB1wL/AWYB1wL/AWYB1wL/
-        Af8BAAGkAqABAAOAAwAB/wIAAf8DAAL/AQAB/wMAAf8BAAH/AQAC/wIAA/9EAAH/CegB/zUAAeEB/wKz
+        AWYB1wL/AWYB1wL/AWYB1wL/AWYB1wL/+AABQAJBAXABAAGXAdoB/wEAAZcB2gH/AQABlwHaAf8BAAGX
-        Af8CswH/AbkB/wH0NQAB4QHfAegBAgH/AYoB/wKzAf8B9DUAAeEB3wHoAQID/wHoAbMB/wH0NQAB4QHf
+        AdoB/wEAAZcB2gH/AQABlwHaAf8BAAGXAdoB/wEAAZcB2gH/AyABLf8AGQADHwEsAVcBZwFtAdwBVwFm
-        AegB2gHfAf8BswH/AbMB/wH0NQAB4QHfAugB/wGKAv8BswH/AfQ1AAHhAd8B6AECAf8BigH/ArMB/wH0
+        AW4B3QFXAWYBbgHdAVcBZgFuAd0BVwFmAW4B3QFXAWYBbgHdAVoBZQFtAdoDLwFJ/wD/AP8A/wD/AP8A
-        NQAB4Qn/AfQ1AAHhCf8B9DUAAeEF/wHfA7MB9TUAAeEG/wLOAfQ2AAHhBv8BzgH1NwAB4Qb/AfW1AAFC
+        /wBvAAH/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/
-        AU0BPgcAAT4DAAEoAwABQAMAARADAAEBAQABAQUAAYAXAAP/AQAC/wYAAeABAwYAAeABAwYAAeABAwYA
+        AeYBUAL/AeYBUAL/AeYBUAH/A0cBghAAAwUBBgE7AVsBaAF2ATwBXAFpAXcBPAFcAWkBdwE8AVwBaQF3
-        AeABAwYAAeABAwYAAeABAwYAAeABAwYAAeABAwYAAeABAwYAAeABAwYAAeABBwYAAeABDwYAAeABHwYA
+        ATwBXAFpAXcBPAFcAWkBdwE8AVwBaQF3ATwBXAFpAXcBPAFcAWkBdwE8AVwBaQF3ATwBXAFpAXcBPAFc
-        Av8GAAL/BgAL
+        AWkBdwE8AVwBaQF3ATwBXAFpAXcBPAFcAWkBdwE8AVwBaQF3ATYBTAFVAWMUAAFaAlgBugFpAV4BXQHd
+        AWkBXgFdAd0BaQFeAV0B3QFoAl0B3QFoAl0B3QFoAl0B3QFoAV0BWwHdAWgBXQFbAd0BaAFdAVsB3QFo
+        AV0BWwHdAWgCXQHcAyMBMxgAATIBxQH5AfwBMwHIAf4B/wEzAcgB/gH/ATMByAH+Af8BMwHIAf4B/wEz
+        AcgB/gH/ATMByAH+Af8BMwHIAf4B/wEzAcgB/gH/ATMByAH+Af8BMwHIAf4B/wEzAcgB/gH/ATMByAH+
+        Af8BMwHIAf4B/wFGAYcBngGpGAAB/wHmAVAC/wHmAVAB/wFqATkBDQH/AWoBOQENAf8BgwFaARoC/wHm
+        AVAB/wFqATkBDQH/AWoBOQENAf8BagE5AQ0C/wHmAVAB/wFqATkBDQL/AeYBUAH/AlEBUAGfEAABPwFj
+        AXABfQEvAcYB/gH/AS8BxgH+Af8BLwHGAf4B/wEvAcYB/gH/AS8BxgH+Af8BLwHGAf4B/wEvAcYB/gH/
+        AS8BxgH+Af8BLwHGAf4B/wEvAcYB/gH/AS8BxgH+Af8BLwHGAf4B/wEvAcYB/gH/AS8BxgH+Af8BLwHG
+        Af4B/wEvAcYB/gH/AS8BxgH+Af8UAAG0AUwBRAH/AbMBSwFEAf8BsgFKAUMB/wGyAUkBQgH/AbEBSAFB
+        Af8BsAFHAUAB/wGwAUYBPwH/Aa8BRQE+Af8BrgFEAT0B/wGuAUQBPAH/Aa0BQgE7Af8BrQFCATsB/wFR
+        AlABnxgAAT8BywH+Af8BPwHLAf4B/wE/AcsB/gH/AT8BywH+Af8BPwHLAf4B/wE/AcsB/gH/AT8BywH+
+        Af8BPwHLAf4B/wE/AcsB/gH/AT8BywH+Af8BPwHLAf4B/wE/AcsB/gH/AT8BywH+Af8BPwHLAf4B/wFG
+        AbIB2AHfGAAB/wHmAVAB/wH7AeIBTwH/AaUBggEpAv8B5gFQAf8BagE5AQ0C/wHmAVAB/wFqATkBDQL/
+        AeYBUAH/AWoBOQENAv8B5gFQAf8BagE5AQ0C/wHmAVAB/wJRAVABnxAAAUABZAFxAX4BNAHIAf4B/wE0
+        AcgB/gH/ATQByAH+Af8BNAHIAf4B/wE0AcgB/gH/ATQByAH+Af8BNAHIAf4B/wE0AcgB/gH/ATQByAH+
+        Af8BNAHIAf4B/wE0AcgB/gH/ATQByAH+Af8BNAHIAf4B/wE0AcgB/gH/ATQByAH+Af8BNAHIAf4B/wE0
+        AcgB/gH/FAABtQFNAUYB/wG0AUwBRQH/AbMBSwFEAf8BswFKAUMB/wGyAUoBQgH/AbEBSAFBAf8BsQFI
+        AUAB/wGwAUcBPwH/Aa8BRgE/Af8BrwFFAT4B/wGuAUQBPQH/Aa0BQwE8Af8BUQJQAZ8YAAFNAc8C/wFN
+        Ac8C/wFNAc8C/wFNAc8C/wFNAc8C/wFNAc8C/wFWAc0B8QH/AWwBxgHRAf8BTQHPAv8BTQHPAv8BTQHP
+        Av8BTQHPAv8BTQHPAv8BTQHPAv8BUAG0AdkB3xgAAf8B5gFQAf8B+wHiAU8B/wGlAYIBKQL/AeYBUAH/
+        AWoBOQENAv8B5gFQAv8B5gFQAv8B5gFQAf8BagE5AQ0C/wHmAVAB/wFqATkBDQL/AeYBUAH/AlEBUAGf
+        EAABQQFkAXEBfgE5AckB/gH/ATkByQH+Af8BOQHJAf4B/wFDAcAB7AH/Aa4BVQEbAf8BOQHJAf4B/wE5
+        AckB/gH/ATkByQH+Af8BOQHJAf4B/wHBAV8BHgH/AcABXgEdAf8BvwFdARwB/wG9AVwBGgH/AZ8BdAFP
+        Af8BOQHJAf4B/wE5AckB/gH/ATkByQH+Af8UAAG1AU4BRwH/AbUBTQFGAf8BtAFMAUUB/wG0AUwBRAH/
+        AbMBSwFDAf8BsgFKAUMB/wGyAUkBQQH/AbEBSAFBAf8BsAFHAUAB/wGwAUYBPwH/Aa8BRQE+Af8BrgFE
+        AT0B/wFRAlABnxgAAVkB0wL/AVkB0wL/AVkB0wL/AVkB0wL/AVkB0wL/AWsBzgHjAf8B5wGoASMB/wHm
+        AagBIgH/Ad8BqgEtAf8BWQHTAv8BWQHTAv8BWQHTAv8BWQHTAv8BWQHTAv8BWwG4AdkB3xgAAf8B5gFQ
+        Af8B+wHiAU8B/wGlAYIBKQH/AaABeQEmAf8BagE5AQ0C/wHmAVAC/wHmAVAB/wGtAYkBLAH/AeYBygFG
+        Av8B5gFQAf8BagE5AQ0C/wHmAVAB/wJRAVABnxAAAUIBZAFxAX4BPgHLAf4B/wE+AcsB/gH/AT4BywH+
+        Af8BdQGRAY4B/wGtAU8BFAH/AZEBYwFBAf8BPgHLAf4B/wE+AcsB/gH/AT4BywH+Af8BagGnAbQB/wFq
+        AacBswH/AWkBpwGzAf8BaQGmAbIB/wFcAbEByAH/AT4BywH+Af8BPgHLAf4B/wE+AcsB/gH/FAABtwFQ
+        AUgB/wG2AU8BRwH/AbUBTgFHAf8BtQFNAUUB/wG0AUwBRQH/AbMBSwFEAf8BswFKAUMB/wGyAUkBQgH/
+        AbEBSAFBAf8BsQFHAUAB/wGwAUcBPwH/Aa8BRgE+Af8BUQJQAZ8YAAFqAcEB2wHnAXcB0QHiAf8BdwHR
+        AeIB/wF3AdEB4gH/AXsB0AHbAf8B5wGsASYB/wHoAasBJQH/AecBqgEkAf8B5wGqASQB/wGnAb8BjwH/
+        AXcB0QHiAf8BdgHRAeIB/wF2AdEB4gH/AXYB0QHiAf8BXQGTAaYBsBgAAf8B5gFQAf8B+wHiAU8B/wGl
+        AYIBKQL/AeYBUAL/AeYBUAL/AeYBUAH/AdUBuAE+Af8BzQGuATsC/wHmAVAC/wHmAVAB/wFqATkBDQL/
+        AeYBUAH/AlEBUAGfEAABQwFkAXEBfgFDAcwB/gH/AUMBzAH+Af8BQwHMAf4B/wFDAcwB/gH/AXUBigGH
+        Af8BmwFFARIB/wG7AVsBGQH/AUMBzAH+Af8BQwHMAf4B/wFDAcwB/gH/AUMBzAH+Af8BQwHMAf4B/wFD
+        AcwB/gH/AUMBzAH+Af8BQwHMAf4B/wFDAcwB/gH/AUMBzAH+Af8UAAG3AVEBSQH/AbcBUAFJAf8BtgFP
+        AUgB/wG2AU4BRwH/AbUBTQFGAf8BtAFMAUUB/wGzAUsBRAH/AbMBSwFDAf8BsgFJAUIB/wGyAUkBQgH/
+        AbEBSAFAAf8BsAFHAUAB/wFRAlABnxgAAUkBQwE0AVUB6gGwASgB/wHpAa8BKAH/AekBrwEnAf8B6QGu
+        AScB/wHpAa0BJgH/AegBrQEmAf8B6AGsASYB/wHoAawBJQH/AegBqwElAf8B6AGrASQB/wHnAaoBJAH/
+        AecBqgEkAf8B5wGpASMB/xwAAf8B5gFQAf8B+wHiAU8B/wGlAYIBKQL/AeYBUAH/AWoBOQENAv8B5gFQ
+        Af8BagE5AQ0C/wHmAVAB/wG1AZABLwL/AeYBUAH/AWoBOQENAv8B5gFQAf8CUQFQAZ8QAAFEAWUBcQF+
+        AUgBzgH+Af8BSAHOAf4B/wFIAc4B/gH/AUgBzgH+Af8BSQHNAfwB/wG5AWABIwH/Ab0BXAEaAf8BZwGs
+        AbwB/wFIAc4B/gH/AUgBzgH+Af8BSAHOAf4B/wFIAc4B/gH/AUgBzgH+Af8BSAHOAf4B/wFIAc4B/gH/
+        AUgBzgH+Af8BSAHOAf4B/xQAAbgBUgFLAf8BuAFRAUoB/wG3AVEBSQH/AbYBTwFIAf8BtgFPAUcB/wG1
+        AU4BRgH/AbUBTQFGAf8BtAFMAUQB/wGzAUsBRAH/AbIBSgFDAf8BsgFJAUIB/wGxAUgBQQH/AVECUAGf
+        GAABSQFDATQBVQHrAbMBKgH/AeoBsgEqAf8B6gGxASkB/wHlAaoBJgH/AeMBqAEmAf8B4wGoASUB/wHj
+        AacBJQH/AeMBpgElAf8B5gGqASUB/wHpAa0BJgH/AegBrQEmAf8B6AGsASYB/wHoAawBJQH/HAAB/wHm
+        AVAB/wH7AeIBTwH/AaUBggEpAv8B5gFQAf8BagE5AQ0C/wHmAVAB/wFqATkBDQL/AeYBUAH/AWoBOQEN
+        Av8B5gFQAf8BagE5AQ0C/wHmAVAB/wJRAVABnxAAAUYBZQFxAX4BTQHPAv8BTQHPAv8BTQHPAv8BTwHO
+        Af0B/wHAAV4BHQH/Ab8BXgEcAf8BXAHAAeAB/wFNAc8C/wFNAc8C/wFNAc8C/wFNAc8C/wFNAc8C/wFN
+        Ac8C/wFNAc8C/wFNAc8C/wFNAc8C/wFNAc8C/xQAAbkBUwFMAf8BuQFTAUsB/wG4AVIBSgH/AbcBUQFJ
+        Af8BtwFQAUgB/wG2AU8BSAH/AbUBTgFHAf8BtQFNAUYB/wG0AUwBRQH/AbMBSwFEAf8BswFKAUMB/wGy
+        AUoBQgH/AVECUAGfGAABSQFDATQBVQHsAbQBLAH/AesBtAErAf8B6wGzASsB/wG5AXYBFQH/AbEBbAER
+        Af8BsQFsAREB/wGxAWwBEAH/AbEBbAEQAf8BxwGGARoB/wHpAa8BKAH/AekBrwEnAf8B6QGuAScB/wHp
+        Aa4BJwH/HAAB/wHmAVAC/wHmAVAB/wG1AZABLwH/AbUBkAEvAf8BwQGgATUC/wHmAVAB/wG1AZABLwH/
+        AbUBkAEvAf8BtQGQAS8C/wHmAVAB/wG1AZABLwL/AeYBUAH/AlEBUAGfEAABRwFmAXEBfgFSAdEC/wFS
+        AdEC/wFSAdEC/wGPAZQBhwH/AcEBXwEeAf8BcgGwAb4B/wFSAdEC/wFSAdEC/wFSAdEC/wFSAdEC/wFS
+        AdEC/wFSAdEC/wFSAdEC/wFSAdEC/wFSAdEC/wFSAdEC/wFSAdEC/xQAAboBVQFNAf8BugFUAUwB/wG5
+        AVMBTAH/AbgBUgFLAf8BuAFRAUoB/wG3AVABSQH/AbYBTwFIAf8BtgFOAUcB/wG1AU4BRgH/AbQBTQFF
+        Af8BtAFMAUQB/wGzAUsBQwH/AVECUAGfGAABSQFDATQBVQHtAbcBLgH/AewBtwEtAf8B7AG2AS0B/wHN
+        AY4BHgH/AcgBiAEbAf8ByAGHARsB/wHIAYcBGwH/AcgBhwEbAf8BxwGHARsB/wHMAYwBHAH/AeoBsgEq
+        Af8B6gGxASkB/wHqAbABKQH/HAAB/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHm
+        AVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAB/wJRAVABnxAAAUgBZgFxAX4BVwHSAv8BVwHS
+        Av8BVwHSAv8BVwHSAv8BXQHMAfQB/wFXAdIC/wFXAdIC/wFXAdIC/wFXAdIC/wFXAdIC/wFXAdIC/wFX
+        AdIC/wFXAdIC/wFXAdIC/wFXAdIC/wFXAdIC/wFXAdIC/xQAAbsBVgFOAf8BuwFVAU4B/wG6AVQBTQH/
+        AbkBUwFMAf8BuAFSAUsB/wG4AVIBSgH/AbcBUQFJAf8BtwFQAUgB/wG2AU8BRwH/AbUBTgFHAf8BtQFN
+        AUUB/wG0AUwBRQH/AVECUAGfGAABSgFEATQBVQHtAbkBLwH/Ae0BuQEvAf8B7QG4AS4B/wHtAbgBLgH/
+        Ae0BtwEtAf8B7AG2AS0B/wHsAbYBLQH/AewBtQEsAf8B7AG1ASwB/wHrAbQBKwH/AesBswErAf8B6wGz
+        ASsB/wHrAbIBKgH/HAAB/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHm
+        AVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAB/wJRAVABnxAAAUkBZgFxAX4BXAHUAv8BXAHUAv8BXAHU
+        Av8BXAHUAv8BXAHUAv8BXAHUAv8BXAHUAv8BXAHUAv8BXAHUAv8BXAHUAv8BXAHUAv8BXAHUAv8BXAHU
+        Av8BXAHUAv8BXAHUAv8BXAHUAv8BXAHUAv8UAAG8AVgBUAH/AbsBVgFPAf8BuwFWAU4B/wG6AVUBTQH/
+        AboBVAFMAf8BuQFTAUsB/wG4AVIBSwH/AbcBUQFJAf8BtwFQAUkB/wG2AU8BSAH/AbYBTgFHAf8BtQFN
+        AUYB/wFRAlABnxgAAUoBRAE1AVUB7wG8ATEB/wHuAbsBMQH/Ae4BuwEwAf8B7gG6ATAB/wHuAboBMAH/
+        Ae0BuQEvAf8B7QG5AS8B/wHtAbgBLgH/Ae0BtwEuAf8B7AG3AS0B/wHsAbYBLQH/AewBtgEtAf8B7AG1
+        ASwB/xwAAf8B5gFQAv8B5gFQAv8B5gFQAv8B5gFQAv8B5gFQAv8B5gFQAv8B5gFQAv8B5gFQAf8B1QF5
+        AS8B/wHVAXoBLgH/AdQBewEsAf8B0wF8ASoB/xQAAToBVAFgAXQBJwGjAdoB/wEnAaMB2gH/AScBowHa
+        Af8BJwGjAdoB/wEnAaMB2gH/AScBowHaAf8BJwGjAdoB/wFdAdIB/QH/AWEB1QL/AWEB1QL/AWEB1QL/
+        AWEB1QL/AWEB1QL/AWEB1QL/AWEB1QL/AWEB1QL/AWEB1QL/FAABvQFZAVEB/wG3AVUBTgH/AbgBVQFN
+        Af8BuAFVAU0B/wG0AVIBSgH/AbkBUwFMAf8BswFQAUkB/wG1AVEBSQH/AbUBUAFJAf8BsgFOAUcB/wG2
+        AU8BSAH/AbEBTAFFAf8BUQJQAZ8YAAFGAUEBMwFRAe8BvQEyAf8B7wG9ATIB/wHvAb0BMgH/Ae8BvAEx
+        Af8B7gG8ATEB/wHuAbsBMQH/Ae4BugEwAf8B7gG6ATAB/wHuAbkBLwH/Ae0BuQEvAf8B7QG4AS4B/wHt
+        AbgBLgH/Ae0BtwEuAf8cAAH/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/
+        AeYBUAH/AdUBegEuAf8B1AF7ASwB/wHTAXwBKgH/AyEBLxQAATQBTwFbAXABAAGNAc8B/wEAAY0BzwH/
+        AQABjQHPAf8BAAGNAc8B/wEAAY0BzwH/AQABjQHPAf8BAAGNAc8B/wEDAZAB0AH/AWAB0wH8Af8BZgHX
+        Av8BZgHXAv8BZgHXAv8BZgHXAv8BZgHXAv8BZgHXAv8BZgHXAv8BZgHXAv8UAAG5AVgBUAH/ATEBpAHR
+        Af8BbQF5AY0B/wF0AXgBiQH/AQsBwAH+Af8BqQFRAUwB/wELAcAB/gH/AWUBfwGXAf8BhwFjAWsB/wEh
+        Aa4B4gH/Aa8BTQFHAf8BLQGkAdIB/wFRAlABnxwAAeEBmQEYAf8B4QGaARkB/wHhAZoBGQH/AeEBmgEZ
+        Af8B4QGaARkB/wHhAZoBGQH/AeEBmgEZAf8B4QGaARkB/wHhAZkBGQH/AeEBmQEYAf8B4QGZARgB/wHh
+        AZkBGAH/AZABcQE4AakcAAH/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/AeYBUAL/
+        AeYBUAH/AdQBewEsAf8B0wF8ASoB/xwAATQBUQFeAXABAAGXAdoB/wEAAZcB2gH/AQABlwHaAf8BAAGX
+        AdoB/wEAAZcB2gH/AQABlwHaAf8BAAGXAdoB/wEAAZcB2gH/AR8BIwElAS00AAMdASgBsQFWAU8B/wFx
+        AX4BjgH/AXgBfQGLAf8BEgHLAv8BqgFTAU0B/wESAcsC/wFpAYYBmAH/AYoBZgFsAf8BKAG4AeQB/wGv
+        AU4BSAH/ATMBrQHUAf8BUQJQAZ8cAAHfAZcBFgH/Ad8BlwEWAf8B3wGXARYB/wHfAZcBFgH/Ad8BlwEW
+        Af8B3wGXARYB/wHfAZcBFgH/Ad8BlwEWAf8B3wGXARYB/wHfAZcBFgH/Ad8BlwEWAf8B3wGXARYB/wFG
+        AT8BMQFUHAAB/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAC/wHmAVAB/wHT
+        AXwBKgH/AyEBLxwAAR4BIwElASwBGQGRAcQB3AEYAZIBxQHdARgBkgHFAd0BGAGSAcUB3QEYAZIBxQHd
+        ARgBkgHFAd0BGwGQAcIB2gErATgBPgFJPAADMQFNAaYBYQFeAf8BpgFiAV8B/wGAAX0BhgH/AbUBVQFN
+        Af8BggF5AYEB/wGfAWMBYgH/AasBVgFRAf8BhgFyAXgB/wG1AVIBSwH/AYoBbQFyAf8DRwGAHAABaAFR
+        ATkBkwGgAVwBEAH/AaABXAEQAf8BoAFcARAB/wGgAVwBEAH/AaABXAEQAf8BoAFcARAB/wGgAVwBEAH/
+        AaABXAEQAf8BoAFcARAB/wGgAVwBEAH/AaABXAEQAf8gAANHAYEBYgFgAV0BzAFiAWABXQHMAWIBYAFd
+        AcwBYgFgAV0BzAFiAWABXQHMAWIBYAFdAcwBYgFgAV0BzNAABAIBjAFfASsByQGNAWABKgHMAY0BYAEq
+        AcwBjQFgASoBzAGNAWABKgHMAY0BYAEqAcwBjQFgASoBzAGNAWABKgHMAY0BYAEqAcwBjQFgASoBzAFz
+        AVgBNwGg/wD/AJIAAUIBTQE+BwABPgMAASgDAAFQAwABKAMAAQEBAAEBBQAB4AEBFgAD/wEAAv8B8AkA
+        Av8B8AkAAYABAAEQCQABgAEAARAJAAGAAQABEAkAAYABAAEQCQABgAEAARAJAAGAAQABEAkAAYABAAEQ
+        CQABgAEAARAJAAGAAQABEAkAAYABAAEQCQABgAEAARAJAAGAAQABEAkAAYABAAEQCQABgAEfAfAJAAGA
+        AT8B8AkAAv8B8AkAAv8B8AkAAv8B8AkACv8CAAr/AgAB8AEAAXgBAAEBAfABAAF+AQABAwIAAfABAAF4
+        AQABAQHwAQABfgEAAQMCAAHwAQABeAEAAQEB8AEAAX4BAAEDAgAB8AEAAXgBAAEBAfABAAF+AQABAwIA
+        AfABAAF4AQABAQHwAQABfgEAAQMCAAHwAQABeAEAAQEB8AEAAX4BAAEHAgAB8AEAAXgBAAEBAfABAAF+
+        AQABBwIAAfABAAF4AQABAQHwAQABfgEAAQcCAAHwAQABeAEAAQEB8AEAAX4BAAEHAgAB8AEAAXgBAAEB
+        AfABAAF+AQABBwIAAfABAAF4AQABAQHwAQABfgEAAQcCAAHwAQAB+AEAAQEB8AEAAX4BAAEHAgAB8AEA
+        AfgBAAEBAfABAAF/AQABBwIAAfABAwH4AQEB/wHwAQABfwEAAQcCAAHwAQMB+AEDAf8B+AEAAX8BAAEP
+        AgAB8AEPBv8BAAEPAgAK/wIACv8CAAs=
 </value>
   </data>
   <metadata name="OpenFileDialogUvoziJob.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
@@ -177,6 +289,9 @@
   <metadata name="ToolStrip3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>638, 17</value>
   </metadata>
+  <metadata name="MenuStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>744, 17</value>
+  </metadata>
   <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
   <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>

FormGsiJobs.vb

@@ -1,4 +1,7 @@
 Imports System.IO
+Imports System.IO.Compression
+Imports System.Windows.Forms
+
 
 Public Class FormGsiJobs
 
@@ -18,7 +21,6 @@ Public Class FormGsiJobs
 
         ProjektBeriNast()
 
-
     End Sub
 
     Public Sub ProjektBeriNast()
@@ -35,11 +37,17 @@ Public Class FormGsiJobs
                 If (line(0) IsNot "") Then
                     Dim projIme As String = line(0)
                     Dim projMapa As String = line(1)
-
                     ListViewProj.Items.Add(projIme).SubItems.Add(projMapa)
+                    If projIme = "Virtualna Kartica" Then
+                        ListViewProj.Items.Item(i).ImageIndex = 2
+                    Else
+                        ListViewProj.Items.Item(i).ImageIndex = 1
+                    End If
+
                     If projIme = My.Settings.Projekt Then
                         iselected = i
                     End If
+
                     i = i + 1
                 End If
 
@@ -80,6 +88,28 @@ Public Class FormGsiJobs
         End If
     End Sub
 
+    Public Sub UvoziMapeProj()
+        Dim appPath As String = My.Application.Info.DirectoryPath.ToString
+        Dim mapaProjekti As String = "\Projekti"
+        Dim pathProjekti As String = appPath + mapaProjekti
+        Dim mapeSeznam = My.Computer.FileSystem.GetDirectories(pathProjekti)
+        Dim mapa
+        Dim i As Integer = 1
+
+        ListViewProj.Clear()
+        ListViewProj.Items.Add("Virtualna Kartica", 2).SubItems.Add("Virtualna Kartica\GSI")
+
+        For Each mapa In mapeSeznam
+            Dim projIme As String = Path.GetFullPath(mapa).Replace(pathProjekti + "\", "").ToString
+            Dim projMapa As String = "Projekti\" + projIme
+
+            ListViewProj.Items.Add(projIme, 1).SubItems.Add(projMapa)
+
+            i = i + 1
+        Next
+
+    End Sub
+
     Private Sub UvoziGsiJob()
         If OpenFileDialogUvoziJob.ShowDialog = DialogResult.OK Then
             Dim delovnaMapa = My.Application.Info.DirectoryPath.ToString + "\" + My.Settings.ProjektMapa.ToString + "\"
@@ -132,10 +162,13 @@ Public Class FormGsiJobs
         Dim item As ListViewItem
         Dim ime As String = ""
         Dim mapa As String = ""
+        Dim ix As Integer = 0
+
         For Each item In izbran
             ime = item.SubItems(0).Text
             mapa = item.SubItems(1).Text
         Next
+
         LabelIzbProj.Text = ime.ToString
         LabelIzbProjMapa.Text = mapa.ToString
         Dim delovnaMapa = My.Application.Info.DirectoryPath.ToString + "\" + mapa.ToString
@@ -143,9 +176,13 @@ Public Class FormGsiJobs
         projektIzbranMapa = delovnaMapa
         Dim datotekeJobi = My.Computer.FileSystem.GetFiles(delovnaMapa, FileIO.SearchOption.SearchTopLevelOnly, "*.GSI")
         ListView2.Clear()
+        LabelJobIme.Text = ""
+        TextBoxJobDat.Text = ""
         For Each datJob In datotekeJobi
-            ListView2.Items.Add(Path.GetFileName(datJob).ToString).SubItems.Add(Path.GetFullPath(datJob))
+            ListView2.Items.Add(Path.GetFileName(datJob).ToString, 0).SubItems.Add(Path.GetFullPath(datJob))
+            ix = ix + 1
         Next
+
         If ime = "Virtualna Kartica" Then
             ToolStripButton1.Enabled = False
             ToolStripButton2.Enabled = False
@@ -159,6 +196,30 @@ Public Class FormGsiJobs
         End If
     End Sub
 
+    Public Sub ArhivirajProjekt()
+        ' Arhiviraj izbran jprojekt
+        Dim arhivCas = System.DateTime.Now.ToString("yyyyMMdd-HHmm")
+        Dim mapaZav = My.Application.Info.DirectoryPath.ToString + "\Zavarovanja\"
+        Dim arhivZav = mapaZav + "Projekt_" + projektIzbran + "_" + arhivCas + ".zip"
+        Dim msgArhivProj = MsgBox("Arhiviram projekt '" + projektIzbran + "'", vbYesNo + vbExclamation, "Arhiviranje Projekta")
+
+        If msgArhivProj = DialogResult.Yes Then
+            ZipFile.CreateFromDirectory(projektIzbranMapa, arhivZav, CompressionLevel.Optimal, False)
+            MessageBox.Show("Kartica zavarovana v: " + vbCrLf + arhivZav.ToString)
+        End If
+
+    End Sub
+
+    Public Sub OdstraniProjekt()
+        ' Izbriši izbran projekt
+        Dim msgDelProj = MsgBox("Odstranim projekt [" + projektIzbran + "]?", vbYesNo + vbCritical, "Brisanje Projekta")
+        If msgDelProj = DialogResult.Yes Then
+            My.Computer.FileSystem.DeleteDirectory(projektIzbranMapa, FileIO.DeleteDirectoryOption.DeleteAllContents, FileIO.RecycleOption.SendToRecycleBin)
+            UvoziMapeProj()
+            ProjektiShraniNast()
+        End If
+    End Sub
+
     Private Sub ListViewProj_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListViewProj.SelectedIndexChanged
         PreberiJobe()
     End Sub
@@ -184,11 +245,9 @@ Public Class FormGsiJobs
         LabelJobIme.Text = ime.ToString
         TextBoxJobDat.Text = mapa.ToString
         If LabelJobIme.Text = "" Then
-            ButtonNalJob2.Enabled = False
             ToolStripButton6.Enabled = False
             ToolStripButton7.Enabled = False
         Else
-            ButtonNalJob2.Enabled = True
             ToolStripButton6.Enabled = True
             ToolStripButton7.Enabled = True
         End If
@@ -204,21 +263,8 @@ Public Class FormGsiJobs
 
     End Sub
 
-    Private Sub ToolStripButton4_Click(sender As Object, e As EventArgs) Handles ToolStripButton4.Click
+    Private Sub TSButtonUvozi_Click(sender As Object, e As EventArgs)
-        DialogNovProj.ShowDialog()
-
-    End Sub
-
-    Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Handles ToolStripButton3.Click
-        Process.Start(projektIzbranMapa)
-    End Sub
-
-    Private Sub TSButtonUvozi_Click(sender As Object, e As EventArgs) Handles TSButtonUvozi.Click
         UvoziGsiJob()
-    End Sub
-
-    Private Sub TSButonNalozi_Click(sender As Object, e As EventArgs) Handles TSButonNalozi.Click, ButtonNalJob2.Click
-        NaloziJob()
 
     End Sub
 
@@ -227,7 +273,7 @@ Public Class FormGsiJobs
         Dim datIzb = TextBoxJobDat.Text
         Dim datArh = datIzb.Replace(LabelJobIme.Text, "_ARHIV\" + LabelJobIme.Text)
 
-        Dim msgArh = MsgBox("Arhiviram job: " + LabelJobIme.Text, vbOKCancel, "Arhiviranje Job-a...")
+        Dim msgArh = MsgBox("Arhiviram job: " + LabelJobIme.Text, vbOKCancel + vbExclamation, "Arhiviranje Job-a...")
         If msgArh = DialogResult.OK Then
             If My.Computer.FileSystem.FileExists(datIzb) Then
                 My.Computer.FileSystem.MoveFile(datIzb, datArh, True)
@@ -241,7 +287,7 @@ Public Class FormGsiJobs
         ' Izbriši izbran job
         Dim datIzb = TextBoxJobDat.Text
 
-        Dim msgArh = MsgBox("Izbrišem job: " + LabelJobIme.Text, vbOKCancel, "Brisanje Job-a...")
+        Dim msgArh = MsgBox("Izbrišem job: " + LabelJobIme.Text, vbOKCancel + vbCritical, "Brisanje Job-a...")
         If msgArh = DialogResult.OK Then
             If My.Computer.FileSystem.FileExists(datIzb) Then
                 My.Computer.FileSystem.DeleteFile(datIzb, FileIO.UIOption.OnlyErrorDialogs, FileIO.RecycleOption.SendToRecycleBin)
@@ -253,11 +299,50 @@ Public Class FormGsiJobs
 
     Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
         ' Arhiviraj izbran jprojekt
+        ArhivirajProjekt()
 
     End Sub
 
     Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
         ' Izbriši izbran projekt
+        OdstraniProjekt()
+    End Sub
+
+    Private Sub NovProjektToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles NovProjektToolStripMenuItem.Click
+        DialogNovProj.ShowDialog()
+    End Sub
+
+    Private Sub OdpriMapoToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles OdpriMapoToolStripMenuItem.Click
+        Process.Start(projektIzbranMapa)
+    End Sub
+
+    Private Sub UvoziProjekteToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UvoziProjekteToolStripMenuItem.Click
+        UvoziMapeProj()
+        Dim msgUvoziMape = MsgBox("Shranim seznam projektov?" + vbCrLf + "Datoteka: tps1100_projekti.txt", vbOKCancel + vbExclamation, "Shranim Projekte?")
+
+        If msgUvoziMape = DialogResult.OK Then
+            ProjektiShraniNast()
+        End If
 
     End Sub
+
+    Private Sub ArhivirajProjektToolStripMenuItem_Click(sender As Object, e As EventArgs)
+        ArhivirajProjekt()
+    End Sub
+
+    Private Sub NastaviDelovniProjektToolStripMenuItem_Click(sender As Object, e As EventArgs)
+        NastaviDelovniProj()
+    End Sub
+
+    Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Handles ToolStripButton3.Click
+        DialogNovProj.ShowDialog()
+    End Sub
+
+    Private Sub ToolStripButton4_Click(sender As Object, e As EventArgs) Handles ToolStripButton4.Click
+        UvoziGsiJob()
+    End Sub
+
+    Private Sub ToolStripButton9_Click(sender As Object, e As EventArgs) Handles ToolStripButton9.Click
+        NastaviDelovniProj()
+    End Sub
 End Class

FormIzracunMeasure.Designer.vb

@@ -28,27 +28,27 @@ Partial Class FormIzracunMeasure
         Me.Label9 = New System.Windows.Forms.Label()
         Me.Label10 = New System.Windows.Forms.Label()
         Me.Label7 = New System.Windows.Forms.Label()
-        Me.TextBox7 = New System.Windows.Forms.TextBox()
+        Me.tbStnHins = New System.Windows.Forms.TextBox()
-        Me.TextBox5 = New System.Windows.Forms.TextBox()
+        Me.tbStnH = New System.Windows.Forms.TextBox()
-        Me.TextBox3 = New System.Windows.Forms.TextBox()
+        Me.tbStnN = New System.Windows.Forms.TextBox()
-        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.tbStnE = New System.Windows.Forms.TextBox()
         Me.Label5 = New System.Windows.Forms.Label()
         Me.Label3 = New System.Windows.Forms.Label()
         Me.Label1 = New System.Windows.Forms.Label()
-        Me.TextBox9 = New System.Windows.Forms.TextBox()
+        Me.tbMerPrCons = New System.Windows.Forms.TextBox()
-        Me.ComboBox1 = New System.Windows.Forms.ComboBox()
+        Me.cbPrizma = New System.Windows.Forms.ComboBox()
-        Me.TextBox8 = New System.Windows.Forms.TextBox()
+        Me.tbMerHpriz = New System.Windows.Forms.TextBox()
-        Me.TextBox6 = New System.Windows.Forms.TextBox()
+        Me.tbMerH = New System.Windows.Forms.TextBox()
-        Me.TextBox4 = New System.Windows.Forms.TextBox()
+        Me.tbMerN = New System.Windows.Forms.TextBox()
-        Me.TextBox2 = New System.Windows.Forms.TextBox()
+        Me.tbMerE = New System.Windows.Forms.TextBox()
-        Me.Label11 = New System.Windows.Forms.Label()
+        Me.LabelPrCons = New System.Windows.Forms.Label()
         Me.Label12 = New System.Windows.Forms.Label()
         Me.Label8 = New System.Windows.Forms.Label()
         Me.Label6 = New System.Windows.Forms.Label()
         Me.Label4 = New System.Windows.Forms.Label()
         Me.Label2 = New System.Windows.Forms.Label()
         Me.Label13 = New System.Windows.Forms.Label()
-        Me.TextBox10 = New System.Windows.Forms.TextBox()
+        Me.tbMerIme = New System.Windows.Forms.TextBox()
         Me.Button1 = New System.Windows.Forms.Button()
         Me.MyApplicationBindingSource = New System.Windows.Forms.BindingSource(Me.components)
         Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
@@ -65,7 +65,7 @@ Partial Class FormIzracunMeasure
         Me.TableLayoutPanel3 = New System.Windows.Forms.TableLayoutPanel()
         Me.Button2 = New System.Windows.Forms.Button()
         Me.Button3 = New System.Windows.Forms.Button()
-        Me.TextBox11 = New System.Windows.Forms.TextBox()
+        Me.tbGsiOut = New System.Windows.Forms.TextBox()
         Me.Label19 = New System.Windows.Forms.Label()
         Me.TableLayoutPanel1.SuspendLayout()
         CType(Me.MyApplicationBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -83,29 +83,29 @@ Partial Class FormIzracunMeasure
         Me.TableLayoutPanel1.Controls.Add(Me.Label9, 1, 0)
         Me.TableLayoutPanel1.Controls.Add(Me.Label10, 3, 0)
         Me.TableLayoutPanel1.Controls.Add(Me.Label7, 0, 5)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox7, 1, 5)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbStnHins, 1, 5)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox5, 1, 4)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbStnH, 1, 4)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox3, 1, 3)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbStnN, 1, 3)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox1, 1, 2)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbStnE, 1, 2)
         Me.TableLayoutPanel1.Controls.Add(Me.Label5, 0, 4)
         Me.TableLayoutPanel1.Controls.Add(Me.Label3, 0, 3)
         Me.TableLayoutPanel1.Controls.Add(Me.Label1, 0, 2)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox9, 3, 7)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbMerPrCons, 3, 7)
-        Me.TableLayoutPanel1.Controls.Add(Me.ComboBox1, 3, 6)
+        Me.TableLayoutPanel1.Controls.Add(Me.cbPrizma, 3, 6)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox8, 3, 5)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbMerHpriz, 3, 5)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox6, 3, 4)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbMerH, 3, 4)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox4, 3, 3)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbMerN, 3, 3)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox2, 3, 2)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbMerE, 3, 2)
-        Me.TableLayoutPanel1.Controls.Add(Me.Label11, 2, 7)
+        Me.TableLayoutPanel1.Controls.Add(Me.LabelPrCons, 2, 7)
         Me.TableLayoutPanel1.Controls.Add(Me.Label12, 2, 6)
         Me.TableLayoutPanel1.Controls.Add(Me.Label8, 2, 5)
         Me.TableLayoutPanel1.Controls.Add(Me.Label6, 2, 4)
         Me.TableLayoutPanel1.Controls.Add(Me.Label4, 2, 3)
         Me.TableLayoutPanel1.Controls.Add(Me.Label2, 2, 2)
         Me.TableLayoutPanel1.Controls.Add(Me.Label13, 2, 1)
-        Me.TableLayoutPanel1.Controls.Add(Me.TextBox10, 3, 1)
+        Me.TableLayoutPanel1.Controls.Add(Me.tbMerIme, 3, 1)
         Me.TableLayoutPanel1.Controls.Add(Me.Button1, 3, 8)
-        Me.TableLayoutPanel1.Location = New System.Drawing.Point(12, 12)
+        Me.TableLayoutPanel1.Location = New System.Drawing.Point(255, 12)
         Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
         Me.TableLayoutPanel1.RowCount = 9
         Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Absolute, 30.0!))
@@ -157,38 +157,41 @@ Partial Class FormIzracunMeasure
         Me.Label7.Text = "H (inst.)"
         Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight
         '
-        'TextBox7
+        'tbStnHins
         '
-        Me.TextBox7.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbStnHins.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox7.Location = New System.Drawing.Point(68, 133)
+        Me.tbStnHins.Location = New System.Drawing.Point(68, 133)
-        Me.TextBox7.Name = "TextBox7"
+        Me.tbStnHins.Name = "tbStnHins"
-        Me.TextBox7.Size = New System.Drawing.Size(60, 20)
+        Me.tbStnHins.Size = New System.Drawing.Size(60, 20)
-        Me.TextBox7.TabIndex = 13
+        Me.tbStnHins.TabIndex = 13
-        Me.TextBox7.Text = "0.000"
+        Me.tbStnHins.Text = "0.000"
         '
-        'TextBox5
+        'tbStnH
         '
-        Me.TextBox5.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbStnH.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox5.Location = New System.Drawing.Point(68, 108)
+        Me.tbStnH.Location = New System.Drawing.Point(68, 108)
-        Me.TextBox5.Name = "TextBox5"
+        Me.tbStnH.Name = "tbStnH"
-        Me.TextBox5.Size = New System.Drawing.Size(80, 20)
+        Me.tbStnH.Size = New System.Drawing.Size(80, 20)
-        Me.TextBox5.TabIndex = 9
+        Me.tbStnH.TabIndex = 9
+        Me.tbStnH.Text = "0.000"
         '
-        'TextBox3
+        'tbStnN
         '
-        Me.TextBox3.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbStnN.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox3.Location = New System.Drawing.Point(68, 83)
+        Me.tbStnN.Location = New System.Drawing.Point(68, 83)
-        Me.TextBox3.Name = "TextBox3"
+        Me.tbStnN.Name = "tbStnN"
-        Me.TextBox3.Size = New System.Drawing.Size(99, 20)
+        Me.tbStnN.Size = New System.Drawing.Size(99, 20)
-        Me.TextBox3.TabIndex = 5
+        Me.tbStnN.TabIndex = 5
+        Me.tbStnN.Text = "0.000"
         '
-        'TextBox1
+        'tbStnE
         '
-        Me.TextBox1.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbStnE.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox1.Location = New System.Drawing.Point(68, 58)
+        Me.tbStnE.Location = New System.Drawing.Point(68, 58)
-        Me.TextBox1.Name = "TextBox1"
+        Me.tbStnE.Name = "tbStnE"
-        Me.TextBox1.Size = New System.Drawing.Size(99, 20)
+        Me.tbStnE.Size = New System.Drawing.Size(99, 20)
-        Me.TextBox1.TabIndex = 1
+        Me.tbStnE.TabIndex = 1
+        Me.tbStnE.Text = "0.000"
         '
         'Label5
         '
@@ -223,68 +226,71 @@ Partial Class FormIzracunMeasure
         Me.Label1.Text = "E"
         Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleRight
         '
-        'TextBox9
+        'tbMerPrCons
         '
-        Me.TextBox9.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbMerPrCons.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox9.Enabled = False
+        Me.tbMerPrCons.Enabled = False
-        Me.TextBox9.Location = New System.Drawing.Point(285, 183)
+        Me.tbMerPrCons.Location = New System.Drawing.Point(285, 183)
-        Me.TextBox9.Name = "TextBox9"
+        Me.tbMerPrCons.Name = "tbMerPrCons"
-        Me.TextBox9.Size = New System.Drawing.Size(60, 20)
+        Me.tbMerPrCons.Size = New System.Drawing.Size(60, 20)
-        Me.TextBox9.TabIndex = 19
+        Me.tbMerPrCons.TabIndex = 19
         '
-        'ComboBox1
+        'cbPrizma
         '
-        Me.ComboBox1.FormattingEnabled = True
+        Me.cbPrizma.FormattingEnabled = True
-        Me.ComboBox1.Items.AddRange(New Object() {"Red Laser", "Leica Circ. Prism", "Leica Mini Prism", "Vnos konstante..."})
+        Me.cbPrizma.Items.AddRange(New Object() {"Red Laser", "Leica Circ. Prism", "Leica Mini Prism", "Vnos konstante..."})
-        Me.ComboBox1.Location = New System.Drawing.Point(285, 158)
+        Me.cbPrizma.Location = New System.Drawing.Point(285, 158)
-        Me.ComboBox1.Name = "ComboBox1"
+        Me.cbPrizma.Name = "cbPrizma"
-        Me.ComboBox1.Size = New System.Drawing.Size(149, 21)
+        Me.cbPrizma.Size = New System.Drawing.Size(149, 21)
-        Me.ComboBox1.TabIndex = 21
+        Me.cbPrizma.TabIndex = 21
         '
-        'TextBox8
+        'tbMerHpriz
         '
-        Me.TextBox8.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbMerHpriz.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox8.Location = New System.Drawing.Point(285, 133)
+        Me.tbMerHpriz.Location = New System.Drawing.Point(285, 133)
-        Me.TextBox8.Name = "TextBox8"
+        Me.tbMerHpriz.Name = "tbMerHpriz"
-        Me.TextBox8.Size = New System.Drawing.Size(60, 20)
+        Me.tbMerHpriz.Size = New System.Drawing.Size(60, 20)
-        Me.TextBox8.TabIndex = 15
+        Me.tbMerHpriz.TabIndex = 15
-        Me.TextBox8.Text = "0.000"
+        Me.tbMerHpriz.Text = "0.000"
         '
-        'TextBox6
+        'tbMerH
         '
-        Me.TextBox6.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbMerH.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox6.Location = New System.Drawing.Point(285, 108)
+        Me.tbMerH.Location = New System.Drawing.Point(285, 108)
-        Me.TextBox6.Name = "TextBox6"
+        Me.tbMerH.Name = "tbMerH"
-        Me.TextBox6.Size = New System.Drawing.Size(80, 20)
+        Me.tbMerH.Size = New System.Drawing.Size(80, 20)
-        Me.TextBox6.TabIndex = 11
+        Me.tbMerH.TabIndex = 11
+        Me.tbMerH.Text = "0.000"
         '
-        'TextBox4
+        'tbMerN
         '
-        Me.TextBox4.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbMerN.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox4.Location = New System.Drawing.Point(285, 83)
+        Me.tbMerN.Location = New System.Drawing.Point(285, 83)
-        Me.TextBox4.Name = "TextBox4"
+        Me.tbMerN.Name = "tbMerN"
-        Me.TextBox4.Size = New System.Drawing.Size(99, 20)
+        Me.tbMerN.Size = New System.Drawing.Size(99, 20)
-        Me.TextBox4.TabIndex = 7
+        Me.tbMerN.TabIndex = 7
+        Me.tbMerN.Text = "0.000"
         '
-        'TextBox2
+        'tbMerE
         '
-        Me.TextBox2.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbMerE.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox2.Location = New System.Drawing.Point(285, 58)
+        Me.tbMerE.Location = New System.Drawing.Point(285, 58)
-        Me.TextBox2.Name = "TextBox2"
+        Me.tbMerE.Name = "tbMerE"
-        Me.TextBox2.Size = New System.Drawing.Size(99, 20)
+        Me.tbMerE.Size = New System.Drawing.Size(99, 20)
-        Me.TextBox2.TabIndex = 3
+        Me.tbMerE.TabIndex = 3
+        Me.tbMerE.Text = "0.000"
         '
-        'Label11
+        'LabelPrCons
         '
-        Me.Label11.Anchor = System.Windows.Forms.AnchorStyles.Right
+        Me.LabelPrCons.Anchor = System.Windows.Forms.AnchorStyles.Right
-        Me.Label11.AutoSize = True
+        Me.LabelPrCons.AutoSize = True
-        Me.Label11.Enabled = False
+        Me.LabelPrCons.Enabled = False
-        Me.Label11.Location = New System.Drawing.Point(230, 186)
+        Me.LabelPrCons.Location = New System.Drawing.Point(230, 186)
-        Me.Label11.Name = "Label11"
+        Me.LabelPrCons.Name = "LabelPrCons"
-        Me.Label11.Size = New System.Drawing.Size(49, 13)
+        Me.LabelPrCons.Size = New System.Drawing.Size(49, 13)
-        Me.Label11.TabIndex = 18
+        Me.LabelPrCons.TabIndex = 18
-        Me.Label11.Text = "Pr. cons."
+        Me.LabelPrCons.Text = "Pr. cons."
-        Me.Label11.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.LabelPrCons.TextAlign = System.Drawing.ContentAlignment.MiddleRight
         '
         'Label12
         '
@@ -352,13 +358,14 @@ Partial Class FormIzracunMeasure
         Me.Label13.Text = "Ime/Št."
         Me.Label13.TextAlign = System.Drawing.ContentAlignment.MiddleRight
         '
-        'TextBox10
+        'tbMerIme
         '
-        Me.TextBox10.Anchor = System.Windows.Forms.AnchorStyles.Left
+        Me.tbMerIme.Anchor = System.Windows.Forms.AnchorStyles.Left
-        Me.TextBox10.Location = New System.Drawing.Point(285, 33)
+        Me.tbMerIme.Location = New System.Drawing.Point(285, 33)
-        Me.TextBox10.Name = "TextBox10"
+        Me.tbMerIme.Name = "tbMerIme"
-        Me.TextBox10.Size = New System.Drawing.Size(100, 20)
+        Me.tbMerIme.Size = New System.Drawing.Size(100, 20)
-        Me.TextBox10.TabIndex = 23
+        Me.tbMerIme.TabIndex = 23
+        Me.tbMerIme.Text = "TOCKA"
         '
         'Button1
         '
@@ -400,7 +407,7 @@ Partial Class FormIzracunMeasure
         Me.TableLayoutPanel2.RowCount = 2
         Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
         Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
-        Me.TableLayoutPanel2.Size = New System.Drawing.Size(591, 50)
+        Me.TableLayoutPanel2.Size = New System.Drawing.Size(680, 50)
         Me.TableLayoutPanel2.TabIndex = 1
         '
         'LabelIzrHz
@@ -411,7 +418,7 @@ Partial Class FormIzracunMeasure
         Me.LabelIzrHz.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.LabelIzrHz.Location = New System.Drawing.Point(3, 28)
         Me.LabelIzrHz.Name = "LabelIzrHz"
-        Me.LabelIzrHz.Size = New System.Drawing.Size(112, 18)
+        Me.LabelIzrHz.Size = New System.Drawing.Size(130, 18)
         Me.LabelIzrHz.TabIndex = 26
         Me.LabelIzrHz.Text = "LabelIzrHz"
         Me.LabelIzrHz.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -422,9 +429,9 @@ Partial Class FormIzracunMeasure
         Me.LabelIzrDs.AutoSize = True
         Me.LabelIzrDs.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.LabelIzrDs.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.LabelIzrDs.Location = New System.Drawing.Point(239, 28)
+        Me.LabelIzrDs.Location = New System.Drawing.Point(275, 28)
         Me.LabelIzrDs.Name = "LabelIzrDs"
-        Me.LabelIzrDs.Size = New System.Drawing.Size(112, 18)
+        Me.LabelIzrDs.Size = New System.Drawing.Size(130, 18)
         Me.LabelIzrDs.TabIndex = 25
         Me.LabelIzrDs.Text = "LabelIzrDs"
         Me.LabelIzrDs.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -435,9 +442,9 @@ Partial Class FormIzracunMeasure
         Me.LabelIzrV.AutoSize = True
         Me.LabelIzrV.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.LabelIzrV.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.LabelIzrV.Location = New System.Drawing.Point(121, 28)
+        Me.LabelIzrV.Location = New System.Drawing.Point(139, 28)
         Me.LabelIzrV.Name = "LabelIzrV"
-        Me.LabelIzrV.Size = New System.Drawing.Size(112, 18)
+        Me.LabelIzrV.Size = New System.Drawing.Size(130, 18)
         Me.LabelIzrV.TabIndex = 24
         Me.LabelIzrV.Text = "LabelIzrV"
         Me.LabelIzrV.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -448,9 +455,9 @@ Partial Class FormIzracunMeasure
         Me.LabelIzrDhVis.AutoSize = True
         Me.LabelIzrDhVis.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.LabelIzrDhVis.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.LabelIzrDhVis.Location = New System.Drawing.Point(475, 28)
+        Me.LabelIzrDhVis.Location = New System.Drawing.Point(547, 28)
         Me.LabelIzrDhVis.Name = "LabelIzrDhVis"
-        Me.LabelIzrDhVis.Size = New System.Drawing.Size(113, 18)
+        Me.LabelIzrDhVis.Size = New System.Drawing.Size(130, 18)
         Me.LabelIzrDhVis.TabIndex = 23
         Me.LabelIzrDhVis.Text = "LabelIzrDhVis"
         Me.LabelIzrDhVis.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -461,9 +468,9 @@ Partial Class FormIzracunMeasure
         Me.LabelIzrDh.AutoSize = True
         Me.LabelIzrDh.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
         Me.LabelIzrDh.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.LabelIzrDh.Location = New System.Drawing.Point(357, 28)
+        Me.LabelIzrDh.Location = New System.Drawing.Point(411, 28)
         Me.LabelIzrDh.Name = "LabelIzrDh"
-        Me.LabelIzrDh.Size = New System.Drawing.Size(112, 18)
+        Me.LabelIzrDh.Size = New System.Drawing.Size(130, 18)
         Me.LabelIzrDh.TabIndex = 22
         Me.LabelIzrDh.Text = "LabelIzrDh"
         Me.LabelIzrDh.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -476,7 +483,7 @@ Partial Class FormIzracunMeasure
         Me.Label14.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
         Me.Label14.Location = New System.Drawing.Point(3, 9)
         Me.Label14.Name = "Label14"
-        Me.Label14.Size = New System.Drawing.Size(112, 16)
+        Me.Label14.Size = New System.Drawing.Size(130, 16)
         Me.Label14.TabIndex = 17
         Me.Label14.Text = "Hz"
         Me.Label14.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -487,9 +494,9 @@ Partial Class FormIzracunMeasure
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Label15.AutoSize = True
         Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label15.Location = New System.Drawing.Point(121, 9)
+        Me.Label15.Location = New System.Drawing.Point(139, 9)
         Me.Label15.Name = "Label15"
-        Me.Label15.Size = New System.Drawing.Size(112, 16)
+        Me.Label15.Size = New System.Drawing.Size(130, 16)
         Me.Label15.TabIndex = 18
         Me.Label15.Text = "V"
         Me.Label15.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -500,9 +507,9 @@ Partial Class FormIzracunMeasure
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Label16.AutoSize = True
         Me.Label16.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label16.Location = New System.Drawing.Point(239, 9)
+        Me.Label16.Location = New System.Drawing.Point(275, 9)
         Me.Label16.Name = "Label16"
-        Me.Label16.Size = New System.Drawing.Size(112, 16)
+        Me.Label16.Size = New System.Drawing.Size(130, 16)
         Me.Label16.TabIndex = 19
         Me.Label16.Text = "D (poš.)"
         Me.Label16.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -513,9 +520,9 @@ Partial Class FormIzracunMeasure
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Label17.AutoSize = True
         Me.Label17.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label17.Location = New System.Drawing.Point(357, 9)
+        Me.Label17.Location = New System.Drawing.Point(411, 9)
         Me.Label17.Name = "Label17"
-        Me.Label17.Size = New System.Drawing.Size(112, 16)
+        Me.Label17.Size = New System.Drawing.Size(130, 16)
         Me.Label17.TabIndex = 20
         Me.Label17.Text = "D (hor.)"
         Me.Label17.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -526,9 +533,9 @@ Partial Class FormIzracunMeasure
             Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
         Me.Label18.AutoSize = True
         Me.Label18.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label18.Location = New System.Drawing.Point(475, 9)
+        Me.Label18.Location = New System.Drawing.Point(547, 9)
         Me.Label18.Name = "Label18"
-        Me.Label18.Size = New System.Drawing.Size(113, 16)
+        Me.Label18.Size = New System.Drawing.Size(130, 16)
         Me.Label18.TabIndex = 21
         Me.Label18.Text = "dH"
         Me.Label18.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -544,7 +551,7 @@ Partial Class FormIzracunMeasure
         Me.TableLayoutPanel3.Name = "TableLayoutPanel3"
         Me.TableLayoutPanel3.RowCount = 1
         Me.TableLayoutPanel3.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
-        Me.TableLayoutPanel3.Size = New System.Drawing.Size(590, 40)
+        Me.TableLayoutPanel3.Size = New System.Drawing.Size(680, 40)
         Me.TableLayoutPanel3.TabIndex = 2
         '
         'Button2
@@ -561,7 +568,7 @@ Partial Class FormIzracunMeasure
         'Button3
         '
         Me.Button3.Anchor = System.Windows.Forms.AnchorStyles.Right
-        Me.Button3.Location = New System.Drawing.Point(512, 4)
+        Me.Button3.Location = New System.Drawing.Point(602, 4)
         Me.Button3.Name = "Button3"
         Me.Button3.Size = New System.Drawing.Size(75, 32)
         Me.Button3.TabIndex = 1
@@ -569,13 +576,13 @@ Partial Class FormIzracunMeasure
         Me.Button3.TextImageRelation = System.Windows.Forms.TextImageRelation.TextBeforeImage
         Me.Button3.UseVisualStyleBackColor = True
         '
-        'TextBox11
+        'tbGsiOut
         '
-        Me.TextBox11.Font = New System.Drawing.Font("Courier New", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.tbGsiOut.Font = New System.Drawing.Font("Courier New", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.TextBox11.Location = New System.Drawing.Point(47, 320)
+        Me.tbGsiOut.Location = New System.Drawing.Point(47, 320)
-        Me.TextBox11.Name = "TextBox11"
+        Me.tbGsiOut.Name = "tbGsiOut"
-        Me.TextBox11.Size = New System.Drawing.Size(556, 21)
+        Me.tbGsiOut.Size = New System.Drawing.Size(645, 21)
-        Me.TextBox11.TabIndex = 3
+        Me.tbGsiOut.TabIndex = 3
         '
         'Label19
         '
@@ -590,16 +597,17 @@ Partial Class FormIzracunMeasure
         '
         Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
         Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(614, 396)
+        Me.BackColor = System.Drawing.SystemColors.Control
+        Me.ClientSize = New System.Drawing.Size(704, 396)
         Me.Controls.Add(Me.Label19)
-        Me.Controls.Add(Me.TextBox11)
+        Me.Controls.Add(Me.tbGsiOut)
         Me.Controls.Add(Me.TableLayoutPanel3)
         Me.Controls.Add(Me.TableLayoutPanel2)
         Me.Controls.Add(Me.TableLayoutPanel1)
         Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
         Me.MaximizeBox = False
         Me.Name = "FormIzracunMeasure"
-        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
         Me.Text = "Izračun Meritve"
         Me.TableLayoutPanel1.ResumeLayout(False)
         Me.TableLayoutPanel1.PerformLayout()
@@ -614,30 +622,30 @@ Partial Class FormIzracunMeasure
 
     Friend WithEvents TableLayoutPanel1 As TableLayoutPanel
     Friend WithEvents Label8 As Label
-    Friend WithEvents TextBox8 As TextBox
+    Friend WithEvents tbMerHpriz As TextBox
     Friend WithEvents Label7 As Label
-    Friend WithEvents TextBox7 As TextBox
+    Friend WithEvents tbStnHins As TextBox
     Friend WithEvents Label6 As Label
-    Friend WithEvents TextBox6 As TextBox
+    Friend WithEvents tbMerH As TextBox
     Friend WithEvents Label5 As Label
-    Friend WithEvents TextBox5 As TextBox
+    Friend WithEvents tbStnH As TextBox
     Friend WithEvents Label4 As Label
-    Friend WithEvents TextBox4 As TextBox
+    Friend WithEvents tbMerN As TextBox
     Friend WithEvents Label3 As Label
-    Friend WithEvents TextBox3 As TextBox
+    Friend WithEvents tbStnN As TextBox
     Friend WithEvents Label2 As Label
-    Friend WithEvents TextBox2 As TextBox
+    Friend WithEvents tbMerE As TextBox
     Friend WithEvents Label1 As Label
-    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents tbStnE As TextBox
     Friend WithEvents Label9 As Label
     Friend WithEvents Label10 As Label
-    Friend WithEvents Label11 As Label
+    Friend WithEvents LabelPrCons As Label
     Friend WithEvents Label12 As Label
-    Friend WithEvents TextBox9 As TextBox
+    Friend WithEvents tbMerPrCons As TextBox
-    Friend WithEvents ComboBox1 As ComboBox
+    Friend WithEvents cbPrizma As ComboBox
     Friend WithEvents MyApplicationBindingSource As BindingSource
     Friend WithEvents Label13 As Label
-    Friend WithEvents TextBox10 As TextBox
+    Friend WithEvents tbMerIme As TextBox
     Friend WithEvents TableLayoutPanel2 As TableLayoutPanel
     Friend WithEvents Label14 As Label
     Friend WithEvents Label15 As Label
@@ -653,6 +661,6 @@ Partial Class FormIzracunMeasure
     Friend WithEvents TableLayoutPanel3 As TableLayoutPanel
     Friend WithEvents Button2 As Button
     Friend WithEvents Button3 As Button
-    Friend WithEvents TextBox11 As TextBox
+    Friend WithEvents tbGsiOut As TextBox
     Friend WithEvents Label19 As Label
 End Class

FormIzracunMeasure.vb

@@ -1,29 +1,95 @@
 Public Class FormIzracunMeasure
+    Public g As Graphics
+
+    Dim stnE
+    Dim stnN
+    Dim stnH
+    Dim stnHinst
+    Dim merIme
+    Dim merE
+    Dim merN
+    Dim merH
+    Dim merHpriz
+    Dim merPriz
+    Dim merPrCons
+
     Private Sub FormIzracunMeasure_Load(sender As Object, e As EventArgs) Handles MyBase.Load
-        ComboBox1.SelectedIndex = 0
+        g = Me.CreateGraphics()
+
+        cbPrizma.SelectedIndex = 0
     End Sub
 
-    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
+    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cbPrizma.SelectedIndexChanged
-        Dim cb = ComboBox1.Text
+        Dim cb = cbPrizma.Text
+
         Select Case cb
             Case "Red Laser"
-                TextBox9.Text = "+0.0344"
+                tbMerPrCons.Text = "+0.0344"
-                TextBox9.Enabled = False
+                tbMerPrCons.Enabled = False
-                Label11.Enabled = False
+                LabelPrCons.Enabled = False
             Case "Leica Circ. Prism"
-                TextBox9.Text = "+0.0000"
+                tbMerPrCons.Text = "+0.0000"
-                TextBox9.Enabled = False
+                tbMerPrCons.Enabled = False
-                Label11.Enabled = False
+                LabelPrCons.Enabled = False
             Case "Leica Mini Prism"
-                TextBox9.Text = "+0.0175"
+                tbMerPrCons.Text = "+0.0175"
-                TextBox9.Enabled = False
+                tbMerPrCons.Enabled = False
-                Label11.Enabled = False
+                LabelPrCons.Enabled = False
             Case "Vnos konstante..."
-                TextBox9.Text = "+0.0000"
+                tbMerPrCons.Text = "+0.0000"
-                TextBox9.Enabled = True
+                tbMerPrCons.Enabled = True
-                Label11.Enabled = True
+                LabelPrCons.Enabled = True
             Case Else
 
         End Select
     End Sub
+
+    Public Sub PrikazGrafike()
+        g.Clear(SystemColors.Control)
+
+        Dim deltaE = merE - stnE
+        Dim deltaN = merN - stnN
+        Dim fakt
+
+        If deltaE > deltaN Then
+            fakt = 120 / deltaE
+        Else
+            fakt = 120 / deltaN
+        End If
+
+        Dim izrE = deltaE * fakt
+        Dim izrN = deltaN * fakt
+
+        Dim grStnE As Single = 130
+        Dim grStnN As Single = 130
+        Dim grMerE As Single = izrE + 130
+        Dim grMerN As Single = izrN + 130
+
+        tbGsiOut.Text = "dE=" + deltaE.ToString + " dN=" + deltaN.ToString + " / f=" + fakt.ToString + " / iE=" + izrE.ToString + " iN=" + izrN.ToString + " gE=" + grMerE.ToString + " gN=" + grMerN.ToString
+
+        g.DrawLine(Pens.DarkBlue, New Point(grStnE, grStnN), New Point(grMerE, grMerN))
+        g.DrawRectangle(Pens.Gray, 10, 10, 240, 240)
+
+    End Sub
+
+    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+        stnE = CDbl(tbStnE.Text)
+        stnN = CDbl(tbStnN.Text)
+        stnH = CDbl(tbStnH.Text)
+        stnHinst = CDbl(tbStnHins.Text)
+        merIme = tbMerIme.Text.ToString
+        merE = CDbl(tbMerE.Text)
+        merN = CDbl(tbMerN.Text)
+        merH = CDbl(tbMerH.Text)
+        merHpriz = CDbl(tbMerHpriz.Text)
+        merPriz = cbPrizma.Text.ToString
+        merPrCons = CDbl(tbMerPrCons.Text)
+
+        PrikazGrafike()
+
+    End Sub
+
+    Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
+        Me.Close()
+    End Sub
 End Class

My Project/AssemblyInfo.vb

@@ -10,8 +10,8 @@ Imports System.Runtime.InteropServices
 ' Review the values of the assembly attributes
 
 <Assembly: AssemblyTitle("TPS1100 Convert")>
-<Assembly: AssemblyDescription("Program za konvertiranje GSI datotek")>
+<Assembly: AssemblyDescription("Program za procesiranje GSI podatkov")>
-<Assembly: AssemblyCompany("2B geoinformatika, d.o.o.")>
+<Assembly: AssemblyCompany("MultiBox")>
 <Assembly: AssemblyProduct("TPS1100 Convert")>
 <Assembly: AssemblyCopyright("Copyright © 2024")>
 <Assembly: AssemblyTrademark("")>
@@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.8.0.1")>
+<Assembly: AssemblyVersion("2.8.0.2")>
-<Assembly: AssemblyFileVersion("2.8.0.1")>
+<Assembly: AssemblyFileVersion("2.8.0.2")>
 <Assembly: NeutralResourcesLanguage("sl-SI")>

My Project/Resources.Designer.vb

@@ -671,6 +671,16 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_day_view_40() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-day-view-40", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Looks up a localized resource of type System.Drawing.Bitmap.
         '''</summary>
@@ -951,6 +961,36 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_print_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-print-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_print_48_1() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-print-48_1", 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_print_94() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-print-94", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Looks up a localized resource of type System.Drawing.Bitmap.
         '''</summary>
@@ -1031,6 +1071,26 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_rename_20() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-rename-20", 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_rename_24() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-rename-24", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Looks up a localized resource of type System.Drawing.Bitmap.
         '''</summary>
@@ -1081,6 +1141,46 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_sd_import_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-sd-import-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_sd_import2_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-sd-import2-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_sdb_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-sdb-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_sdb_import_50() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-sdb-import-50", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Looks up a localized resource of type System.Drawing.Bitmap.
         '''</summary>
@@ -1111,6 +1211,16 @@ Namespace My.Resources
             End Get
         End Property
         
+        '''<summary>
+        '''  Looks up a localized resource of type System.Drawing.Bitmap.
+        '''</summary>
+        Friend ReadOnly Property icons8_table_48() As System.Drawing.Bitmap
+            Get
+                Dim obj As Object = ResourceManager.GetObject("icons8-table-48", resourceCulture)
+                Return CType(obj,System.Drawing.Bitmap)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Looks up a localized resource of type System.Drawing.Bitmap.
         '''</summary>

My Project/Resources.resx

@@ -130,14 +130,11 @@
   <data name="icons8-send-file-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-send-file-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="48" xml:space="preserve">
+  <data name="icons8-move-to-folder-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Information 7</value>
+    <value>Icons\icons8-move-to-folder-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="icons8-mesh-48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="58" xml:space="preserve">
-    <value>Icons\icons8-mesh-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Prism constant</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-compare-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-compare-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -178,18 +175,24 @@
   <data name="icons8-micro-sd-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-micro-sd-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="icons8-table-48" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-table-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="icons8-sd-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-sd-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="icons8-folder-tree-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Icons\icons8-folder-tree-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
-  </data>
   <data name="calculator" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\calculator.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="icons8-print-94" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-print-94.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="icons8-file-TXT-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-file-TXT-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="icons8-sdb-import-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-sdb-import-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>
@@ -202,17 +205,14 @@
   <data name="76" xml:space="preserve">
     <value>Remark 6</value>
   </data>
-  <data name="19" xml:space="preserve">
-    <value>Time</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="75" xml:space="preserve">
     <value>Remark 5</value>
   </data>
-  <data name="icons8-product-documents-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="51" xml:space="preserve">
-    <value>Icons\icons8-product-documents-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>PPM/mm</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>
@@ -223,29 +223,38 @@
   <data name="83" xml:space="preserve">
     <value>Elevation</value>
   </data>
+  <data name="icons8-sd-import-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-sd-import-50.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-rename-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-rename-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="icons8-caps-lock-on-501" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-caps-lock-on-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="icons8-edit-text-file-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-edit-text-file-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="82" xml:space="preserve">
+    <value>Northing</value>
+  </data>
   <data name="icons8-close-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-close-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="51" xml:space="preserve">
+  <data name="12" xml:space="preserve">
-    <value>PPM/mm</value>
+    <value>Serial number</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-check-file-501" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="icons8-remove-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Icons\icons8-check-file-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Icons\icons8-remove-24.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">
+  <data name="icons8_add_new_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>
+    <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_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>
@@ -262,24 +271,36 @@
   <data name="86" xml:space="preserve">
     <value>St. Height</value>
   </data>
+  <data name="icons8-product-documents-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-product-documents-24.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="digital" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\digital.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="icons8-add-to-collection-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-add-to-collection-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="43" xml:space="preserve">
     <value>Information 2</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-sdb-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-sdb-50.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="81" xml:space="preserve">
     <value>Easting</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-support-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-support-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
@@ -292,11 +313,14 @@
   <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="41" xml:space="preserve">
+    <value>Code-Block ID</value>
+  </data>
   <data name="74" xml:space="preserve">
     <value>Remark 4</value>
   </data>
-  <data name="icons8_tools_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="icons8-check-file-501" 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>
+    <value>Icons\icons8-check-file-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="icons8-caps-lock-on-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-caps-lock-on-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -319,15 +343,15 @@
   <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="46" xml:space="preserve">
+    <value>Information 5</value>
+  </data>
   <data name="72" xml:space="preserve">
     <value>Remark 2</value>
   </data>
   <data name="11" xml:space="preserve">
     <value>Point number</value>
   </data>
-  <data name="31" xml:space="preserve">
-    <value>Slope distance</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>
@@ -343,8 +367,11 @@
   <data name="digital_32" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\digital_32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="58" xml:space="preserve">
+  <data name="icons8-check-file-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Prism constant</value>
+    <value>Icons\icons8-check-file-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="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>
@@ -352,38 +379,44 @@
   <data name="33" xml:space="preserve">
     <value>Height difference</value>
   </data>
-  <data name="icons8-move-to-folder-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="88" xml:space="preserve">
-    <value>Icons\icons8-move-to-folder-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Instrument height</value>
   </data>
-  <data name="25" xml:space="preserve">
+  <data name="icons8_tools_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Horizontal Angle Correction</value>
+    <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-file-path-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-file-path-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
+  <data name="42" xml:space="preserve">
+    <value>Information 1</value>
+  </data>
   <data name="icons8-question-mark-48" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-question-mark-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="icons8-check-file-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="19" xml:space="preserve">
-    <value>Icons\icons8-check-file-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Time</value>
   </data>
-  <data name="icons8-program-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="icons8-print-48_1" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Icons\icons8-program-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Icons\icons8-print-48_1.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="icons8-program-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+    <value>Icons\icons8-program-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+  </data>
   <data name="icons8-recycle-bin-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-recycle-bin-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-remove-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="icons8-sd-import2-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Icons\icons8-remove-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Icons\icons8-sd-import2-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="icons8-move-to-folder-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="icons8-day-view-40" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Icons\icons8-move-to-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Icons\icons8-day-view-40.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.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
@@ -391,14 +424,14 @@
   <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-product-documents-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="icons8-folder-tree-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Icons\icons8-product-documents-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Icons\icons8-folder-tree-50.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="82" xml:space="preserve">
+  <data name="48" xml:space="preserve">
-    <value>Northing</value>
+    <value>Information 7</value>
   </data>
   <data name="71" xml:space="preserve">
     <value>Remark 1</value>
@@ -412,8 +445,8 @@
   <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="46" xml:space="preserve">
+  <data name="icons8-product-documents-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Information 5</value>
+    <value>Icons\icons8-product-documents-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="icons8-stationery-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-stationery-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -430,8 +463,8 @@
   <data name="icons8-rename-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-rename-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">
+  <data name="icons8-move-to-folder-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>
+    <value>Icons\icons8-move-to-folder-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="icons8-advance2-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-advance2-24.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -445,17 +478,17 @@
   <data name="32" xml:space="preserve">
     <value>Horizontal distance</value>
   </data>
-  <data name="88" xml:space="preserve">
+  <data name="icons8-mesh-48" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Instrument height</value>
+    <value>Icons\icons8-mesh-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
   <data name="icons8-recycle-bin-24" type="System.Resources.ResXFileRef, System.Windows.Forms">
     <value>Icons\icons8-recycle-bin-24.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">
+  <data name="31" xml:space="preserve">
-    <value>Icons\icons8-edit-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Slope distance</value>
   </data>
-  <data name="41" xml:space="preserve">
+  <data name="25" xml:space="preserve">
-    <value>Code-Block ID</value>
+    <value>Horizontal Angle Correction</value>
   </data>
   <data name="21" xml:space="preserve">
     <value>Horizontal Angle</value>
@@ -463,13 +496,13 @@
   <data name="84" xml:space="preserve">
     <value>St. Easting</value>
   </data>
-  <data name="42" xml:space="preserve">
+  <data name="icons8_close_window_50" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Information 1</value>
+    <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="12" xml:space="preserve">
+  <data name="icons8-print-48" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Serial number</value>
+    <value>Icons\icons8-print-48.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
-  <data name="icons8-add-to-collection-50" type="System.Resources.ResXFileRef, System.Windows.Forms">
+  <data name="icons8-rename-20" type="System.Resources.ResXFileRef, System.Windows.Forms">
-    <value>Icons\icons8-add-to-collection-50.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
+    <value>Icons\icons8-rename-20.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
   </data>
 </root>

Podatki/CONVERT/GPS-GSI.FRT

@@ -1,21 +0,0 @@
-@t:FRT
-@i:GPS500
-@v:1.00
-@a:FormatManager generated
-@c:Leica Geosystems AG
-@d:ponedeljek, maj 26, 2008
-@o:Format Manager 1.0
-@l:GPS500_Standard
-%NGPS-GSI
-#WS
-#LM
-#TC
-#PB
-&W1.000000000000
-&L1000.000000000000
-&T1.000000000000
-&P1.000000000000
-@Dd1
-@Df1.00
-@Ds-
-$1714000"*11%04.0f+%016.16s 81...0%#+017.0f 82...0%#+017.0f 83...0%#+017.0f "004001311011001011208201081208201082208201083;

Podatki/CONVERT/GPS-KOO.FRT

@@ -1,21 +0,0 @@
-@t:FRT
-@i:GPS500
-@v:1.00
-@a:Gregor Bilban
-@c:Geoservis, d.o.o.
-@d:sreda, september 28, 2005
-@o:www.geoservis.si
-@l:GPS500_Standard
-%NGPS-KOO
-#WG
-#LM
-#TC
-#PB
-&W1.000000000000
-&L1.000000000000
-&T1.000000000000
-&P1.000000000000
-@Dd1
-@Df1.00
-@Ds----
-$1714000"%-1.0s	%#-1.3f	%#-1.3f	%#-1.3f	%-1.0s	%-1.0s"011001011208201081208201082208201083011001041011001700;

Podatki/CONVERT/POROCILO.FRT

@@ -1,26 +0,0 @@
-@t:FRT
-@i:GPS500
-@v:1.00
-@a:Boris B.
-@c:2B
-@d:petek, april 25, 2014
-@o:Podatki GPS500
-@l:GPS500_Standard
-%NPOROCILO
-#WS
-#LM
-#TC
-#PB
-&W1.000000000000
-&L1.000000000000
-&T1.000000000000
-&P1.000000000000
-@Dd1
-@Df1.00
-@Ds--------
-$1714000"%-1.0s	%#-1.3f	%#-1.3f	%#-1.3f	%-1.0f %-1.0f %#-1.4f E	%-1.0f %-1.0f %#-1.4f N	%#-1.3f	%#-1.3f %-1.0s	"011001011208011081208011082208011083002001708001001710010001712002001709001001711010001713208011701208011703011001700;
-$1214000"ID	Easting	Northing	Orth. h	Lat (°')	Lon (°')	Ellip. h	Geoid sep.	Class"
-$1722000"SdE: %#-1.3f	SdN: %#-1.3f	SdH: %#-1.3f"210201806210201807208201415;
-$1728000"HDOP: %#-1.3f	VDOP: %#-1.3f	PDOP: %#-1.3f	GDOP: %#-1.3f"008001431008001432008001430008001429;
-$1727000"Datum/Ura: %02.0f.%02.0f.%04.0f/%2.0f:%02.0f:%#02.0f	"003001436003005437003001439003001442003001441008001440;
-$1734000"Koo. sistem: %-1.0sGeoid:       %1.0s"011001443011001496;

Podatki/TPS/CONF/1102_BB.PAR

@@ -1,184 +0,0 @@
-;*********************************************************
-;WARNING!                                                 
-;                                                         
-;Do not edit this Application Configuration file manually 
-;(with Notepad, WordPad, etc.)                            
-;Doing so may produce unexpected and undesirable results. 
-;*********************************************************
-
-[Header]
-DefFile=TPS1_220.def
-DefID=D09.20215072401
-TextFile=Tps1d220.men
-TextID=T21080008522500
-Release=2.21.00
-ModifyDate=13.07.2017
-ModifyTime=19:43:24
-Author=TPS1100 Firmware
-Comment=No comment
-Theo=621317
-ParamNum=145
-RecMNum=6
-MDlgLNum=1
-ParFile=1102_BB.PAR
-
-[Parameter]
-CID25000=1@1@1@3@3
-CID25001=1@1@1@3@0
-CID25002=1@1@1@3@1
-CID25003=1@0@1@3@1
-CID25004=1@1@1@3@0
-CID25005=0@1@1@3@0
-CID25006=1@1@1@4@22222
-CID25007=1@1@1@6@1.276814e+05
-CID25008=1@1@1@6@5.663500e+05
-CID25009=1@1@1@6@2.515385e+02
-CID25010=1@1@1@6@0.000000e+00
-CID25011=0@1@1@4@22222
-CID25012=0@1@1@4@2054
-CID25013=0@1@1@3@0
-CID25014=0@1@1@3@0
-CID25015=0@1@1@3@0
-CID25016=1@1@1@3@3
-CID25017=1@1@1@4@2055
-CID25018=0@1@1@3@0
-CID25019=0@1@1@3@0
-CID25020=0@1@1@3@0
-CID25021=0@1@1@3@0
-CID25022=1@1@1@3@0
-CID25023=1@1@1@3@1
-CID25024=1@1@1@3@0
-CID25025=1@1@1@3@0
-CID25026=0@1@1@3@0
-CID25027=0@1@1@4@621317
-CID25028=0@1@1@4@TCRA1102plus
-CID25029=1@1@1@4@ENGLISH
-CID25030=1@1@1@3@0
-CID25031=1@1@1@3@1
-CID25032=1@1@1@3@0
-CID25033=1@1@1@3@0
-CID25034=1@1@1@3@0
-CID25035=1@1@1@3@0
-CID25036=1@0@1@3@1
-CID25037=1@0@1@3@1
-CID25038=1@1@1@1@1.570796e+00
-CID25039=1@1@1@4@A:\GSI\1111.GSI
-CID25040=1@1@1@3@3
-CID25041=1@1@1@3@2
-CID25042=1@1@1@3@0
-CID25043=1@1@1@3@1
-CID25044=1@1@1@0@15
-CID25045=1@1@1@3@1
-CID25046=1@1@1@4@1
-CID25047=1@1@1@6@0.000000e+00
-CID25048=0@0@1@4@90
-CID25049=0@0@1@4@Measure
-CID25050=0@0@0@4@
-CID25051=0@0@0@4@
-CID25052=0@0@0@4@
-CID25053=0@0@0@4@
-CID25054=0@0@0@4@
-CID25055=0@0@0@4@
-CID25056=0@0@0@4@
-CID25057=0@0@0@4@
-CID25058=0@0@1@4@90
-CID25059=1@1@0@4@
-CID25060=0@1@0@4@
-CID25061=1@1@0@4@
-CID25062=1@1@0@4@
-CID25063=1@1@0@4@
-CID25064=1@1@0@4@
-CID25065=1@1@0@4@
-CID25066=1@0@0@4@
-CID25067=1@0@0@4@
-CID25068=1@0@0@4@
-CID25069=0@0@0@4@
-CID25070=1@0@1@6@0.000000e+00
-CID25071=1@0@1@6@0.000000e+00
-CID25072=1@0@1@6@0.000000e+00
-CID25073=1@1@1@3@1
-CID25074=1@1@1@3@0
-CID25075=1@1@1@8@19:43:25
-CID25076=1@1@1@7@13.07.2017
-CID25077=1@1@1@3@0
-CID25078=1@1@1@3@2
-CID25079=1@1@1@3@0
-CID25080=1@1@1@0@300
-CID25081=0@1@1@3@1
-CID25082=1@1@1@3@1
-CID25083=0@1@1@3@2
-CID25084=0@1@1@3@1
-CID25085=1@1@1@3@0
-CID25086=1@1@1@3@0
-CID25087=1@1@1@3@0
-CID25088=1@1@1@4@2055
-CID25089=0@1@0@6@5.663477e+05
-CID25090=0@1@0@6@1.276808e+05
-CID25091=0@1@0@6@2.520503e+02
-CID25092=1@1@0@5@4.442087e+00
-CID25093=0@1@0@5@1.361366e+00
-CID25094=0@1@0@6@2.461348e+00
-CID25095=0@1@0@6@2.407567e+00
-CID25096=0@1@0@6@5.117905e-01
-CID25097=0@1@1@4@Leica circ.prism
-CID25098=0@1@1@0@0
-CID25099=0@1@1@4@-0130+034
-CID25100=0@0@0@4@0001+000
-CID25101=0@1@1@1@-1.304666e+02
-CID25102=0@1@1@1@8.729142e+00
-CID25103=0@1@1@1@-1.391957e+02
-CID25104=1@1@1@4@A:\GSI\1111.GSI
-CID25105=1@1@1@4@A:\GSI\DEV_1-13.GSI
-CID25106=1@1@1@4@A:\GSI\DEV_1-13.GSI
-CID25107=1@1@1@4@A:\CODE\BORIS
-CID25108=1@1@1@4@A:\CODE\BORIS
-CID25109=0@1@0@3@0
-CID25110=1@1@1@3@3
-CID25111=0@1@1@3@0
-CID25112=0@1@1@3@0
-CID25113=1@1@1@4@MPR44
-CID25114=1@1@0@4@
-CID25115=1@1@0@4@
-CID25116=1@1@1@1@4.400000e-03
-CID25117=1@1@0@1@0.000000e+00
-CID25118=1@1@0@1@0.000000e+00
-CID25119=1@1@1@3@1
-CID25120=1@1@1@3@0
-CID25121=1@1@1@4@P08
-CID25122=1@1@1@3@1
-CID25123=1@1@0@0@0
-CID25124=1@1@1@0@0
-CID25125=1@1@1@3@0
-CID25126=1@1@1@3@1
-CID25127=1@1@1@3@1
-CID25128=1@1@1@3@1
-CID25129=1@1@1@3@2
-CID25130=1@1@1@3@0
-CID25131=1@1@1@0@0
-CID25132=1@1@1@4@TXT
-CID25133=1@1@1@4@GSI
-CID25134=0@1@1@3@3
-CID25135=1@1@1@3@1
-CID25136=1@1@1@3@1
-CID25137=1@1@1@3@1
-CID25138=1@1@1@3@0
-CID25139=1@1@1@3@0
-CID25140=1@0@1@3@1
-CID25141=1@1@1@1@5.235988e-01
-CID25142=1@1@1@1@2.617994e-01
-CID25143=1@1@1@3@1
-CID25144=1@1@1@3@0
-
-[RecMask]
-CID7000=Station 16@1@1@6@6000@6026@6027@6028@6030@6029
-CID7001=Polar (16)@1@1@12@6000@6005@6006@6007@6008@6030@6012@6009@6023@6024@6025@6004
-CID7002=Cartesian (8)@0@1@6@6000@6023@6024@6025@6030@6012
-CID7003=Polar+Cartes.(8)@0@1@8@6000@6005@6006@6007@6023@6024@6025@6010
-CID7004=COSGEO@1@1@10@6000@6014@6015@6016@6023@6024@6025@6017@6030@6012
-CID7005=Cartesian(8)CODE@0@1@7@6000@6014@6023@6024@6025@6030@6012
-
-[MeasDlgList]
-CID19000_0=SURVEY@1@1@10@25017@25047@25092@25093@25094@25095@25096@25089@25090@25091
-CID19000_1=CODE@1@1@10@25017@25047@25059@25061@25062@25048@25049@25089@25090@25091
-CID19000_2=OFFSET@1@1@10@25017@25047@25070@25071@25072@25073@25109@25089@25090@25091
-

Podatki/formatdrive/FormatDrive/FormatDrive.sln

@@ -1,20 +0,0 @@
-
-Microsoft Visual Studio Solution File, Format Version 11.00
-# Visual Studio 2010
-Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "FormatDrive", "FormatDrive\FormatDrive.vbproj", "{E2CDA2A9-9F42-4074-9DD4-840D974C90B9}"
-EndProject
-Global
-	GlobalSection(SolutionConfigurationPlatforms) = preSolution
-		Debug|x86 = Debug|x86
-		Release|x86 = Release|x86
-	EndGlobalSection
-	GlobalSection(ProjectConfigurationPlatforms) = postSolution
-		{E2CDA2A9-9F42-4074-9DD4-840D974C90B9}.Debug|x86.ActiveCfg = Debug|x86
-		{E2CDA2A9-9F42-4074-9DD4-840D974C90B9}.Debug|x86.Build.0 = Debug|x86
-		{E2CDA2A9-9F42-4074-9DD4-840D974C90B9}.Release|x86.ActiveCfg = Release|x86
-		{E2CDA2A9-9F42-4074-9DD4-840D974C90B9}.Release|x86.Build.0 = Release|x86
-	EndGlobalSection
-	GlobalSection(SolutionProperties) = preSolution
-		HideSolutionNode = FALSE
-	EndGlobalSection
-EndGlobal

Podatki/formatdrive/FormatDrive/FormatDrive/App.config

@@ -1,6 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<configuration>
-    <startup>
-        <supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
-    </startup>
-</configuration>

Podatki/formatdrive/FormatDrive/FormatDrive/Form1.Designer.vb

@@ -1,72 +0,0 @@
-<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()> _
-    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.Label1 = New System.Windows.Forms.Label()
-        Me.ComboBox1 = New System.Windows.Forms.ComboBox()
-        Me.Button1 = New System.Windows.Forms.Button()
-        Me.SuspendLayout()
-        '
-        'Label1
-        '
-        Me.Label1.Location = New System.Drawing.Point(16, 13)
-        Me.Label1.Name = "Label1"
-        Me.Label1.Size = New System.Drawing.Size(230, 30)
-        Me.Label1.TabIndex = 5
-        Me.Label1.Text = "Select the drive you want to FORMAT and click the FORMAT button"
-        '
-        'ComboBox1
-        '
-        Me.ComboBox1.FormattingEnabled = True
-        Me.ComboBox1.Location = New System.Drawing.Point(71, 56)
-        Me.ComboBox1.Name = "ComboBox1"
-        Me.ComboBox1.Size = New System.Drawing.Size(121, 21)
-        Me.ComboBox1.TabIndex = 4
-        '
-        'Button1
-        '
-        Me.Button1.Location = New System.Drawing.Point(90, 83)
-        Me.Button1.Name = "Button1"
-        Me.Button1.Size = New System.Drawing.Size(75, 23)
-        Me.Button1.TabIndex = 3
-        Me.Button1.Text = "Format"
-        Me.Button1.UseVisualStyleBackColor = True
-        '
-        'Form1
-        '
-        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
-        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.ClientSize = New System.Drawing.Size(265, 124)
-        Me.Controls.Add(Me.Label1)
-        Me.Controls.Add(Me.ComboBox1)
-        Me.Controls.Add(Me.Button1)
-        Me.Name = "Form1"
-        Me.Text = "Form1"
-        Me.ResumeLayout(False)
-
-    End Sub
-    Friend WithEvents Label1 As System.Windows.Forms.Label
-    Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox
-    Friend WithEvents Button1 As System.Windows.Forms.Button
-
-End Class

Podatki/formatdrive/FormatDrive/FormatDrive/Form1.resx

@@ -1,120 +0,0 @@
-<?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>

Podatki/formatdrive/FormatDrive/FormatDrive/Form1.vb

@@ -1,31 +0,0 @@
-Public Class Form1
-    Enum FormatType
-        Quick = 0
-        Normal = 1
-    End Enum
-    Enum Capacity
-        DefaultCapcity = 0
-    End Enum
-    Declare Function SHFormatDrive Lib "shell32" (ByVal hwnd As Int32, ByVal sDriveToFormat As String, ByVal s As Capacity, ByVal formattype As FormatType) As Int32
-    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
-        'Show the Format dialog
-        SHFormatDrive(Me.Handle.ToInt32, ComboBox1.Text, CType(2, Capacity), FormatType.Normal)
-    End Sub
-
-
-    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
-        'check if the current user is a member of the administrators
-        If My.User.IsInRole("administrators") = True Then
-            For Each drive In IO.DriveInfo.GetDrives
-                'get all removable and fixed drives
-                If drive.DriveType = IO.DriveType.Removable Or drive.DriveType = IO.DriveType.Fixed Then
-                    'add all found drives into the combobox
-                    ComboBox1.Items.Add(drive)
-                End If
-            Next
-        Else
-            MsgBox("You need administrator access to format a drive", MsgBoxStyle.Critical)
-            End
-        End If
-    End Sub
-End Class

Podatki/formatdrive/FormatDrive/FormatDrive/FormatDrive.vbproj

@@ -1,132 +0,0 @@
-<?xml version="1.0" encoding="utf-8"?>
-<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
-  <PropertyGroup>
-    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
-    <Platform Condition=" '$(Platform)' == '' ">x86</Platform>
-    <ProductVersion>
-    </ProductVersion>
-    <SchemaVersion>2.0</SchemaVersion>
-    <ProjectGuid>{E2CDA2A9-9F42-4074-9DD4-840D974C90B9}</ProjectGuid>
-    <OutputType>WinExe</OutputType>
-    <StartupObject>FormatDrive.My.MyApplication</StartupObject>
-    <RootNamespace>FormatDrive</RootNamespace>
-    <AssemblyName>FormatDrive</AssemblyName>
-    <FileAlignment>512</FileAlignment>
-    <MyType>WindowsForms</MyType>
-    <TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
-    <TargetFrameworkProfile>
-    </TargetFrameworkProfile>
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
-    <PlatformTarget>x86</PlatformTarget>
-    <DebugSymbols>true</DebugSymbols>
-    <DebugType>full</DebugType>
-    <DefineDebug>true</DefineDebug>
-    <DefineTrace>true</DefineTrace>
-    <OutputPath>bin\Debug\</OutputPath>
-    <DocumentationFile>FormatDrive.xml</DocumentationFile>
-    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
-    <Prefer32Bit>false</Prefer32Bit>
-  </PropertyGroup>
-  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
-    <PlatformTarget>x86</PlatformTarget>
-    <DebugType>pdbonly</DebugType>
-    <DefineDebug>false</DefineDebug>
-    <DefineTrace>true</DefineTrace>
-    <Optimize>true</Optimize>
-    <OutputPath>bin\Release\</OutputPath>
-    <DocumentationFile>FormatDrive.xml</DocumentationFile>
-    <NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
-    <Prefer32Bit>false</Prefer32Bit>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionExplicit>On</OptionExplicit>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionCompare>Binary</OptionCompare>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionStrict>Off</OptionStrict>
-  </PropertyGroup>
-  <PropertyGroup>
-    <OptionInfer>On</OptionInfer>
-  </PropertyGroup>
-  <ItemGroup>
-    <Reference Include="System" />
-    <Reference Include="System.Data" />
-    <Reference Include="System.Deployment" />
-    <Reference Include="System.Drawing" />
-    <Reference Include="System.Windows.Forms" />
-    <Reference Include="System.Xml" />
-    <Reference Include="System.Core" />
-    <Reference Include="System.Xml.Linq" />
-    <Reference Include="System.Data.DataSetExtensions" />
-  </ItemGroup>
-  <ItemGroup>
-    <Import Include="Microsoft.VisualBasic" />
-    <Import Include="System" />
-    <Import Include="System.Collections" />
-    <Import Include="System.Collections.Generic" />
-    <Import Include="System.Data" />
-    <Import Include="System.Drawing" />
-    <Import Include="System.Diagnostics" />
-    <Import Include="System.Windows.Forms" />
-    <Import Include="System.Linq" />
-    <Import Include="System.Xml.Linq" />
-  </ItemGroup>
-  <ItemGroup>
-    <Compile Include="Form1.vb">
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="Form1.Designer.vb">
-      <DependentUpon>Form1.vb</DependentUpon>
-      <SubType>Form</SubType>
-    </Compile>
-    <Compile Include="My Project\AssemblyInfo.vb" />
-    <Compile Include="My Project\Application.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DependentUpon>Application.myapp</DependentUpon>
-    </Compile>
-    <Compile Include="My Project\Resources.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DesignTime>True</DesignTime>
-      <DependentUpon>Resources.resx</DependentUpon>
-    </Compile>
-    <Compile Include="My Project\Settings.Designer.vb">
-      <AutoGen>True</AutoGen>
-      <DependentUpon>Settings.settings</DependentUpon>
-      <DesignTimeSharedInput>True</DesignTimeSharedInput>
-    </Compile>
-  </ItemGroup>
-  <ItemGroup>
-    <EmbeddedResource Include="Form1.resx">
-      <DependentUpon>Form1.vb</DependentUpon>
-    </EmbeddedResource>
-    <EmbeddedResource Include="My Project\Resources.resx">
-      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
-      <LastGenOutput>Resources.Designer.vb</LastGenOutput>
-      <CustomToolNamespace>My.Resources</CustomToolNamespace>
-      <SubType>Designer</SubType>
-    </EmbeddedResource>
-  </ItemGroup>
-  <ItemGroup>
-    <None Include="App.config" />
-    <None Include="My Project\Application.myapp">
-      <Generator>MyApplicationCodeGenerator</Generator>
-      <LastGenOutput>Application.Designer.vb</LastGenOutput>
-    </None>
-    <None Include="My Project\Settings.settings">
-      <Generator>SettingsSingleFileGenerator</Generator>
-      <CustomToolNamespace>My</CustomToolNamespace>
-      <LastGenOutput>Settings.Designer.vb</LastGenOutput>
-    </None>
-  </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.
-  <Target Name="BeforeBuild">
-  </Target>
-  <Target Name="AfterBuild">
-  </Target>
-  -->
-</Project>

Podatki/formatdrive/FormatDrive/FormatDrive/My Project/Application.Designer.vb

@@ -1,44 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-    
-    'NOTE: This file is auto-generated; do not modify it directly.  To make changes,
-    ' or if you encounter build errors in this file, go to the Project Designer
-    ' (go to Project Properties or double-click the My Project node in
-    ' Solution Explorer), and make changes on the Application tab.
-    '
-    Partial Friend Class MyApplication
-        
-        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
-        Public Sub New()
-            MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
-            Me.IsSingleInstance = false
-            Me.EnableVisualStyles = true
-            Me.SaveMySettingsOnExit = true
-            Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
-        End Sub
-        
-        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
-        Protected Overrides Sub OnCreateMainForm()
-            Me.MainForm = Global.FormatDrive.Form1
-        End Sub
-        
-        <Global.System.Diagnostics.DebuggerStepThroughAttribute()>  _
-        Protected Overrides Function OnInitialize(ByVal commandLineArgs As System.Collections.ObjectModel.ReadOnlyCollection(Of String)) As Boolean
-            Me.MinimumSplashScreenDisplayTime = 0
-            Return MyBase.OnInitialize(commandLineArgs)
-        End Function
-    End Class
-End Namespace

Podatki/formatdrive/FormatDrive/FormatDrive/My Project/Application.myapp

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

Podatki/formatdrive/FormatDrive/FormatDrive/My Project/AssemblyInfo.vb

@@ -1,35 +0,0 @@
-Imports System
-Imports System.Reflection
-Imports System.Runtime.InteropServices
-
-' General Information about an assembly is controlled through the following 
-' set of attributes. Change these attribute values to modify the information
-' associated with an assembly.
-
-' Review the values of the assembly attributes
-
-<Assembly: AssemblyTitle("FormatDrive")> 
-<Assembly: AssemblyDescription("")> 
-<Assembly: AssemblyCompany("")> 
-<Assembly: AssemblyProduct("FormatDrive")> 
-<Assembly: AssemblyCopyright("Copyright ©  2015")> 
-<Assembly: AssemblyTrademark("")> 
-
-<Assembly: ComVisible(False)>
-
-'The following GUID is for the ID of the typelib if this project is exposed to COM
-<Assembly: Guid("3e244846-2b50-4806-a47c-5429b320c2f9")> 
-
-' Version information for an assembly consists of the following four values:
-'
-'      Major Version
-'      Minor Version 
-'      Build Number
-'      Revision
-'
-' You can specify all the values or you can default the Build and Revision Numbers 
-' by using the '*' as shown below:
-' <Assembly: AssemblyVersion("1.0.*")> 
-
-<Assembly: AssemblyVersion("1.0.0.0")> 
-<Assembly: AssemblyFileVersion("1.0.0.0")> 

Podatki/formatdrive/FormatDrive/FormatDrive/My Project/Resources.Designer.vb

@@ -1,63 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-Imports System
-
-Namespace My.Resources
-    
-    'This class was auto-generated by the StronglyTypedResourceBuilder
-    'class via a tool like ResGen or Visual Studio.
-    'To add or remove a member, edit your .ResX file then rerun ResGen
-    'with the /str option, or rebuild your VS project.
-    '''<summary>
-    '''  A strongly-typed resource class, for looking up localized strings, etc.
-    '''</summary>
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "17.0.0.0"),  _
-     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
-     Global.Microsoft.VisualBasic.HideModuleNameAttribute()>  _
-    Friend Module Resources
-        
-        Private resourceMan As Global.System.Resources.ResourceManager
-        
-        Private resourceCulture As Global.System.Globalization.CultureInfo
-        
-        '''<summary>
-        '''  Returns the cached ResourceManager instance used by this class.
-        '''</summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
-        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
-            Get
-                If Object.ReferenceEquals(resourceMan, Nothing) Then
-                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("FormatDrive.Resources", GetType(Resources).Assembly)
-                    resourceMan = temp
-                End If
-                Return resourceMan
-            End Get
-        End Property
-        
-        '''<summary>
-        '''  Overrides the current thread's CurrentUICulture property for all
-        '''  resource lookups using this strongly typed resource class.
-        '''</summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
-        Friend Property Culture() As Global.System.Globalization.CultureInfo
-            Get
-                Return resourceCulture
-            End Get
-            Set
-                resourceCulture = value
-            End Set
-        End Property
-    End Module
-End Namespace

Podatki/formatdrive/FormatDrive/FormatDrive/My Project/Resources.resx

@@ -1,117 +0,0 @@
-<?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.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: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" type="xsd:string" />
-              <xsd:attribute name="type" type="xsd:string" />
-              <xsd:attribute name="mimetype" type="xsd:string" />
-            </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" msdata:Ordinal="1" />
-              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
-              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
-            </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=2.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>
-  </resheader>
-</root>

Podatki/formatdrive/FormatDrive/FormatDrive/My Project/Settings.Designer.vb

@@ -1,73 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.42000
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Option Strict On
-Option Explicit On
-
-
-Namespace My
-    
-    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
-     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
-        
-        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
-        
-#Region "My.Settings Auto-Save Functionality"
-#If _MyType = "WindowsForms" Then
-    Private Shared addedHandler As Boolean
-
-    Private Shared addedHandlerLockObject As New Object
-
-    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-    Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
-        If My.Application.SaveMySettingsOnExit Then
-            My.Settings.Save()
-        End If
-    End Sub
-#End If
-#End Region
-        
-        Public Shared ReadOnly Property [Default]() As MySettings
-            Get
-                
-#If _MyType = "WindowsForms" Then
-               If Not addedHandler Then
-                    SyncLock addedHandlerLockObject
-                        If Not addedHandler Then
-                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
-                            addedHandler = True
-                        End If
-                    End SyncLock
-                End If
-#End If
-                Return defaultInstance
-            End Get
-        End Property
-    End Class
-End Namespace
-
-Namespace My
-    
-    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
-     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
-     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
-    Friend Module MySettingsProperty
-        
-        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
-        Friend ReadOnly Property Settings() As Global.FormatDrive.My.MySettings
-            Get
-                Return Global.FormatDrive.My.MySettings.Default
-            End Get
-        End Property
-    End Module
-End Namespace

Podatki/formatdrive/FormatDrive/FormatDrive/My Project/Settings.settings

@@ -1,7 +0,0 @@
-<?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>

SplashScreen1.vb

@@ -40,7 +40,7 @@ Public NotInheritable Class SplashScreen1
     End Sub
 
     Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
-        Dim webAddress As String = "https://2bgeo.si/"
+        Dim webAddress As String = "https://multibox.nohost.me/website/index.php?SMExt=SMPages&SMPagesId=bd7c44583bb2b19ee6830ac6b0be3271"
         Process.Start(webAddress)
     End Sub
 

TPS1100 Convert.vbproj

@@ -134,6 +134,12 @@
     <Compile Include="DialogJobOdpri.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="DialogKartica.Designer.vb">
+      <DependentUpon>DialogKartica.vb</DependentUpon>
+    </Compile>
+    <Compile Include="DialogKartica.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="DialogNovProj.Designer.vb">
       <DependentUpon>DialogNovProj.vb</DependentUpon>
     </Compile>
@@ -146,6 +152,12 @@
     <Compile Include="DialogPripravaKartice.vb">
       <SubType>Form</SubType>
     </Compile>
+    <Compile Include="DialogProjektUvoz.Designer.vb">
+      <DependentUpon>DialogProjektUvoz.vb</DependentUpon>
+    </Compile>
+    <Compile Include="DialogProjektUvoz.vb">
+      <SubType>Form</SubType>
+    </Compile>
     <Compile Include="DialogZavarovanje.Designer.vb">
       <DependentUpon>DialogZavarovanje.vb</DependentUpon>
     </Compile>
@@ -232,12 +244,18 @@
     <EmbeddedResource Include="DialogJobOdpri.resx">
       <DependentUpon>DialogJobOdpri.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="DialogKartica.resx">
+      <DependentUpon>DialogKartica.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="DialogNovProj.resx">
       <DependentUpon>DialogNovProj.vb</DependentUpon>
     </EmbeddedResource>
     <EmbeddedResource Include="DialogPripravaKartice.resx">
       <DependentUpon>DialogPripravaKartice.vb</DependentUpon>
     </EmbeddedResource>
+    <EmbeddedResource Include="DialogProjektUvoz.resx">
+      <DependentUpon>DialogProjektUvoz.vb</DependentUpon>
+    </EmbeddedResource>
     <EmbeddedResource Include="DialogZavarovanje.resx">
       <DependentUpon>DialogZavarovanje.vb</DependentUpon>
     </EmbeddedResource>
@@ -332,6 +350,17 @@
     <None Include="My Project\Icons\icons8-remove-24.png" />
     <None Include="My Project\Icons\icons8-remove-50.png" />
     <None Include="My Project\Icons\icons8-add-to-collection-50.png" />
+    <None Include="My Project\Icons\icons8-print-48.png" />
+    <None Include="My Project\Icons\icons8-print-48_1.png" />
+    <None Include="My Project\Icons\icons8-print-94.png" />
+    <None Include="My Project\Icons\icons8-sd-import-50.png" />
+    <None Include="My Project\Icons\icons8-sd-import2-50.png" />
+    <None Include="My Project\Icons\icons8-sdb-50.png" />
+    <None Include="My Project\Icons\icons8-sdb-import-50.png" />
+    <None Include="My Project\Icons\icons8-day-view-40.png" />
+    <None Include="My Project\Icons\icons8-table-48.png" />
+    <None Include="My Project\Icons\icons8-rename-24.png" />
+    <None Include="My Project\Icons\icons8-rename-20.png" />
     <Content Include="tps1100_projekti.txt">
       <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
     </Content>
@@ -382,6 +411,12 @@
     <AdditionalFiles Include="Virtualna Kartica\TPS\CONF\1102_BB.PAR">
       <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
     </AdditionalFiles>
+    <AdditionalFiles Include="Virtualna Kartica\DATA\GPS\GEOID\SLO1.gem">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </AdditionalFiles>
+    <AdditionalFiles Include="Virtualna Kartica\DATA\GPS\GEOID\SLOG2000.GEM">
+      <CopyToOutputDirectory>PreserveNewest</CopyToOutputDirectory>
+    </AdditionalFiles>
   </ItemGroup>
   <ItemGroup>
     <None Include="Icons\icons8-ok-50.png" />
@@ -486,7 +521,6 @@
     <WCFMetadata Include="Connected Services\" />
   </ItemGroup>
   <ItemGroup>
-    <Folder Include="Podatki\" />
     <Folder Include="Resources\" />
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />

version.txt

@@ -1 +1 @@
-2.8.0.1
+2.8.0.2