init commit
This commit is contained in:
parent
b5ddb77a54
commit
5167aa05cf
63
.gitattributes
vendored
Normal file
63
.gitattributes
vendored
Normal file
|
|
@ -0,0 +1,63 @@
|
|||
###############################################################################
|
||||
# Set default behavior to automatically normalize line endings.
|
||||
###############################################################################
|
||||
* text=auto
|
||||
|
||||
###############################################################################
|
||||
# Set default behavior for command prompt diff.
|
||||
#
|
||||
# This is need for earlier builds of msysgit that does not have it on by
|
||||
# default for csharp files.
|
||||
# Note: This is only used by command line
|
||||
###############################################################################
|
||||
#*.cs diff=csharp
|
||||
|
||||
###############################################################################
|
||||
# Set the merge driver for project and solution files
|
||||
#
|
||||
# Merging from the command prompt will add diff markers to the files if there
|
||||
# are conflicts (Merging from VS is not affected by the settings below, in VS
|
||||
# the diff markers are never inserted). Diff markers may cause the following
|
||||
# file extensions to fail to load in VS. An alternative would be to treat
|
||||
# these files as binary and thus will always conflict and require user
|
||||
# intervention with every merge. To do so, just uncomment the entries below
|
||||
###############################################################################
|
||||
#*.sln merge=binary
|
||||
#*.csproj merge=binary
|
||||
#*.vbproj merge=binary
|
||||
#*.vcxproj merge=binary
|
||||
#*.vcproj merge=binary
|
||||
#*.dbproj merge=binary
|
||||
#*.fsproj merge=binary
|
||||
#*.lsproj merge=binary
|
||||
#*.wixproj merge=binary
|
||||
#*.modelproj merge=binary
|
||||
#*.sqlproj merge=binary
|
||||
#*.wwaproj merge=binary
|
||||
|
||||
###############################################################################
|
||||
# behavior for image files
|
||||
#
|
||||
# image files are treated as binary by default.
|
||||
###############################################################################
|
||||
#*.jpg binary
|
||||
#*.png binary
|
||||
#*.gif binary
|
||||
|
||||
###############################################################################
|
||||
# diff behavior for common document formats
|
||||
#
|
||||
# Convert binary document formats to text before diffing them. This feature
|
||||
# is only available from the command line. Turn it on by uncommenting the
|
||||
# entries below.
|
||||
###############################################################################
|
||||
#*.doc diff=astextplain
|
||||
#*.DOC diff=astextplain
|
||||
#*.docx diff=astextplain
|
||||
#*.DOCX diff=astextplain
|
||||
#*.dot diff=astextplain
|
||||
#*.DOT diff=astextplain
|
||||
#*.pdf diff=astextplain
|
||||
#*.PDF diff=astextplain
|
||||
#*.rtf diff=astextplain
|
||||
#*.RTF diff=astextplain
|
||||
363
.gitignore
vendored
Normal file
363
.gitignore
vendored
Normal file
|
|
@ -0,0 +1,363 @@
|
|||
## Ignore Visual Studio temporary files, build results, and
|
||||
## files generated by popular Visual Studio add-ons.
|
||||
##
|
||||
## Get latest from https://github.com/github/gitignore/blob/master/VisualStudio.gitignore
|
||||
|
||||
# User-specific files
|
||||
*.rsuser
|
||||
*.suo
|
||||
*.user
|
||||
*.userosscache
|
||||
*.sln.docstates
|
||||
|
||||
# User-specific files (MonoDevelop/Xamarin Studio)
|
||||
*.userprefs
|
||||
|
||||
# Mono auto generated files
|
||||
mono_crash.*
|
||||
|
||||
# Build results
|
||||
[Dd]ebug/
|
||||
[Dd]ebugPublic/
|
||||
[Rr]elease/
|
||||
[Rr]eleases/
|
||||
x64/
|
||||
x86/
|
||||
[Ww][Ii][Nn]32/
|
||||
[Aa][Rr][Mm]/
|
||||
[Aa][Rr][Mm]64/
|
||||
bld/
|
||||
[Bb]in/
|
||||
[Oo]bj/
|
||||
[Oo]ut/
|
||||
[Ll]og/
|
||||
[Ll]ogs/
|
||||
|
||||
# Visual Studio 2015/2017 cache/options directory
|
||||
.vs/
|
||||
# Uncomment if you have tasks that create the project's static files in wwwroot
|
||||
#wwwroot/
|
||||
|
||||
# Visual Studio 2017 auto generated files
|
||||
Generated\ Files/
|
||||
|
||||
# MSTest test Results
|
||||
[Tt]est[Rr]esult*/
|
||||
[Bb]uild[Ll]og.*
|
||||
|
||||
# NUnit
|
||||
*.VisualState.xml
|
||||
TestResult.xml
|
||||
nunit-*.xml
|
||||
|
||||
# Build Results of an ATL Project
|
||||
[Dd]ebugPS/
|
||||
[Rr]eleasePS/
|
||||
dlldata.c
|
||||
|
||||
# Benchmark Results
|
||||
BenchmarkDotNet.Artifacts/
|
||||
|
||||
# .NET Core
|
||||
project.lock.json
|
||||
project.fragment.lock.json
|
||||
artifacts/
|
||||
|
||||
# ASP.NET Scaffolding
|
||||
ScaffoldingReadMe.txt
|
||||
|
||||
# StyleCop
|
||||
StyleCopReport.xml
|
||||
|
||||
# Files built by Visual Studio
|
||||
*_i.c
|
||||
*_p.c
|
||||
*_h.h
|
||||
*.ilk
|
||||
*.meta
|
||||
*.obj
|
||||
*.iobj
|
||||
*.pch
|
||||
*.pdb
|
||||
*.ipdb
|
||||
*.pgc
|
||||
*.pgd
|
||||
*.rsp
|
||||
*.sbr
|
||||
*.tlb
|
||||
*.tli
|
||||
*.tlh
|
||||
*.tmp
|
||||
*.tmp_proj
|
||||
*_wpftmp.csproj
|
||||
*.log
|
||||
*.vspscc
|
||||
*.vssscc
|
||||
.builds
|
||||
*.pidb
|
||||
*.svclog
|
||||
*.scc
|
||||
|
||||
# Chutzpah Test files
|
||||
_Chutzpah*
|
||||
|
||||
# Visual C++ cache files
|
||||
ipch/
|
||||
*.aps
|
||||
*.ncb
|
||||
*.opendb
|
||||
*.opensdf
|
||||
*.sdf
|
||||
*.cachefile
|
||||
*.VC.db
|
||||
*.VC.VC.opendb
|
||||
|
||||
# Visual Studio profiler
|
||||
*.psess
|
||||
*.vsp
|
||||
*.vspx
|
||||
*.sap
|
||||
|
||||
# Visual Studio Trace Files
|
||||
*.e2e
|
||||
|
||||
# TFS 2012 Local Workspace
|
||||
$tf/
|
||||
|
||||
# Guidance Automation Toolkit
|
||||
*.gpState
|
||||
|
||||
# ReSharper is a .NET coding add-in
|
||||
_ReSharper*/
|
||||
*.[Rr]e[Ss]harper
|
||||
*.DotSettings.user
|
||||
|
||||
# TeamCity is a build add-in
|
||||
_TeamCity*
|
||||
|
||||
# DotCover is a Code Coverage Tool
|
||||
*.dotCover
|
||||
|
||||
# AxoCover is a Code Coverage Tool
|
||||
.axoCover/*
|
||||
!.axoCover/settings.json
|
||||
|
||||
# Coverlet is a free, cross platform Code Coverage Tool
|
||||
coverage*.json
|
||||
coverage*.xml
|
||||
coverage*.info
|
||||
|
||||
# Visual Studio code coverage results
|
||||
*.coverage
|
||||
*.coveragexml
|
||||
|
||||
# NCrunch
|
||||
_NCrunch_*
|
||||
.*crunch*.local.xml
|
||||
nCrunchTemp_*
|
||||
|
||||
# MightyMoose
|
||||
*.mm.*
|
||||
AutoTest.Net/
|
||||
|
||||
# Web workbench (sass)
|
||||
.sass-cache/
|
||||
|
||||
# Installshield output folder
|
||||
[Ee]xpress/
|
||||
|
||||
# DocProject is a documentation generator add-in
|
||||
DocProject/buildhelp/
|
||||
DocProject/Help/*.HxT
|
||||
DocProject/Help/*.HxC
|
||||
DocProject/Help/*.hhc
|
||||
DocProject/Help/*.hhk
|
||||
DocProject/Help/*.hhp
|
||||
DocProject/Help/Html2
|
||||
DocProject/Help/html
|
||||
|
||||
# Click-Once directory
|
||||
publish/
|
||||
|
||||
# Publish Web Output
|
||||
*.[Pp]ublish.xml
|
||||
*.azurePubxml
|
||||
# Note: Comment the next line if you want to checkin your web deploy settings,
|
||||
# but database connection strings (with potential passwords) will be unencrypted
|
||||
*.pubxml
|
||||
*.publishproj
|
||||
|
||||
# Microsoft Azure Web App publish settings. Comment the next line if you want to
|
||||
# checkin your Azure Web App publish settings, but sensitive information contained
|
||||
# in these scripts will be unencrypted
|
||||
PublishScripts/
|
||||
|
||||
# NuGet Packages
|
||||
*.nupkg
|
||||
# NuGet Symbol Packages
|
||||
*.snupkg
|
||||
# The packages folder can be ignored because of Package Restore
|
||||
**/[Pp]ackages/*
|
||||
# except build/, which is used as an MSBuild target.
|
||||
!**/[Pp]ackages/build/
|
||||
# Uncomment if necessary however generally it will be regenerated when needed
|
||||
#!**/[Pp]ackages/repositories.config
|
||||
# NuGet v3's project.json files produces more ignorable files
|
||||
*.nuget.props
|
||||
*.nuget.targets
|
||||
|
||||
# Microsoft Azure Build Output
|
||||
csx/
|
||||
*.build.csdef
|
||||
|
||||
# Microsoft Azure Emulator
|
||||
ecf/
|
||||
rcf/
|
||||
|
||||
# Windows Store app package directories and files
|
||||
AppPackages/
|
||||
BundleArtifacts/
|
||||
Package.StoreAssociation.xml
|
||||
_pkginfo.txt
|
||||
*.appx
|
||||
*.appxbundle
|
||||
*.appxupload
|
||||
|
||||
# Visual Studio cache files
|
||||
# files ending in .cache can be ignored
|
||||
*.[Cc]ache
|
||||
# but keep track of directories ending in .cache
|
||||
!?*.[Cc]ache/
|
||||
|
||||
# Others
|
||||
ClientBin/
|
||||
~$*
|
||||
*~
|
||||
*.dbmdl
|
||||
*.dbproj.schemaview
|
||||
*.jfm
|
||||
*.pfx
|
||||
*.publishsettings
|
||||
orleans.codegen.cs
|
||||
|
||||
# Including strong name files can present a security risk
|
||||
# (https://github.com/github/gitignore/pull/2483#issue-259490424)
|
||||
#*.snk
|
||||
|
||||
# Since there are multiple workflows, uncomment next line to ignore bower_components
|
||||
# (https://github.com/github/gitignore/pull/1529#issuecomment-104372622)
|
||||
#bower_components/
|
||||
|
||||
# RIA/Silverlight projects
|
||||
Generated_Code/
|
||||
|
||||
# Backup & report files from converting an old project file
|
||||
# to a newer Visual Studio version. Backup files are not needed,
|
||||
# because we have git ;-)
|
||||
_UpgradeReport_Files/
|
||||
Backup*/
|
||||
UpgradeLog*.XML
|
||||
UpgradeLog*.htm
|
||||
ServiceFabricBackup/
|
||||
*.rptproj.bak
|
||||
|
||||
# SQL Server files
|
||||
*.mdf
|
||||
*.ldf
|
||||
*.ndf
|
||||
|
||||
# Business Intelligence projects
|
||||
*.rdl.data
|
||||
*.bim.layout
|
||||
*.bim_*.settings
|
||||
*.rptproj.rsuser
|
||||
*- [Bb]ackup.rdl
|
||||
*- [Bb]ackup ([0-9]).rdl
|
||||
*- [Bb]ackup ([0-9][0-9]).rdl
|
||||
|
||||
# Microsoft Fakes
|
||||
FakesAssemblies/
|
||||
|
||||
# GhostDoc plugin setting file
|
||||
*.GhostDoc.xml
|
||||
|
||||
# Node.js Tools for Visual Studio
|
||||
.ntvs_analysis.dat
|
||||
node_modules/
|
||||
|
||||
# Visual Studio 6 build log
|
||||
*.plg
|
||||
|
||||
# Visual Studio 6 workspace options file
|
||||
*.opt
|
||||
|
||||
# Visual Studio 6 auto-generated workspace file (contains which files were open etc.)
|
||||
*.vbw
|
||||
|
||||
# Visual Studio LightSwitch build output
|
||||
**/*.HTMLClient/GeneratedArtifacts
|
||||
**/*.DesktopClient/GeneratedArtifacts
|
||||
**/*.DesktopClient/ModelManifest.xml
|
||||
**/*.Server/GeneratedArtifacts
|
||||
**/*.Server/ModelManifest.xml
|
||||
_Pvt_Extensions
|
||||
|
||||
# Paket dependency manager
|
||||
.paket/paket.exe
|
||||
paket-files/
|
||||
|
||||
# FAKE - F# Make
|
||||
.fake/
|
||||
|
||||
# CodeRush personal settings
|
||||
.cr/personal
|
||||
|
||||
# Python Tools for Visual Studio (PTVS)
|
||||
__pycache__/
|
||||
*.pyc
|
||||
|
||||
# Cake - Uncomment if you are using it
|
||||
# tools/**
|
||||
# !tools/packages.config
|
||||
|
||||
# Tabs Studio
|
||||
*.tss
|
||||
|
||||
# Telerik's JustMock configuration file
|
||||
*.jmconfig
|
||||
|
||||
# BizTalk build output
|
||||
*.btp.cs
|
||||
*.btm.cs
|
||||
*.odx.cs
|
||||
*.xsd.cs
|
||||
|
||||
# OpenCover UI analysis results
|
||||
OpenCover/
|
||||
|
||||
# Azure Stream Analytics local run output
|
||||
ASALocalRun/
|
||||
|
||||
# MSBuild Binary and Structured Log
|
||||
*.binlog
|
||||
|
||||
# NVidia Nsight GPU debugger configuration file
|
||||
*.nvuser
|
||||
|
||||
# MFractors (Xamarin productivity tool) working folder
|
||||
.mfractor/
|
||||
|
||||
# Local History for Visual Studio
|
||||
.localhistory/
|
||||
|
||||
# BeatPulse healthcheck temp database
|
||||
healthchecksdb
|
||||
|
||||
# Backup folder for Package Reference Convert tool in Visual Studio 2017
|
||||
MigrationBackup/
|
||||
|
||||
# Ionide (cross platform F# VS Code tools) working folder
|
||||
.ionide/
|
||||
|
||||
# Fody - auto-generated XML schema
|
||||
FodyWeavers.xsd
|
||||
6
App.config
Normal file
6
App.config
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<configuration>
|
||||
<startup>
|
||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.8"/>
|
||||
</startup>
|
||||
</configuration>
|
||||
BIN
Circled-Right-2-24.png
Normal file
BIN
Circled-Right-2-24.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 903 B |
BIN
Fine-Print-24.png
Normal file
BIN
Fine-Print-24.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 720 B |
263
Form1.Designer.vb
generated
Normal file
263
Form1.Designer.vb
generated
Normal file
|
|
@ -0,0 +1,263 @@
|
|||
<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()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
|
||||
Me.RichTextBox1 = New System.Windows.Forms.RichTextBox()
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.ToolStripStatusLabel2 = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
|
||||
Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog()
|
||||
Me.tsbOpenFile = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.tsbFileName = New System.Windows.Forms.ToolStripTextBox()
|
||||
Me.tsbConvert = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.tsbSaveAs = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.tsbPointsOnly = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripComboBox2 = New System.Windows.Forms.ToolStripComboBox()
|
||||
Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.ToolStripComboBox1 = New System.Windows.Forms.ToolStripComboBox()
|
||||
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.tsbHelp = New System.Windows.Forms.ToolStripButton()
|
||||
Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator()
|
||||
Me.StatusStrip1.SuspendLayout()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'RichTextBox1
|
||||
'
|
||||
Me.RichTextBox1.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.RichTextBox1.BackColor = System.Drawing.SystemColors.ControlLightLight
|
||||
Me.RichTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.RichTextBox1.Font = New System.Drawing.Font("Courier New", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
|
||||
Me.RichTextBox1.Location = New System.Drawing.Point(0, 29)
|
||||
Me.RichTextBox1.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.RichTextBox1.Name = "RichTextBox1"
|
||||
Me.RichTextBox1.ReadOnly = True
|
||||
Me.RichTextBox1.Size = New System.Drawing.Size(1251, 690)
|
||||
Me.RichTextBox1.TabIndex = 1
|
||||
Me.RichTextBox1.Text = ""
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel1, Me.ToolStripStatusLabel2})
|
||||
Me.StatusStrip1.Location = New System.Drawing.Point(0, 719)
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
Me.StatusStrip1.Size = New System.Drawing.Size(1251, 22)
|
||||
Me.StatusStrip1.TabIndex = 2
|
||||
Me.StatusStrip1.Text = "StatusStrip1"
|
||||
'
|
||||
'ToolStripStatusLabel1
|
||||
'
|
||||
Me.ToolStripStatusLabel1.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
|
||||
Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
|
||||
Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(99, 17)
|
||||
Me.ToolStripStatusLabel1.Text = "Made by Boris Bilc"
|
||||
'
|
||||
'ToolStripStatusLabel2
|
||||
'
|
||||
Me.ToolStripStatusLabel2.Name = "ToolStripStatusLabel2"
|
||||
Me.ToolStripStatusLabel2.Size = New System.Drawing.Size(0, 17)
|
||||
'
|
||||
'OpenFileDialog1
|
||||
'
|
||||
Me.OpenFileDialog1.DefaultExt = "*.GSI"
|
||||
Me.OpenFileDialog1.Filter = "GSI Files|*.GSI"
|
||||
'
|
||||
'SaveFileDialog1
|
||||
'
|
||||
Me.SaveFileDialog1.DefaultExt = "*.txt"
|
||||
Me.SaveFileDialog1.Title = "Save As..."
|
||||
'
|
||||
'tsbOpenFile
|
||||
'
|
||||
Me.tsbOpenFile.Image = CType(resources.GetObject("tsbOpenFile.Image"), System.Drawing.Image)
|
||||
Me.tsbOpenFile.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsbOpenFile.Name = "tsbOpenFile"
|
||||
Me.tsbOpenFile.Size = New System.Drawing.Size(83, 26)
|
||||
Me.tsbOpenFile.Text = "Odpri GSI"
|
||||
Me.tsbOpenFile.ToolTipText = "Open File..."
|
||||
'
|
||||
'ToolStripSeparator1
|
||||
'
|
||||
Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
|
||||
Me.ToolStripSeparator1.Size = New System.Drawing.Size(6, 29)
|
||||
'
|
||||
'tsbFileName
|
||||
'
|
||||
Me.tsbFileName.AutoSize = False
|
||||
Me.tsbFileName.Font = New System.Drawing.Font("Segoe UI", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
|
||||
Me.tsbFileName.Name = "tsbFileName"
|
||||
Me.tsbFileName.ReadOnly = True
|
||||
Me.tsbFileName.Size = New System.Drawing.Size(160, 23)
|
||||
Me.tsbFileName.Text = "Odpri GSI datoteko..."
|
||||
'
|
||||
'tsbConvert
|
||||
'
|
||||
Me.tsbConvert.Enabled = False
|
||||
Me.tsbConvert.Image = CType(resources.GetObject("tsbConvert.Image"), System.Drawing.Image)
|
||||
Me.tsbConvert.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsbConvert.Name = "tsbConvert"
|
||||
Me.tsbConvert.Size = New System.Drawing.Size(77, 26)
|
||||
Me.tsbConvert.Text = "Poročilo"
|
||||
Me.tsbConvert.ToolTipText = "Convert"
|
||||
'
|
||||
'ToolStripSeparator2
|
||||
'
|
||||
Me.ToolStripSeparator2.Name = "ToolStripSeparator2"
|
||||
Me.ToolStripSeparator2.Size = New System.Drawing.Size(6, 29)
|
||||
'
|
||||
'tsbSaveAs
|
||||
'
|
||||
Me.tsbSaveAs.Enabled = False
|
||||
Me.tsbSaveAs.Image = CType(resources.GetObject("tsbSaveAs.Image"), System.Drawing.Image)
|
||||
Me.tsbSaveAs.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsbSaveAs.Name = "tsbSaveAs"
|
||||
Me.tsbSaveAs.Size = New System.Drawing.Size(78, 26)
|
||||
Me.tsbSaveAs.Text = "Shrani ..."
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.GripStyle = System.Windows.Forms.ToolStripGripStyle.Hidden
|
||||
Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(22, 22)
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tsbOpenFile, Me.ToolStripSeparator2, Me.tsbFileName, Me.ToolStripSeparator1, Me.tsbConvert, Me.tsbPointsOnly, Me.ToolStripComboBox2, Me.ToolStripLabel2, Me.ToolStripComboBox1, Me.ToolStripLabel1, Me.ToolStripSeparator3, Me.tsbHelp, Me.ToolStripSeparator4, Me.tsbSaveAs})
|
||||
Me.ToolStrip1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.RenderMode = System.Windows.Forms.ToolStripRenderMode.System
|
||||
Me.ToolStrip1.Size = New System.Drawing.Size(1251, 29)
|
||||
Me.ToolStrip1.TabIndex = 0
|
||||
Me.ToolStrip1.Text = "ToolStrip1"
|
||||
'
|
||||
'tsbPointsOnly
|
||||
'
|
||||
Me.tsbPointsOnly.Enabled = False
|
||||
Me.tsbPointsOnly.Image = CType(resources.GetObject("tsbPointsOnly.Image"), System.Drawing.Image)
|
||||
Me.tsbPointsOnly.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsbPointsOnly.Name = "tsbPointsOnly"
|
||||
Me.tsbPointsOnly.Size = New System.Drawing.Size(63, 26)
|
||||
Me.tsbPointsOnly.Text = "Točke"
|
||||
Me.tsbPointsOnly.ToolTipText = "Points Only"
|
||||
'
|
||||
'ToolStripComboBox2
|
||||
'
|
||||
Me.ToolStripComboBox2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.ToolStripComboBox2.DropDownWidth = 50
|
||||
Me.ToolStripComboBox2.FlatStyle = System.Windows.Forms.FlatStyle.System
|
||||
Me.ToolStripComboBox2.Items.AddRange(New Object() {"Pika", "Vejica"})
|
||||
Me.ToolStripComboBox2.Name = "ToolStripComboBox2"
|
||||
Me.ToolStripComboBox2.Size = New System.Drawing.Size(75, 29)
|
||||
Me.ToolStripComboBox2.Text = "Pika"
|
||||
'
|
||||
'ToolStripLabel2
|
||||
'
|
||||
Me.ToolStripLabel2.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.ToolStripLabel2.Name = "ToolStripLabel2"
|
||||
Me.ToolStripLabel2.Size = New System.Drawing.Size(56, 26)
|
||||
Me.ToolStripLabel2.Text = "Decimale"
|
||||
'
|
||||
'ToolStripComboBox1
|
||||
'
|
||||
Me.ToolStripComboBox1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.ToolStripComboBox1.FlatStyle = System.Windows.Forms.FlatStyle.System
|
||||
Me.ToolStripComboBox1.Items.AddRange(New Object() {"Da", "Ne"})
|
||||
Me.ToolStripComboBox1.Name = "ToolStripComboBox1"
|
||||
Me.ToolStripComboBox1.Size = New System.Drawing.Size(75, 29)
|
||||
Me.ToolStripComboBox1.Text = "Da"
|
||||
'
|
||||
'ToolStripLabel1
|
||||
'
|
||||
Me.ToolStripLabel1.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.ToolStripLabel1.Image = CType(resources.GetObject("ToolStripLabel1.Image"), System.Drawing.Image)
|
||||
Me.ToolStripLabel1.Name = "ToolStripLabel1"
|
||||
Me.ToolStripLabel1.Size = New System.Drawing.Size(123, 26)
|
||||
Me.ToolStripLabel1.Text = "Uporabi kodiranje"
|
||||
'
|
||||
'ToolStripSeparator3
|
||||
'
|
||||
Me.ToolStripSeparator3.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
|
||||
Me.ToolStripSeparator3.Size = New System.Drawing.Size(6, 29)
|
||||
'
|
||||
'tsbHelp
|
||||
'
|
||||
Me.tsbHelp.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
|
||||
Me.tsbHelp.Image = CType(resources.GetObject("tsbHelp.Image"), System.Drawing.Image)
|
||||
Me.tsbHelp.ImageTransparentColor = System.Drawing.Color.Magenta
|
||||
Me.tsbHelp.Name = "tsbHelp"
|
||||
Me.tsbHelp.Size = New System.Drawing.Size(71, 26)
|
||||
Me.tsbHelp.Text = "Pomoč"
|
||||
'
|
||||
'ToolStripSeparator4
|
||||
'
|
||||
Me.ToolStripSeparator4.Name = "ToolStripSeparator4"
|
||||
Me.ToolStripSeparator4.Size = New System.Drawing.Size(6, 29)
|
||||
'
|
||||
'Form1
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(1251, 741)
|
||||
Me.Controls.Add(Me.StatusStrip1)
|
||||
Me.Controls.Add(Me.RichTextBox1)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(238, Byte))
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.MinimumSize = New System.Drawing.Size(1000, 480)
|
||||
Me.Name = "Form1"
|
||||
Me.Text = "TPS1100 Converter"
|
||||
Me.StatusStrip1.ResumeLayout(False)
|
||||
Me.StatusStrip1.PerformLayout()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents RichTextBox1 As RichTextBox
|
||||
Friend WithEvents StatusStrip1 As StatusStrip
|
||||
Friend WithEvents OpenFileDialog1 As OpenFileDialog
|
||||
Friend WithEvents SaveFileDialog1 As SaveFileDialog
|
||||
Friend WithEvents tsbOpenFile As ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator1 As ToolStripSeparator
|
||||
Friend WithEvents tsbFileName As ToolStripTextBox
|
||||
Friend WithEvents tsbConvert As ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator2 As ToolStripSeparator
|
||||
Friend WithEvents tsbSaveAs As ToolStripButton
|
||||
Friend WithEvents ToolStrip1 As ToolStrip
|
||||
Friend WithEvents ToolStripSeparator3 As ToolStripSeparator
|
||||
Friend WithEvents ToolStripLabel1 As ToolStripLabel
|
||||
Friend WithEvents ToolStripComboBox1 As ToolStripComboBox
|
||||
Friend WithEvents ToolStripLabel2 As ToolStripLabel
|
||||
Friend WithEvents ToolStripComboBox2 As ToolStripComboBox
|
||||
Friend WithEvents ToolStripStatusLabel1 As ToolStripStatusLabel
|
||||
Friend WithEvents ToolStripStatusLabel2 As ToolStripStatusLabel
|
||||
Friend WithEvents tsbPointsOnly As ToolStripButton
|
||||
Friend WithEvents tsbHelp As ToolStripButton
|
||||
Friend WithEvents ToolStripSeparator4 As ToolStripSeparator
|
||||
End Class
|
||||
3306
Form1.resx
Normal file
3306
Form1.resx
Normal file
File diff suppressed because it is too large
Load Diff
382
Form1.vb
Normal file
382
Form1.vb
Normal file
|
|
@ -0,0 +1,382 @@
|
|||
Imports System.IO
|
||||
|
||||
Public Class Form1
|
||||
Private Sub tsbOpenFile_Click(sender As Object, e As EventArgs) Handles tsbOpenFile.Click
|
||||
If OpenFileDialog1.ShowDialog = DialogResult.OK Then
|
||||
tsbFileName.Text = OpenFileDialog1.SafeFileName
|
||||
RichTextBox1.Clear()
|
||||
tsbSaveAs.Text = "Shrani ..."
|
||||
tsbSaveAs.Enabled = False
|
||||
tsbConvert.Enabled = True
|
||||
tsbPointsOnly.Enabled = True
|
||||
Else
|
||||
tsbFileName.Text = "Odpri GSI datoteko..."
|
||||
RichTextBox1.Clear()
|
||||
tsbSaveAs.Text = "Shrani ..."
|
||||
tsbSaveAs.Enabled = False
|
||||
tsbConvert.Enabled = False
|
||||
tsbPointsOnly.Enabled = False
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub tsbConvert_Click(sender As Object, e As EventArgs) Handles tsbConvert.Click
|
||||
RichTextBox1.Clear()
|
||||
RichTextBox1.AppendText("TPS 1100 GSI Conversion" + vbCrLf + "++++++++++++++++++++++++++++++++" + vbCrLf)
|
||||
|
||||
' prepare StreamReader
|
||||
Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
|
||||
Dim i As Integer = 0
|
||||
|
||||
' loop untill end of stream
|
||||
Do Until streamReader.EndOfStream
|
||||
' Read and Split each line to separate it into fields
|
||||
Dim line() As String = streamReader.ReadLine().Split(" ")
|
||||
' Remove * sign from index line
|
||||
line(0) = Replace(line(0), "*", "")
|
||||
|
||||
' Check if it's a new station setup
|
||||
If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
|
||||
RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "*************" + vbCrLf)
|
||||
'RichTextBox1.AppendText("PtName:" + vbTab + "Hz.Corr.:" + vbTab + "StnE:" + vbTab + "StnN:" + vbTab + "StnH:" + vbTab + "Refl.h.: " + vbTab + "Inst.h.: " + vbCrLf)
|
||||
End If
|
||||
|
||||
If Microsoft.VisualBasic.Left(line(1), 2) = "84" Then
|
||||
RichTextBox1.AppendText(vbCrLf + "Station:" + vbCrLf + "*************" + vbCrLf)
|
||||
'RichTextBox1.AppendText("PtName:" + vbTab + "StnE:" + vbTab + "StnN:" + vbTab + "StnH:" + vbTab + "Refl.h.: " + vbTab + "Inst.h.: " + vbCrLf)
|
||||
End If
|
||||
' Seaparate word index and data
|
||||
For Each readLine As String In line
|
||||
If readLine = "" Then
|
||||
' do nothing
|
||||
Else
|
||||
' wordindex is always 6 characters long and is read fron left to right
|
||||
Dim wordIndex As String
|
||||
wordIndex = Microsoft.VisualBasic.Left(readLine, 2)
|
||||
|
||||
' data is always 17 characters long and is read from right to left and has a +/- sign in first place
|
||||
Dim data As String
|
||||
Dim numData As Double
|
||||
data = Microsoft.VisualBasic.Right(readLine, 17)
|
||||
|
||||
If wordIndex = "11" Then
|
||||
data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
ElseIf wordIndex = "19" Then ' Date/Time
|
||||
data = "DateTime= " + Microsoft.VisualBasic.Right(data, 8)
|
||||
ElseIf wordIndex = "21" Then ' Horizontal angle
|
||||
numData = data / 100000
|
||||
data = Format(numData, "0.0000")
|
||||
ElseIf wordIndex = "22" Then ' Vertical angle
|
||||
numData = data / 100000
|
||||
data = Format(numData, "0.0000")
|
||||
ElseIf wordIndex = "25" Then ' Hz. Orientation correction
|
||||
numData = data / 100000
|
||||
data = "HzCor= " + Format(numData, "0.0000")
|
||||
ElseIf wordIndex = "31" Then ' Slope distance
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
ElseIf wordIndex = "32" Then ' Horizontal distance
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
ElseIf wordIndex = "33" Then ' Height difference
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
ElseIf wordIndex = "34" Then ' Stationing
|
||||
numData = data / 1000
|
||||
data = "Station= " + Format(numData, "0.000")
|
||||
ElseIf wordIndex = "35" Then ' Info za offset???
|
||||
numData = data / 1000
|
||||
data = "Offset= " + Format(numData, "0.000")
|
||||
ElseIf wordIndex = "41" Then ' Code
|
||||
'numData = data
|
||||
'data = "Code= " + numData.ToString
|
||||
If ToolStripComboBox1.Text = "Da" Then
|
||||
If data = "+0000000000000010" Then
|
||||
data = vbCrLf + "Setup: Quick Set" + vbCrLf + "============================="
|
||||
End If
|
||||
If data = "+0000000000000020" Then
|
||||
data = vbCrLf + "Setup: Set Hz" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
|
||||
End If
|
||||
If data = "+0000000000000030" Then
|
||||
data = vbCrLf + "Setup: Resection" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
|
||||
End If
|
||||
If data = "+0000000000000040" Then
|
||||
data = vbCrLf + "Setup: Free Station" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
|
||||
End If
|
||||
If data = "+0000000000000050" Then
|
||||
data = vbCrLf + "Setup: Orientation & Ht. transfer" + vbCrLf + "=============================" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
|
||||
End If
|
||||
If data = "+0000000000000090" Then
|
||||
data = vbCrLf + "Measured:" + vbCrLf + "-------------------" + vbCrLf + "PtID HZ V SD HD RefHt PrCon HtDif E N H PtCode"
|
||||
End If
|
||||
If data = "+0000000000000099" Then
|
||||
data = "Imported:" + vbCrLf + "-------------------"
|
||||
End If
|
||||
If data = "+00000000STA_OFFS" Then
|
||||
data = "Offsets: " + vbCrLf
|
||||
End If
|
||||
End If
|
||||
ElseIf wordIndex = "42" Then ' Code: Info 1
|
||||
data = "Info1= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
ElseIf wordIndex = "43" Then ' Code: Info 2
|
||||
data = "Info2= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
ElseIf wordIndex = "44" Then ' Code: Info 3
|
||||
data = "Info3= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
ElseIf wordIndex = "45" Then ' Code: Info 4
|
||||
data = "Info4= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
ElseIf wordIndex = "47" Then ' Code: Info 6
|
||||
data = "Info6= " + Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
ElseIf wordIndex = "58" Then ' Prism constant
|
||||
numData = data / 10000
|
||||
data = numData.ToString
|
||||
ElseIf wordIndex = "71" Then ' Point Code
|
||||
numData = data
|
||||
data = numData.ToString
|
||||
ElseIf wordIndex = "81" Then ' Target Easting
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
ElseIf wordIndex = "82" Then ' Target Northing
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
ElseIf wordIndex = "83" Then ' Target Height
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
ElseIf wordIndex = "84" Then ' Station Easting
|
||||
numData = data / 1000
|
||||
data = "StE= " + Format(numData, "0.000")
|
||||
ElseIf wordIndex = "85" Then ' Station Northing
|
||||
numData = data / 1000
|
||||
data = "StN= " + Format(numData, "0.000")
|
||||
ElseIf wordIndex = "86" Then ' Station Height
|
||||
numData = data / 1000
|
||||
data = "StH= " + Format(numData, "0.000")
|
||||
ElseIf wordIndex = "87" Then ' Reflector height
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
ElseIf wordIndex = "88" Then ' Instriment height
|
||||
numData = data / 1000
|
||||
data = "InstHt= " + Format(numData, "0.000")
|
||||
ElseIf wordIndex = "18" Then ' DATE YY.ss
|
||||
numData = data / 1000000
|
||||
data = "Year.Sec= " + Format(numData, "0.00")
|
||||
Else
|
||||
numData = 0
|
||||
End If
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
If wordIndex IsNot "11" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
End If
|
||||
Next
|
||||
RichTextBox1.AppendText(vbCrLf)
|
||||
Loop
|
||||
ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
|
||||
SaveFileDialog1.Filter = "Zapisnik meritve|*.mer|Text file|*.txt|All files|*.*"
|
||||
streamReader.Close()
|
||||
tsbSaveAs.Enabled = True
|
||||
tsbSaveAs.Text = "Shrani Zapisnik"
|
||||
End Sub
|
||||
|
||||
Private Sub tsbSaveAs_Click(sender As Object, e As EventArgs) Handles tsbSaveAs.Click
|
||||
SaveFileDialog1.FileName = Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
|
||||
If SaveFileDialog1.ShowDialog = DialogResult.OK Then
|
||||
RichTextBox1.SaveFile(SaveFileDialog1.FileName, RichTextBoxStreamType.PlainText)
|
||||
ToolStripStatusLabel1.Text = "Shranjeno: " + SaveFileDialog1.FileName.ToString
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub tsbPointsOnly_Click(sender As Object, e As EventArgs) Handles tsbPointsOnly.Click
|
||||
RichTextBox1.Clear()
|
||||
Dim measuredPoints As Integer = 1
|
||||
Dim newStation As Integer = 0
|
||||
Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
|
||||
Do Until streamReader.EndOfStream
|
||||
' Read and Split each line to separate it into fields
|
||||
Dim line() As String = streamReader.ReadLine().Split(" ")
|
||||
' Remove * sign from index line
|
||||
line(0) = Replace(line(0), "*", "")
|
||||
|
||||
If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
|
||||
measuredPoints = 1
|
||||
End If
|
||||
' Seaparate word index and data
|
||||
For Each readLine As String In line
|
||||
|
||||
If readLine = "" Then
|
||||
' do nothing
|
||||
Else
|
||||
' wordindex is always 6 characters long and is read fron left to right
|
||||
Dim wordIndex As String
|
||||
wordIndex = Microsoft.VisualBasic.Left(readLine, 2)
|
||||
' data is always 17 characters long and is read from right to left and has a +/- sign in first place
|
||||
Dim data As String
|
||||
Dim numData As Double
|
||||
|
||||
data = Microsoft.VisualBasic.Right(readLine, 17)
|
||||
If wordIndex = "41" Then
|
||||
If data = "+00000000STA_OFFS" Then
|
||||
data = "90"
|
||||
End If
|
||||
numData = data
|
||||
If numData >= 90 Then
|
||||
measuredPoints = 1
|
||||
ElseIf numData >= 10 < 90 Then
|
||||
measuredPoints = 0
|
||||
End If
|
||||
End If
|
||||
|
||||
If wordIndex = "11" And measuredPoints = 1 Then
|
||||
data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "81" And measuredPoints = 1 Then ' Target Easting
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "82" And measuredPoints = 1 Then ' Target Northing
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "83" And measuredPoints = 1 Then ' Target Height
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + vbCrLf)
|
||||
ElseIf wordIndex = "84" And measuredPoints = 1 Then ' Station Easting
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "85" And measuredPoints = 1 Then ' Station Northing
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "86" And measuredPoints = 1 Then ' Station Height
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + vbCrLf)
|
||||
Else
|
||||
numData = 0
|
||||
data = ""
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
Loop
|
||||
ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
|
||||
SaveFileDialog1.Filter = "KOO datoteka|*.koo|Text file|*.txt|All files|*.*"
|
||||
streamReader.Close()
|
||||
tsbSaveAs.Enabled = True
|
||||
tsbSaveAs.Text = "Shrani Točke"
|
||||
End Sub
|
||||
|
||||
Private Sub tsbKooConvert_Click(sender As Object, e As EventArgs)
|
||||
RichTextBox1.Clear()
|
||||
Dim measuredPoints As Integer = 0
|
||||
Dim newStation As Integer = 0
|
||||
Dim streamReader As StreamReader = New StreamReader(OpenFileDialog1.FileName)
|
||||
Do Until streamReader.EndOfStream
|
||||
' Read and Split each line to separate it into fields
|
||||
Dim line() As String = streamReader.ReadLine().Split(" ")
|
||||
' Remove * sign from index line
|
||||
line(0) = Replace(line(0), "*", "")
|
||||
|
||||
If Microsoft.VisualBasic.Left(line(1), 2) = "25" Then
|
||||
newStation = 1
|
||||
End If
|
||||
' Seaparate word index and data
|
||||
For Each readLine As String In line
|
||||
|
||||
If readLine = "" Then
|
||||
' do nothing
|
||||
Else
|
||||
' wordindex is always 6 characters long and is read fron left to right
|
||||
Dim wordIndex As String
|
||||
wordIndex = Microsoft.VisualBasic.Left(readLine, 2)
|
||||
' data is always 17 characters long and is read from right to left and has a +/- sign in first place
|
||||
Dim data As String
|
||||
Dim numData As Double
|
||||
|
||||
data = Microsoft.VisualBasic.Right(readLine, 17)
|
||||
|
||||
If wordIndex = "11" Then
|
||||
data = Microsoft.VisualBasic.Right(data, 16).TrimStart("0"c)
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "81" Then ' Target Easting
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "82" Then ' Target Northing
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "83" Then ' Target Height
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + vbCrLf)
|
||||
ElseIf wordIndex = "84" Then ' Station Easting
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "85" Then ' Station Northing
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + " ")
|
||||
ElseIf wordIndex = "86" Then ' Station Height
|
||||
numData = data / 1000
|
||||
data = Format(numData, "0.000")
|
||||
If ToolStripComboBox2.Text = "Pika" Then
|
||||
data = data.ToString.Replace(",", ".")
|
||||
End If
|
||||
RichTextBox1.AppendText(data + vbCrLf)
|
||||
Else
|
||||
numData = 0
|
||||
data = ""
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
Loop
|
||||
ToolStripStatusLabel1.Text = "Konverzija končana. Shrani datoteko!"
|
||||
SaveFileDialog1.Filter = "KOO datoteka|*.koo|Text file|*.txt|All files|*.*"
|
||||
streamReader.Close()
|
||||
tsbSaveAs.Enabled = True
|
||||
tsbSaveAs.Text = "Shrani Točke"
|
||||
End Sub
|
||||
|
||||
Private Sub tsbHelp_Click(sender As Object, e As EventArgs) Handles tsbHelp.Click
|
||||
MessageBox.Show("Za konvertiranje GSI datoteke najprej izberi datoteko, ki jo želiš konvertirati z ukazom 'Open File'. Nato izberi metodo konverzije (Poročilo, Merjene točke, Vse točke). Po končani knverziji shrani novo datoteko z ukazom 'Save As...'",
|
||||
"Kratka navodila")
|
||||
End Sub
|
||||
End Class
|
||||
BIN
ModernXP-41-Settings-icon.png
Normal file
BIN
ModernXP-41-Settings-icon.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 5.9 KiB |
44
My Project/Application.Designer.vb
generated
Normal file
44
My Project/Application.Designer.vb
generated
Normal file
|
|
@ -0,0 +1,44 @@
|
|||
'------------------------------------------------------------------------------
|
||||
' <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.TPS1100_Convert.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
|
||||
12
My Project/Application.myapp
Normal file
12
My Project/Application.myapp
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<MyApplicationData xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
|
||||
<MySubMain>true</MySubMain>
|
||||
<MainForm>Form1</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
<HighDpiMpde>false</HighDpiMpde>
|
||||
</MyApplicationData>
|
||||
35
My Project/AssemblyInfo.vb
Normal file
35
My Project/AssemblyInfo.vb
Normal file
|
|
@ -0,0 +1,35 @@
|
|||
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("TPS1100 Convert")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("")>
|
||||
<Assembly: AssemblyProduct("TPS1100 Convert")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2016")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("b0770235-976b-45ac-af93-5c4df5f54835")>
|
||||
|
||||
' 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")>
|
||||
63
My Project/Resources.Designer.vb
generated
Normal file
63
My Project/Resources.Designer.vb
generated
Normal file
|
|
@ -0,0 +1,63 @@
|
|||
'------------------------------------------------------------------------------
|
||||
' <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("TPS1100_Convert.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
|
||||
117
My Project/Resources.resx
Normal file
117
My Project/Resources.resx
Normal file
|
|
@ -0,0 +1,117 @@
|
|||
<?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>
|
||||
73
My Project/Settings.Designer.vb
generated
Normal file
73
My Project/Settings.Designer.vb
generated
Normal file
|
|
@ -0,0 +1,73 @@
|
|||
'------------------------------------------------------------------------------
|
||||
' <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.7.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.TPS1100_Convert.My.MySettings
|
||||
Get
|
||||
Return Global.TPS1100_Convert.My.MySettings.Default
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
7
My Project/Settings.settings
Normal file
7
My Project/Settings.settings
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
<?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>
|
||||
73
My Project/app.manifest
Normal file
73
My Project/app.manifest
Normal file
|
|
@ -0,0 +1,73 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1">
|
||||
<assemblyIdentity version="1.0.0.0" name="MyApplication.app" />
|
||||
<trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
|
||||
<security>
|
||||
<requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||
<!-- UAC Manifest Options
|
||||
If you want to change the Windows User Account Control level replace the
|
||||
requestedExecutionLevel node with one of the following.
|
||||
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
<requestedExecutionLevel level="requireAdministrator" uiAccess="false" />
|
||||
<requestedExecutionLevel level="highestAvailable" uiAccess="false" />
|
||||
|
||||
Specifying requestedExecutionLevel element will disable file and registry virtualization.
|
||||
Remove this element if your application requires this virtualization for backwards
|
||||
compatibility.
|
||||
-->
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
</requestedPrivileges>
|
||||
<applicationRequestMinimum>
|
||||
<defaultAssemblyRequest permissionSetReference="Custom" />
|
||||
<PermissionSet class="System.Security.PermissionSet" version="1" ID="Custom" SameSite="site" Unrestricted="true" />
|
||||
</applicationRequestMinimum>
|
||||
</security>
|
||||
</trustInfo>
|
||||
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
|
||||
<application>
|
||||
<!-- A list of the Windows versions that this application has been tested on
|
||||
and is designed to work with. Uncomment the appropriate elements
|
||||
and Windows will automatically select the most compatible environment. -->
|
||||
<!-- Windows Vista -->
|
||||
<!--<supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}" />-->
|
||||
<!-- Windows 7 -->
|
||||
<!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}" />-->
|
||||
<!-- Windows 8 -->
|
||||
<!--<supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}" />-->
|
||||
<!-- Windows 8.1 -->
|
||||
<!--<supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}" />-->
|
||||
<!-- Windows 10 -->
|
||||
<!--<supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}" />-->
|
||||
</application>
|
||||
</compatibility>
|
||||
<!-- Indicates that the application is DPI-aware and will not be automatically scaled by Windows at higher
|
||||
DPIs. Windows Presentation Foundation (WPF) applications are automatically DPI-aware and do not need
|
||||
to opt in. Windows Forms applications targeting .NET Framework 4.6 that opt into this setting, should
|
||||
also set the 'EnableWindowsFormsHighDpiAutoResizing' setting to 'true' in their app.config.
|
||||
|
||||
Makes the application long-path aware. See https://docs.microsoft.com/windows/win32/fileio/maximum-file-path-limitation -->
|
||||
<!--
|
||||
<application xmlns="urn:schemas-microsoft-com:asm.v3">
|
||||
<windowsSettings>
|
||||
<dpiAware xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">true</dpiAware>
|
||||
<longPathAware xmlns="http://schemas.microsoft.com/SMI/2016/WindowsSettings">true</longPathAware>
|
||||
</windowsSettings>
|
||||
</application>
|
||||
-->
|
||||
<!-- Enable themes for Windows common controls and dialogs (Windows XP and later) -->
|
||||
<!--
|
||||
<dependency>
|
||||
<dependentAssembly>
|
||||
<assemblyIdentity
|
||||
type="win32"
|
||||
name="Microsoft.Windows.Common-Controls"
|
||||
version="6.0.0.0"
|
||||
processorArchitecture="*"
|
||||
publicKeyToken="6595b64144ccf1df"
|
||||
language="*"
|
||||
/>
|
||||
</dependentAssembly>
|
||||
</dependency>
|
||||
-->
|
||||
</assembly>
|
||||
BIN
Save-as-24.png
Normal file
BIN
Save-as-24.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 708 B |
49
TEST.GSI
Normal file
49
TEST.GSI
Normal file
|
|
@ -0,0 +1,49 @@
|
|||
*110001+00000000000GS001 81..00+0000000465423089 82..00+0000000110526243 83..00+0000000000301586
|
||||
*110002+00000000000GS002 81..00+0000000465437688 82..00+0000000110547569 83..00+0000000000302107
|
||||
*110003+00000000000GS003 81..00+0000000465472908 82..00+0000000110527226 83..00+0000000000302945
|
||||
*410010+0000000000000040
|
||||
*110004+00000000000GS001 21.324+0000000013831010 22.324+0000000008932340 31..00+0000000000029523 32..10+0000000000029522 87..10+0000000000002500 58..16+0000000000000175 33..10-0000000000000754 81..00+0000000531242578 82..00+0000000073008189 83..00+0000000000800864 71....+0000000000000000
|
||||
*110005+00000000000GS002 21.324+0000000019023040 22.324+0000000010338410 31..00+0000000000007115 32..10+0000000000006914 87..10+0000000000000100 58..16+0000000000000175 33..10-0000000000000268 81..00+0000000531221776 82..00+0000000073023505 83..00+0000000000801350 71....+0000000000000000
|
||||
*110006+00000000000GS003 21.324+0000000003614410 22.324+0000000009121020 31..00+0000000000034333 32..10+0000000000034324 87..10+0000000000000100 58..16+0000000000000175 33..10+0000000000000601 81..00+0000000531243315 82..00+0000000073057988 83..00+0000000000802219 71....+0000000000000000
|
||||
*110007+0000000000011111 25.344+0000000008801190 84..40+0000000465444529 85..40+0000000110546554 86..40+0000000000302353 87..10+0000000000000100 88..10+0000000000001510
|
||||
*410010+0000000000000090
|
||||
*110008+00000000000GS003 21.324+0000000012415590 22.324+0000000009121020 31..00+0000000000034332 32..10+0000000000034323 87..10+0000000000000100 58..16+0000000000000175 33..10+0000000000000601 81..00+0000000465472895 82..00+0000000110527228 83..00+0000000000302954 71....+0000000000000000
|
||||
*110009+00000000000GS001 21.324+0000000022632260 22.324+0000000008932390 31..00+0000000000029524 32..10+0000000000029523 87..10+0000000000002500 58..16+0000000000000175 33..10-0000000000000755 81..00+0000000465423100 82..00+0000000110526246 83..00+0000000000301598 71....+0000000000000000
|
||||
*110010+00000000000GS002 21.324+0000000027824300 22.324+0000000010339390 31..00+0000000000007112 32..10+0000000000006911 87..10+0000000000000100 58..16+0000000000000175 33..10-0000000000000270 81..00+0000000465437693 82..00+0000000110547564 83..00+0000000000302084 71....+0000000000000000
|
||||
*110011+0000000000000001 21.324+0000000011254090 22.324+0000000008815450 31..00+0000000000032800 32..10+0000000000032785 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000001205 81..00+0000000465474729 82..00+0000000110533795 83..00+0000000000303558 71....+0000000000000000
|
||||
*110012+0000000000000002 21.324+0000000011144520 22.324+0000000008850390 31..00+0000000000020325 32..10+0000000000020321 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000620 81..00+0000000465463403 82..00+0000000110539024 83..00+0000000000302973 71....+0000000000000000
|
||||
*110013+0000000000000003 21.324+0000000010859200 22.324+0000000008922510 31..00+0000000000011668 32..10+0000000000011667 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000336 81..00+0000000465455561 82..00+0000000110542757 83..00+0000000000302689 71....+0000000000000000
|
||||
*110014+0000000000000004 21.324+0000000007358330 22.324+0000000009603030 31..00+0000000000001983 32..10+0000000000001972 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000001 81..00+0000000465446424 82..00+0000000110547098 83..00+0000000000302354 71....+0000000000000000
|
||||
*110015+0000000000000005 21.324+0000000005042460 22.324+0000000010727030 31..00+0000000000004476 32..10+0000000000004270 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000000168 81..00+0000000465447834 82..00+0000000110549258 83..00+0000000000302521 71....+0000000000000000
|
||||
*110016+0000000000000006 21.324+0000000003846420 22.324+0000000010921450 31..00+0000000000004204 32..10+0000000000003966 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000000116 81..00+0000000465447013 82..00+0000000110549645 83..00+0000000000302470 71....+0000000000000000
|
||||
*110017+0000000000000007 21.324+0000000003747460 22.324+0000000010758590 31..00+0000000000004468 32..10+0000000000004249 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000000131 81..00+0000000465447133 82..00+0000000110549911 83..00+0000000000302484 71....+0000000000000000
|
||||
*110018+0000000000000008 21.324+0000000033802160 22.324+0000000010150570 31..00+0000000000006199 32..10+0000000000006067 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000000237 81..00+0000000465442260 82..00+0000000110552180 83..00+0000000000302590 71....+0000000000000000
|
||||
*110019+0000000000000009 21.324+0000000029836160 22.324+0000000010648530 31..00+0000000000005488 32..10+0000000000005254 87..10+0000000000000000 58..16+0000000000000344 33..10-0000000000000078 81..00+0000000465439917 82..00+0000000110549069 83..00+0000000000302276 71....+0000000000000000
|
||||
*110020+0000000000000010 21.324+0000000028230220 22.324+0000000009248440 31..00+0000000000010785 32..10+0000000000010772 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000319 81..00+0000000465434013 82..00+0000000110548886 83..00+0000000000302034 71....+0000000000000000
|
||||
*110021+0000000000000011 21.324+0000000005208020 22.324+0000000009428210 31..00+0000000000004313 32..10+0000000000004300 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000001174 81..00+0000000465447924 82..00+0000000110549193 83..00+0000000000303527 71....+0000000000000000
|
||||
*110022+0000000000000012 21.324+0000000005044450 22.324+0000000008137520 31..00+0000000000004677 32..10+0000000000004627 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000891 81..00+0000000465448112 82..00+0000000110549481 83..00+0000000000303244 71....+0000000000000000
|
||||
*110023+0000000000000013 21.324+0000000004322420 22.324+0000000007933420 31..00+0000000000011597 32..10+0000000000011405 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000002311 81..00+0000000465452362 82..00+0000000110554843 83..00+0000000000304664 71....+0000000000000000
|
||||
*110024+0000000000000014 21.324+0000000004213390 22.324+0000000008007010 31..00+0000000000015065 32..10+0000000000014842 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000002796 81..00+0000000465454504 82..00+0000000110557544 83..00+0000000000305149 71....+0000000000000000
|
||||
*110025+0000000000000015 21.324+0000000003346460 22.324+0000000008111590 31..00+0000000000017167 32..10+0000000000016965 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000002836 81..00+0000000465453962 82..00+0000000110560654 83..00+0000000000305190 71....+0000000000000000
|
||||
*110026+0000000000000016 21.324+0000000001534560 22.324+0000000008200030 31..00+0000000000027304 32..10+0000000000027038 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000004010 81..00+0000000465451792 82..00+0000000110572598 83..00+0000000000306363 71....+0000000000000000
|
||||
*110027+0000000000000017 21.324+0000000001558300 22.324+0000000008036540 31..00+0000000000028384 32..10+0000000000028004 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000004838 81..00+0000000465452236 82..00+0000000110573476 83..00+0000000000307192 71....+0000000000000000
|
||||
*110028+0000000000000018 21.324+0000000001428410 22.324+0000000008121540 31..00+0000000000028412 32..10+0000000000028090 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000004476 81..00+0000000465451552 82..00+0000000110573751 83..00+0000000000306829 71....+0000000000000000
|
||||
*110029+0000000000000019 21.324+0000000003416460 22.324+0000000008238380 31..00+0000000000027992 32..10+0000000000027761 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000003794 81..00+0000000465460165 82..00+0000000110569493 83..00+0000000000306147 71....+0000000000000000
|
||||
*110030+0000000000000020 21.324+0000000004217270 22.324+0000000007814330 31..00+0000000000024595 32..10+0000000000024079 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000006522 81..00+0000000465460732 82..00+0000000110564366 83..00+0000000000308875 71....+0000000000000000
|
||||
*110031+0000000000000021 21.324+0000000005331040 22.324+0000000007125310 31..00+0000000000015239 32..10+0000000000014445 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000006364 81..00+0000000465456144 82..00+0000000110555142 83..00+0000000000308718 71....+0000000000000000
|
||||
*110032+0000000000000022 21.324+0000000008053160 22.324+0000000007227170 31..00+0000000000023186 32..10+0000000000022107 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000008500 81..00+0000000465466357 82..00+0000000110550055 83..00+0000000000310853 71....+0000000000000000
|
||||
*110033+0000000000000023 21.324+0000000001902580 22.324+0000000007724330 31..00+0000000000039212 32..10+0000000000038269 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000010058 81..00+0000000465457019 82..00+0000000110582726 83..00+0000000000312411 71....+0000000000000000
|
||||
*110034+0000000000000024 21.324+0000000003810480 22.324+0000000007832240 31..00+0000000000043712 32..10+0000000000042840 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000010195 81..00+0000000465471010 82..00+0000000110580229 83..00+0000000000312548 71....+0000000000000000
|
||||
*110035+0000000000000031 21.324+0000000034458570 22.324+0000000009054050 31..00+0000000000005359 32..10+0000000000005358 87..10+0000000000000000 58..16+0000000000000344 33..10+0000000000001426 81..00+0000000465443141 82..00+0000000110551729 83..00+0000000000303779 71....+0000000000000000
|
||||
*110036+0000000000000032 21.324+0000000029233050 22.324+0000000009558110 31..00+0000000000004488 32..10+0000000000004464 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000257 81..00+0000000465440407 82..00+0000000110548265 83..00+0000000000302097 71....+0000000000000000
|
||||
*110037+0000000000000033 21.324+0000000027506040 22.324+0000000009425520 31..00+0000000000006362 32..10+0000000000006343 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000282 81..00+0000000465438211 82..00+0000000110547118 83..00+0000000000302072 71....+0000000000000000
|
||||
*110038+0000000000000034 21.324+0000000027631400 22.324+0000000009349170 31..00+0000000000010047 32..10+0000000000010024 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000460 81..00+0000000465434570 82..00+0000000110547693 83..00+0000000000301894 71....+0000000000000000
|
||||
*110039+0000000000000035 21.324+0000000027424370 22.324+0000000009425240 31..00+0000000000007978 32..10+0000000000007954 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000405 81..00+0000000465436599 82..00+0000000110547165 83..00+0000000000301948 71....+0000000000000000
|
||||
*110040+0000000000000036 21.324+0000000027337580 22.324+0000000009552300 31..00+0000000000005445 32..10+0000000000005416 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000347 81..00+0000000465439124 82..00+0000000110546897 83..00+0000000000302006 71....+0000000000000000
|
||||
*110041+0000000000000037 21.324+0000000026954060 22.324+0000000009916340 31..00+0000000000002914 32..10+0000000000002876 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000260 81..00+0000000465441653 82..00+0000000110546549 83..00+0000000000302094 71....+0000000000000000
|
||||
*110042+0000000000000038 21.324+0000000013027410 22.324+0000000009545570 31..00+0000000000002638 32..10+0000000000002625 87..10+0000000000001300 58..16+0000000000000175 33..10-0000000000000055 81..00+0000000465446526 82..00+0000000110544850 83..00+0000000000302298 71....+0000000000000000
|
||||
*110043+0000000000000039 21.324+0000000011808360 22.324+0000000009002460 31..00+0000000000011703 32..10+0000000000011703 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000201 81..00+0000000465454849 82..00+0000000110541033 83..00+0000000000302554 71....+0000000000000000
|
||||
*110044+0000000000000040 21.324+0000000011708390 22.324+0000000008931290 31..00+0000000000017790 32..10+0000000000017789 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000358 81..00+0000000465460359 82..00+0000000110538438 83..00+0000000000302711 71....+0000000000000000
|
||||
*110045+0000000000000041 21.324+0000000011609380 22.324+0000000008913070 31..00+0000000000031001 32..10+0000000000030998 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000633 81..00+0000000465472352 82..00+0000000110532887 83..00+0000000000302986 71....+0000000000000000
|
||||
*110046+0000000000000042 21.324+0000000011526030 22.324+0000000008909420 31..00+0000000000032271 32..10+0000000000032268 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000682 81..00+0000000465473669 82..00+0000000110532696 83..00+0000000000303036 71....+0000000000000000
|
||||
*110047+0000000000000043 21.324+0000000011346490 22.324+0000000008855450 31..00+0000000000032842 32..10+0000000000032836 87..10+0000000000001300 58..16+0000000000000175 33..10+0000000000000824 81..00+0000000465474578 82..00+0000000110533313 83..00+0000000000303177 71....+0000000000000000
|
||||
22
TPS1100 Convert.sln
Normal file
22
TPS1100 Convert.sln
Normal file
|
|
@ -0,0 +1,22 @@
|
|||
|
||||
Microsoft Visual Studio Solution File, Format Version 12.00
|
||||
# Visual Studio 14
|
||||
VisualStudioVersion = 14.0.23107.0
|
||||
MinimumVisualStudioVersion = 10.0.40219.1
|
||||
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "TPS1100 Convert", "TPS1100 Convert.vbproj", "{CA5B1819-C6DE-425D-9143-98621CC852E3}"
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|Any CPU = Debug|Any CPU
|
||||
Release|Any CPU = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||
{CA5B1819-C6DE-425D-9143-98621CC852E3}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||
{CA5B1819-C6DE-425D-9143-98621CC852E3}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||
{CA5B1819-C6DE-425D-9143-98621CC852E3}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||
{CA5B1819-C6DE-425D-9143-98621CC852E3}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(SolutionProperties) = preSolution
|
||||
HideSolutionNode = FALSE
|
||||
EndGlobalSection
|
||||
EndGlobal
|
||||
187
TPS1100 Convert.vbproj
Normal file
187
TPS1100 Convert.vbproj
Normal file
|
|
@ -0,0 +1,187 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="14.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProjectGuid>{CA5B1819-C6DE-425D-9143-98621CC852E3}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>TPS1100_Convert.My.MyApplication</StartupObject>
|
||||
<RootNamespace>TPS1100_Convert</RootNamespace>
|
||||
<AssemblyName>TPS1100 Convert</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
|
||||
<AutoGenerateBindingRedirects>true</AutoGenerateBindingRedirects>
|
||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
||||
<TargetFrameworkProfile />
|
||||
<PublishUrl>E:\_Boris\Projekti Boris\VS Projects\TPS1100 Convert\publish\</PublishUrl>
|
||||
<Install>true</Install>
|
||||
<InstallFrom>Disk</InstallFrom>
|
||||
<UpdateEnabled>false</UpdateEnabled>
|
||||
<UpdateMode>Foreground</UpdateMode>
|
||||
<UpdateInterval>7</UpdateInterval>
|
||||
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
|
||||
<UpdatePeriodically>false</UpdatePeriodically>
|
||||
<UpdateRequired>false</UpdateRequired>
|
||||
<MapFileExtensions>true</MapFileExtensions>
|
||||
<WebPage>publish.htm</WebPage>
|
||||
<AutorunEnabled>true</AutorunEnabled>
|
||||
<ApplicationRevision>4</ApplicationRevision>
|
||||
<ApplicationVersion>1.1.0.%2a</ApplicationVersion>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<PublishWizardCompleted>true</PublishWizardCompleted>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DocumentationFile>TPS1100 Convert.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||
<PlatformTarget>AnyCPU</PlatformTarget>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DocumentationFile>TPS1100 Convert.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationIcon>TPS1100CNVRT.ico</ApplicationIcon>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ManifestCertificateThumbprint>C2D976976AC91EDFF476D973EFDDE907FFC7A54E</ManifestCertificateThumbprint>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ManifestKeyFile>TPS1100 Convert_TemporaryKey.pfx</ManifestKeyFile>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<GenerateManifests>false</GenerateManifests>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<SignManifests>false</SignManifests>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<TargetZone>LocalIntranet</TargetZone>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationManifest>My Project\app.manifest</ApplicationManifest>
|
||||
</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" />
|
||||
<Reference Include="System.Net.Http" />
|
||||
</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" />
|
||||
<Import Include="System.Threading.Tasks" />
|
||||
</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>
|
||||
<DesignTime>True</DesignTime>
|
||||
</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="My Project\app.manifest" />
|
||||
<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>
|
||||
<None Include="App.config" />
|
||||
<None Include="TPS1100 Convert_TemporaryKey.pfx" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Content Include="TPS1100CNVRT.ico" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include=".NETFramework,Version=v4.5.2">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>Microsoft .NET Framework 4.5.2 %28x86 and x64%29</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.5 SP1</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
</ItemGroup>
|
||||
<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>
|
||||
BIN
TPS1100CNVRT.ico
Normal file
BIN
TPS1100CNVRT.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 172 KiB |
BIN
TPS1100CNVRT.png
Normal file
BIN
TPS1100CNVRT.png
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 319 B |
Loading…
Reference in New Issue
Block a user