Veröffentlichung
This commit is contained in:
parent
ea791999f9
commit
1ba8010955
6 changed files with 1089 additions and 1054 deletions
|
|
@ -1,163 +1,198 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="12.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>{AA6CFF3E-0565-4A31-BBE1-20988A610746}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>Leitungslaengenberechnung.My.MyApplication</StartupObject>
|
||||
<RootNamespace>Leitungslaengenberechnung</RootNamespace>
|
||||
<AssemblyName>Leitungslaengenberechnung</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.5</TargetFrameworkVersion>
|
||||
<PublishUrl>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>
|
||||
<ApplicationRevision>0</ApplicationRevision>
|
||||
<ApplicationVersion>1.0.0.0</ApplicationVersion>
|
||||
<IsWebBootstrapper>false</IsWebBootstrapper>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<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>Leitungslaengenberechnung.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>Leitungslaengenberechnung.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
<Prefer32Bit>false</Prefer32Bit>
|
||||
<UseVSHostingProcess>false</UseVSHostingProcess>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationIcon>cable.ico</ApplicationIcon>
|
||||
</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" />
|
||||
<Import Include="System.Threading.Tasks" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="frm_Main.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frm_Main.Designer.vb">
|
||||
<DependentUpon>frm_Main.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="frm_Main.resx">
|
||||
<DependentUpon>frm_Main.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\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" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Content Include="cable.ico" />
|
||||
<Content Include="tmsnat.ico" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include=".NETFramework,Version=v4.5">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>Microsoft .NET Framework 4.5 %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>
|
||||
-->
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="12.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>{AA6CFF3E-0565-4A31-BBE1-20988A610746}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>Leitungslaengenberechnung.My.MyApplication</StartupObject>
|
||||
<RootNamespace>Leitungslaengenberechnung</RootNamespace>
|
||||
<AssemblyName>Leitungslaengenberechnung</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.5</TargetFrameworkVersion>
|
||||
<IsWebBootstrapper>true</IsWebBootstrapper>
|
||||
<PublishUrl>Z:\Leitungslaengenberechnung\</PublishUrl>
|
||||
<Install>true</Install>
|
||||
<InstallFrom>Web</InstallFrom>
|
||||
<UpdateEnabled>true</UpdateEnabled>
|
||||
<UpdateMode>Foreground</UpdateMode>
|
||||
<UpdateInterval>7</UpdateInterval>
|
||||
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
|
||||
<UpdatePeriodically>false</UpdatePeriodically>
|
||||
<UpdateRequired>false</UpdateRequired>
|
||||
<MapFileExtensions>true</MapFileExtensions>
|
||||
<InstallUrl>http://tools.dominicreich.com/Leitungslaengenberechnung/</InstallUrl>
|
||||
<UpdateUrl>http://tools.dominicreich.com/Leitungslaengenberechnung/</UpdateUrl>
|
||||
<SupportUrl>http://tmsn.at/%3ftools&leitungslaengenberechnung</SupportUrl>
|
||||
<ErrorReportUrl>https://github.com/freefallcid/leitungslaengenberechnung/issues</ErrorReportUrl>
|
||||
<ProductName>Leitungslängenberechnung</ProductName>
|
||||
<PublisherName>Dominic Reich</PublisherName>
|
||||
<OpenBrowserOnPublish>false</OpenBrowserOnPublish>
|
||||
<ApplicationRevision>1</ApplicationRevision>
|
||||
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
|
||||
<UseApplicationTrust>false</UseApplicationTrust>
|
||||
<CreateDesktopShortcut>true</CreateDesktopShortcut>
|
||||
<ExcludeDeploymentUrl>true</ExcludeDeploymentUrl>
|
||||
<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>Leitungslaengenberechnung.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>Leitungslaengenberechnung.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
<Prefer32Bit>false</Prefer32Bit>
|
||||
<UseVSHostingProcess>false</UseVSHostingProcess>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationIcon>cable.ico</ApplicationIcon>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ManifestCertificateThumbprint>528486DB0FBE19A685C8460B46BA67E50BDFB669</ManifestCertificateThumbprint>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ManifestKeyFile>Leitungslaengenberechnung_TemporaryKey.pfx</ManifestKeyFile>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<GenerateManifests>true</GenerateManifests>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<SignManifests>true</SignManifests>
|
||||
</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" />
|
||||
<Import Include="System.Threading.Tasks" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="frm_Main.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frm_Main.Designer.vb">
|
||||
<DependentUpon>frm_Main.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="frm_Main.resx">
|
||||
<DependentUpon>frm_Main.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="Leitungslaengenberechnung_TemporaryKey.pfx" />
|
||||
<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" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Content Include="cable.ico" />
|
||||
<Content Include="tmsnat.ico" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include=".NETFramework,Version=v4.5">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>Microsoft .NET Framework 4.5 %28x86 and x64%29</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 3.5 SP1</ProductName>
|
||||
<Install>false</Install>
|
||||
</BootstrapperPackage>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<PublishFile Include="tmsnat.ico">
|
||||
<Visible>False</Visible>
|
||||
<Group>
|
||||
</Group>
|
||||
<TargetPath>
|
||||
</TargetPath>
|
||||
<PublishState>Exclude</PublishState>
|
||||
<IncludeHash>True</IncludeHash>
|
||||
<FileType>File</FileType>
|
||||
</PublishFile>
|
||||
</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>
|
||||
|
|
@ -1,13 +1,13 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<PublishUrlHistory>publish\</PublishUrlHistory>
|
||||
<InstallUrlHistory />
|
||||
<SupportUrlHistory />
|
||||
<UpdateUrlHistory />
|
||||
<BootstrapperUrlHistory />
|
||||
<ErrorReportUrlHistory />
|
||||
<FallbackCulture>de-DE</FallbackCulture>
|
||||
<VerifyUploadedFiles>false</VerifyUploadedFiles>
|
||||
</PropertyGroup>
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<PublishUrlHistory>Z:\Leitungslaengenberechnung\|publish\</PublishUrlHistory>
|
||||
<InstallUrlHistory>http://tools.dominicreich.com/Leitungslaengenberechnung/</InstallUrlHistory>
|
||||
<SupportUrlHistory>http://tmsn.at/%3ftools&leitungslaengenberechnung</SupportUrlHistory>
|
||||
<UpdateUrlHistory />
|
||||
<BootstrapperUrlHistory />
|
||||
<ErrorReportUrlHistory>https://github.com/freefallcid/leitungslaengenberechnung/issues</ErrorReportUrlHistory>
|
||||
<FallbackCulture>de-DE</FallbackCulture>
|
||||
<VerifyUploadedFiles>false</VerifyUploadedFiles>
|
||||
</PropertyGroup>
|
||||
</Project>
|
||||
|
|
@ -1,35 +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("Leitungslaengenberechnung")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("")>
|
||||
<Assembly: AssemblyProduct("Leitungslaengenberechnung")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2014")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("871e19c6-2dcd-494b-ba8b-2fb8a05db8ee")>
|
||||
|
||||
' 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.*")>
|
||||
<Assembly: AssemblyFileVersion("1.0.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("Leitungslaengenberechnung")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("Dominic Reich")>
|
||||
<Assembly: AssemblyProduct("Leitungslaengenberechnung")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2014 Dominic Reich")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("871e19c6-2dcd-494b-ba8b-2fb8a05db8ee")>
|
||||
|
||||
' 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.*")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
|
|
|||
1546
Leitungslaengenberechnung/frm_Main.Designer.vb
generated
1546
Leitungslaengenberechnung/frm_Main.Designer.vb
generated
File diff suppressed because it is too large
Load diff
|
|
@ -1,72 +1,72 @@
|
|||
Public Class frm_Main
|
||||
|
||||
Private Sub btn_beenden_Click(sender As Object, e As EventArgs) Handles btn_beenden.Click
|
||||
End
|
||||
End Sub
|
||||
|
||||
Private Sub btn_berechnen_Click(sender As Object, e As EventArgs) Handles btn_berechnen.Click
|
||||
o230_spannungsabfall.Text = Math.Round(CDec(i230_spannung.Text) * CDec(i230_abfall.Text) / 100, 2)
|
||||
o230_querschnitt.Text = Math.Round((2 * CDec(i230_laenge.Text) * CDec(i230_strom.Text) * CDec(i230_wirkungsgrad.Text)) / (CDec(i230_leitwert.Text) * CDec(o230_spannungsabfall.Text)), 2)
|
||||
End Sub
|
||||
|
||||
Private Sub btn_beenden400_Click(sender As Object, e As EventArgs) Handles btn_beenden400.Click
|
||||
End
|
||||
End Sub
|
||||
|
||||
Private Sub btn_berechnen400_Click(sender As Object, e As EventArgs) Handles btn_berechnen400.Click
|
||||
o400_spannungsabfall.Text = Math.Round(CDec(i400_spannung.Text) * CDec(i400_abfall.Text) / 100, 2)
|
||||
o400_querschnitt.Text = Math.Round((1.732 * CDec(i400_laenge.Text) * CDec(i400_strom.Text) * CDec(i400_wirkungsgrad.Text)) / (CDec(i400_leitwert.Text) * CDec(o400_spannungsabfall.Text)), 2)
|
||||
End Sub
|
||||
|
||||
Private Sub btn_beendenAus_Click(sender As Object, e As EventArgs) Handles btn_beendenAus.Click
|
||||
End
|
||||
End Sub
|
||||
Public Sub checkSettings()
|
||||
If check_unter32A.Checked = False Then
|
||||
iAus_faktor.Text = "3,5"
|
||||
iAus_nennspannung.SelectedIndex = 1
|
||||
If CDec(iAus_nennstrom.Text) < 32 Then
|
||||
iAus_nennstrom.Text = "32"
|
||||
End If
|
||||
Else
|
||||
If iAus_type.Text = "Schmelz" Or iAus_type.Text = "C" Then
|
||||
iAus_faktor.Text = "10"
|
||||
ElseIf iAus_type.Text = "B" Then
|
||||
iAus_faktor.Text = "5"
|
||||
ElseIf iAus_type.Text = "D" Then
|
||||
iAus_faktor.Text = "20"
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
Private Sub check_unter32A_CheckedChanged(sender As Object, e As EventArgs) Handles check_unter32A.CheckedChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub check_ueber32A_CheckedChanged(sender As Object, e As EventArgs) Handles check_ueber32A.CheckedChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub iAus_nennspannung_SelectedIndexChanged(sender As Object, e As EventArgs) Handles iAus_nennspannung.SelectedIndexChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub iAus_type_SelectedIndexChanged(sender As Object, e As EventArgs) Handles iAus_type.SelectedIndexChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub frm_Main_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
iAus_nennspannung.SelectedIndex = 0
|
||||
iAus_type.SelectedIndex = 0
|
||||
End Sub
|
||||
|
||||
Private Sub btn_berechnenAus_Click(sender As Object, e As EventArgs) Handles btn_berechnenAus.Click
|
||||
checkSettings()
|
||||
oAus_ausschaltstrom.Text = CDec(iAus_nennstrom.Text) * CDec(iAus_faktor.Text)
|
||||
If CDec(iAus_nennspannung.Text) >= CDec(iAus_schleife.Text) * CDec(oAus_ausschaltstrom.Text) Then
|
||||
oAus_ergebnis.BackColor = Color.Green
|
||||
Else
|
||||
oAus_ergebnis.BackColor = Color.Red
|
||||
End If
|
||||
oAus_rechnung.Text = Math.Round(CDec(iAus_nennspannung.Text), 2) & " >= " & Math.Round(CDec(iAus_schleife.Text), 2) & " * " & Math.Round(CDec(oAus_ausschaltstrom.Text), 2) & Chr(13) & Chr(10) & Math.Round(CDec(iAus_nennspannung.Text), 2) & " >= " & Math.Round(CDec(iAus_schleife.Text) * CDec(oAus_ausschaltstrom.Text), 2)
|
||||
End Sub
|
||||
End Class
|
||||
Public Class frm_Main
|
||||
|
||||
Private Sub btn_beenden_Click(sender As Object, e As EventArgs) Handles btn_beenden.Click
|
||||
End
|
||||
End Sub
|
||||
|
||||
Private Sub btn_berechnen_Click(sender As Object, e As EventArgs) Handles btn_berechnen.Click
|
||||
o230_spannungsabfall.Text = Math.Round(CDec(i230_spannung.Text) * CDec(i230_abfall.Text) / 100, 2)
|
||||
o230_querschnitt.Text = Math.Round((2 * CDec(i230_laenge.Text) * CDec(i230_strom.Text) * CDec(i230_wirkungsgrad.Text)) / (CDec(i230_leitwert.Text) * CDec(o230_spannungsabfall.Text)), 2)
|
||||
End Sub
|
||||
|
||||
Private Sub btn_beenden400_Click(sender As Object, e As EventArgs) Handles btn_beenden400.Click
|
||||
End
|
||||
End Sub
|
||||
|
||||
Private Sub btn_berechnen400_Click(sender As Object, e As EventArgs) Handles btn_berechnen400.Click
|
||||
o400_spannungsabfall.Text = Math.Round(CDec(i400_spannung.Text) * CDec(i400_abfall.Text) / 100, 2)
|
||||
o400_querschnitt.Text = Math.Round((1.732 * CDec(i400_laenge.Text) * CDec(i400_strom.Text) * CDec(i400_wirkungsgrad.Text)) / (CDec(i400_leitwert.Text) * CDec(o400_spannungsabfall.Text)), 2)
|
||||
End Sub
|
||||
|
||||
Private Sub btn_beendenAus_Click(sender As Object, e As EventArgs) Handles btn_beendenAus.Click
|
||||
End
|
||||
End Sub
|
||||
Public Sub checkSettings()
|
||||
If check_unter32A.Checked = False Then
|
||||
iAus_faktor.Text = "3,5"
|
||||
iAus_nennspannung.SelectedIndex = 1
|
||||
If CDec(iAus_nennstrom.Text) < 32 Then
|
||||
iAus_nennstrom.Text = "32"
|
||||
End If
|
||||
Else
|
||||
If iAus_type.Text = "Schmelz" Or iAus_type.Text = "C" Then
|
||||
iAus_faktor.Text = "10"
|
||||
ElseIf iAus_type.Text = "B" Then
|
||||
iAus_faktor.Text = "5"
|
||||
ElseIf iAus_type.Text = "D" Then
|
||||
iAus_faktor.Text = "20"
|
||||
End If
|
||||
End If
|
||||
End Sub
|
||||
Private Sub check_unter32A_CheckedChanged(sender As Object, e As EventArgs) Handles check_unter32A.CheckedChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub check_ueber32A_CheckedChanged(sender As Object, e As EventArgs) Handles check_ueber32A.CheckedChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub iAus_nennspannung_SelectedIndexChanged(sender As Object, e As EventArgs) Handles iAus_nennspannung.SelectedIndexChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub iAus_type_SelectedIndexChanged(sender As Object, e As EventArgs) Handles iAus_type.SelectedIndexChanged
|
||||
checkSettings()
|
||||
End Sub
|
||||
|
||||
Private Sub frm_Main_Load(sender As Object, e As EventArgs) Handles MyBase.Load
|
||||
iAus_nennspannung.SelectedIndex = 0
|
||||
iAus_type.SelectedIndex = 0
|
||||
End Sub
|
||||
|
||||
Private Sub btn_berechnenAus_Click(sender As Object, e As EventArgs) Handles btn_berechnenAus.Click
|
||||
checkSettings()
|
||||
oAus_ausschaltstrom.Text = CDec(iAus_nennstrom.Text) * CDec(iAus_faktor.Text)
|
||||
If CDec(iAus_nennspannung.Text) >= CDec(iAus_schleife.Text) * CDec(oAus_ausschaltstrom.Text) Then
|
||||
oAus_ergebnis.BackColor = Color.Green
|
||||
Else
|
||||
oAus_ergebnis.BackColor = Color.Red
|
||||
End If
|
||||
oAus_rechnung.Text = Math.Round(CDec(iAus_nennspannung.Text), 2) & " >= " & Math.Round(CDec(iAus_schleife.Text), 2) & " * " & Math.Round(CDec(oAus_ausschaltstrom.Text), 2) & Chr(13) & Chr(10) & Math.Round(CDec(iAus_nennspannung.Text), 2) & " >= " & Math.Round(CDec(iAus_schleife.Text) * CDec(oAus_ausschaltstrom.Text), 2)
|
||||
End Sub
|
||||
End Class
|
||||
|
|
|
|||
BIN
cable.ico
Normal file
BIN
cable.ico
Normal file
Binary file not shown.
|
After Width: | Height: | Size: 9.4 KiB |
Loading…
Reference in a new issue