CameraMng :
- nuovo git per evitare problemi con bin e obj.
This commit is contained in:
Dario Sassi
+339
@@ -0,0 +1,339 @@
|
||||
# ---> VisualStudio
|
||||
## Ignore Visual Studio temporary files, build results, and
|
||||
## files generated by popular Visual Studio add-ons.
|
||||
|
||||
# User-specific files
|
||||
*.suo
|
||||
*.user
|
||||
*.userosscache
|
||||
*.sln.docstates
|
||||
*.pdb
|
||||
*.exe
|
||||
*.dll
|
||||
|
||||
# User-specific files (MonoDevelop/Xamarin Studio)
|
||||
*.userprefs
|
||||
|
||||
# Build results
|
||||
debug/
|
||||
Debug/
|
||||
[Dd]ebugPublic/
|
||||
release/
|
||||
Release/
|
||||
[Rr]eleases/
|
||||
x64/
|
||||
x86/
|
||||
build/
|
||||
bld/
|
||||
bin/
|
||||
Bin/
|
||||
obj/
|
||||
Obj/
|
||||
|
||||
# Visual Studio 2015 cache/options directory
|
||||
.vs/
|
||||
# Uncomment if you have tasks that create the project's static files in wwwroot
|
||||
#wwwroot/
|
||||
|
||||
# MSTest test Results
|
||||
[Tt]est[Rr]esult*/
|
||||
[Bb]uild[Ll]og.*
|
||||
|
||||
# NUNIT
|
||||
*.VisualState.xml
|
||||
TestResult.xml
|
||||
|
||||
# Build Results of an ATL Project
|
||||
[Dd]ebugPS/
|
||||
[Rr]eleasePS/
|
||||
dlldata.c
|
||||
|
||||
# DNX
|
||||
project.lock.json
|
||||
artifacts/
|
||||
|
||||
*_i.c
|
||||
*_p.c
|
||||
*_i.h
|
||||
*.ilk
|
||||
*.meta
|
||||
*.obj
|
||||
*.pch
|
||||
*.pdb
|
||||
*.pgc
|
||||
*.pgd
|
||||
*.rsp
|
||||
*.sbr
|
||||
*.tlb
|
||||
*.tli
|
||||
*.tlh
|
||||
*.tmp
|
||||
*.tmp_proj
|
||||
*.log
|
||||
*.vspscc
|
||||
*.vssscc
|
||||
.builds
|
||||
*.pidb
|
||||
*.svclog
|
||||
*.scc
|
||||
|
||||
# Chutzpah Test files
|
||||
_Chutzpah*
|
||||
|
||||
# Visual C++ cache files
|
||||
ipch/
|
||||
*.aps
|
||||
*.ncb
|
||||
*.opensdf
|
||||
*.sdf
|
||||
*.cachefile
|
||||
|
||||
# Visual Studio profiler
|
||||
*.psess
|
||||
*.vsp
|
||||
*.vspx
|
||||
*.sap
|
||||
|
||||
# TFS 2012 Local Workspace
|
||||
$tf/
|
||||
|
||||
# Guidance Automation Toolkit
|
||||
*.gpState
|
||||
|
||||
# ReSharper is a .NET coding add-in
|
||||
_ReSharper*/
|
||||
*.[Rr]e[Ss]harper
|
||||
*.DotSettings.user
|
||||
|
||||
# JustCode is a .NET coding add-in
|
||||
.JustCode
|
||||
|
||||
# TeamCity is a build add-in
|
||||
_TeamCity*
|
||||
|
||||
# DotCover is a Code Coverage Tool
|
||||
*.dotCover
|
||||
|
||||
# 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
|
||||
# TODO: 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
|
||||
|
||||
# NuGet Packages
|
||||
*.nupkg
|
||||
# The packages folder can be ignored because of Package Restore
|
||||
**/packages/*
|
||||
# except build/, which is used as an MSBuild target.
|
||||
!**/packages/build/
|
||||
# Uncomment if necessary however generally it will be regenerated when needed
|
||||
#!**/packages/repositories.config
|
||||
|
||||
# Windows Azure Build Output
|
||||
csx/
|
||||
*.build.csdef
|
||||
|
||||
# Windows Store app package directory
|
||||
AppPackages/
|
||||
|
||||
# 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/
|
||||
[Ss]tyle[Cc]op.*
|
||||
~$*
|
||||
*~
|
||||
*.dbmdl
|
||||
*.dbproj.schemaview
|
||||
*.pfx
|
||||
*.publishsettings
|
||||
node_modules/
|
||||
orleans.codegen.cs
|
||||
|
||||
# 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
|
||||
|
||||
# SQL Server files
|
||||
*.mdf
|
||||
*.ldf
|
||||
|
||||
# Business Intelligence projects
|
||||
*.rdl.data
|
||||
*.bim.layout
|
||||
*.bim_*.settings
|
||||
|
||||
# Microsoft Fakes
|
||||
FakesAssemblies/
|
||||
|
||||
# Node.js Tools for Visual Studio
|
||||
.ntvs_analysis.dat
|
||||
|
||||
# Visual Studio 6 build log
|
||||
*.plg
|
||||
|
||||
# Visual Studio 6 workspace options file
|
||||
*.opt
|
||||
|
||||
# Visual Studio LightSwitch build output
|
||||
**/*.HTMLClient/GeneratedArtifacts
|
||||
**/*.DesktopClient/GeneratedArtifacts
|
||||
**/*.DesktopClient/ModelManifest.xml
|
||||
**/*.Server/GeneratedArtifacts
|
||||
**/*.Server/ModelManifest.xml
|
||||
_Pvt_Extensions
|
||||
|
||||
# ---> C Sharp
|
||||
# Build Folders (you can keep bin if you'd like, to store dlls and pdbs)
|
||||
[Bb]in/
|
||||
[Oo]bj/
|
||||
|
||||
# mstest test results
|
||||
TestResults
|
||||
|
||||
## Ignore Visual Studio temporary files, build results, and
|
||||
## files generated by popular Visual Studio add-ons.
|
||||
|
||||
# User-specific files
|
||||
*.suo
|
||||
*.user
|
||||
*.sln.docstates
|
||||
|
||||
# Build results
|
||||
[Dd]ebug/
|
||||
[Rr]elease/
|
||||
x64/
|
||||
*_i.c
|
||||
*_p.c
|
||||
*.ilk
|
||||
*.meta
|
||||
*.obj
|
||||
*.pch
|
||||
*.pdb
|
||||
*.pgc
|
||||
*.pgd
|
||||
*.rsp
|
||||
*.sbr
|
||||
*.tlb
|
||||
*.tli
|
||||
*.tlh
|
||||
*.tmp
|
||||
*.log
|
||||
*.vspscc
|
||||
*.vssscc
|
||||
.builds
|
||||
|
||||
# Visual C++ cache files
|
||||
ipch/
|
||||
*.aps
|
||||
*.ncb
|
||||
*.opensdf
|
||||
*.sdf
|
||||
|
||||
# Visual Studio profiler
|
||||
*.psess
|
||||
*.vsp
|
||||
*.vspx
|
||||
|
||||
# Guidance Automation Toolkit
|
||||
*.gpState
|
||||
|
||||
# ReSharper is a .NET coding add-in
|
||||
_ReSharper*
|
||||
|
||||
# NCrunch
|
||||
*.ncrunch*
|
||||
.*crunch*.local.xml
|
||||
|
||||
# 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
|
||||
*.Publish.xml
|
||||
|
||||
# NuGet Packages Directory
|
||||
packages
|
||||
|
||||
# Windows Azure Build Output
|
||||
csx
|
||||
*.build.csdef
|
||||
|
||||
# Windows Store app package directory
|
||||
AppPackages/
|
||||
|
||||
# Others
|
||||
[Bb]in
|
||||
[Oo]bj
|
||||
sql
|
||||
TestResults
|
||||
[Tt]est[Rr]esult*
|
||||
*.Cache
|
||||
ClientBin
|
||||
[Ss]tyle[Cc]op.*
|
||||
~$*
|
||||
*.dbmdl
|
||||
Generated_Code #added for RIA/Silverlight projects
|
||||
|
||||
# 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
|
||||
|
||||
.ionide/symbolCache.db
|
||||
|
||||
*.user
|
||||
@@ -0,0 +1,270 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003" ToolsVersion="4.0">
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<ProductVersion>8.0.50727</ProductVersion>
|
||||
<SchemaVersion>2.0</SchemaVersion>
|
||||
<ProjectGuid>{60CE9527-95BC-433A-BE8F-640489315539}</ProjectGuid>
|
||||
<OutputType>Library</OutputType>
|
||||
<AppDesignerFolder>Properties</AppDesignerFolder>
|
||||
<RootNamespace>IPadLibrary</RootNamespace>
|
||||
<AssemblyName>IPadLibrary</AssemblyName>
|
||||
<IsWebBootstrapper>true</IsWebBootstrapper>
|
||||
<PublishUrl>http://localhost/IPadLibrary/</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>
|
||||
<ApplicationVersion>0.0.1.%2a</ApplicationVersion>
|
||||
<BootstrapperEnabled>true</BootstrapperEnabled>
|
||||
<StartupObject>
|
||||
</StartupObject>
|
||||
<FileUpgradeFlags>
|
||||
</FileUpgradeFlags>
|
||||
<OldToolsVersion>3.5</OldToolsVersion>
|
||||
<ApplicationRevision>0</ApplicationRevision>
|
||||
<UpgradeBackupLocation>
|
||||
</UpgradeBackupLocation>
|
||||
<TargetFrameworkVersion>v4.0</TargetFrameworkVersion>
|
||||
<TargetFrameworkProfile />
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|x86'">
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<OutputPath>..\CameraMng\bin\Debug\</OutputPath>
|
||||
<DefineConstants>DEBUG;TRACE</DefineConstants>
|
||||
<DebugType>full</DebugType>
|
||||
<PlatformTarget>x86</PlatformTarget>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Release|x86'">
|
||||
<OutputPath>..\CameraMng\bin\Release\</OutputPath>
|
||||
<DefineConstants>TRACE</DefineConstants>
|
||||
<Optimize>true</Optimize>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<PlatformTarget>x86</PlatformTarget>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|x64'">
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<OutputPath>bin\x64\Debug\</OutputPath>
|
||||
<DefineConstants>DEBUG;TRACE</DefineConstants>
|
||||
<DebugType>full</DebugType>
|
||||
<PlatformTarget>x64</PlatformTarget>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
<CodeAnalysisIgnoreBuiltInRules>false</CodeAnalysisIgnoreBuiltInRules>
|
||||
<CodeAnalysisFailOnMissingRules>false</CodeAnalysisFailOnMissingRules>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Release|x64'">
|
||||
<OutputPath>bin\x64\Release\</OutputPath>
|
||||
<DefineConstants>TRACE</DefineConstants>
|
||||
<Optimize>true</Optimize>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<PlatformTarget>x64</PlatformTarget>
|
||||
<ErrorReport>prompt</ErrorReport>
|
||||
<CodeAnalysisIgnoreBuiltInRules>false</CodeAnalysisIgnoreBuiltInRules>
|
||||
<CodeAnalysisFailOnMissingRules>false</CodeAnalysisFailOnMissingRules>
|
||||
</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" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="FormsInterfaces\GeneralLibrary.cs" />
|
||||
<Compile Include="FormsInterfaces\NumericPad.cs">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="FormsInterfaces\NumericPad.Designer.cs">
|
||||
<DependentUpon>NumericPad.cs</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="FormsInterfaces\NumericPad.Methods.cs">
|
||||
<DependentUpon>NumericPad.cs</DependentUpon>
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="FormsInterfaces\KeyboradControl.cs">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="FormsInterfaces\KeyboradControl.Designer.cs">
|
||||
<DependentUpon>KeyboradControl.cs</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="FormsInterfaces\KeyboradControl.Methods.cs">
|
||||
<DependentUpon>KeyboradControl.cs</DependentUpon>
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Properties\AssemblyInfo.cs" />
|
||||
<EmbeddedResource Include="FormsInterfaces\NumericPad.resx">
|
||||
<DependentUpon>NumericPad.cs</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="FormsInterfaces\KeyboradControl.resx">
|
||||
<SubType>Designer</SubType>
|
||||
<DependentUpon>KeyboradControl.cs</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="Properties\Resources.resx">
|
||||
<Generator>ResXFileCodeGenerator</Generator>
|
||||
<LastGenOutput>Resources.Designer.cs</LastGenOutput>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<Compile Include="Properties\Resources.Designer.cs">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Resources.resx</DependentUpon>
|
||||
<DesignTime>True</DesignTime>
|
||||
</Compile>
|
||||
<None Include="Properties\Settings.settings">
|
||||
<Generator>SettingsSingleFileGenerator</Generator>
|
||||
<LastGenOutput>Settings.Designer.cs</LastGenOutput>
|
||||
</None>
|
||||
<Compile Include="Properties\Settings.Designer.cs">
|
||||
<AutoGen>True</AutoGen>
|
||||
<DependentUpon>Settings.settings</DependentUpon>
|
||||
<DesignTimeSharedInput>True</DesignTimeSharedInput>
|
||||
</Compile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<BootstrapperPackage Include="Microsoft.Net.Framework.2.0">
|
||||
<Visible>False</Visible>
|
||||
<ProductName>.NET Framework 2.0</ProductName>
|
||||
<Install>true</Install>
|
||||
</BootstrapperPackage>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Disco.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Fresa.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Righello.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Righello2.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\rulers_256.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Disco_diametro.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\MagnifyPlus.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Magnify.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\MagnifyMinus.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\MagnifyPlus_30.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Magnify_30.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\MagnifyMinus_30.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\SaveC.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Delete.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\New.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\OpenDoc.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\OK.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\PlusPlus.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Plus.png" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Plus_32.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Cacciavite.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Cacciavite_50.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\RotCCLeft.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Cacciavite_36.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\OK_56.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\OK_40.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\OK_51.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Arrow_R.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Arrow_Fine_Left.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Arrow_Fine_R.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Arrow_L.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Exit2.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Exit_48.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\exit1.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\FingerUp.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\LineAB.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Line_W.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="Icons\Line_H.gif" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="app.config" />
|
||||
<None Include="Icons\Line_L.gif" />
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildBinPath)\Microsoft.CSharp.targets" />
|
||||
<PropertyGroup>
|
||||
<PostBuildEvent>IF "$(PlatformName)"=="x64" IF "$(ConfigurationName)" == "Release" copy $(TargetPath) c:\EgtProg\CameraMng\IPadLibrary.dll
|
||||
IF "$(PlatformName)"=="x64" IF "$(ConfigurationName)" == "Debug" copy $(TargetPath) c:\EgtProg\CameraMng\IPadLibraryD64.dll
|
||||
</PostBuildEvent>
|
||||
</PropertyGroup>
|
||||
<!-- 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>
|
||||
@@ -0,0 +1 @@
|
||||
<Configurations active="Default"><Configuration name="Default"><Command val=""></Command><RunMode val="a host path through a shared folder"></RunMode><ShareFolders val=""></ShareFolders><RemoteDebugMonitor val="C:\Programmi\Microsoft Visual Studio 8\Common7\IDE\Remote Debugger\x86\msvsmon.exe"></RemoteDebugMonitor><MonitorName val="VMDebug"></MonitorName><VirtualMachine val=""></VirtualMachine><StartMode val="No"></StartMode><TerminationMode val="No operation"></TerminationMode><CopyFiles val=""></CopyFiles><PreCommandLine val=""></PreCommandLine><PostCommandLine val=""></PostCommandLine></Configuration></Configurations>
|
||||
@@ -0,0 +1,20 @@
|
||||
|
||||
Microsoft Visual Studio Solution File, Format Version 10.00
|
||||
# Visual Studio 2008
|
||||
Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "CSharpLibrary", "CSharpLibrary.csproj", "{60CE9527-95BC-433A-BE8F-640489315539}"
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|Any CPU = Debug|Any CPU
|
||||
Release|Any CPU = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Debug|Any CPU.Build.0 = Debug|Any CPU
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Release|Any CPU.ActiveCfg = Release|Any CPU
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Release|Any CPU.Build.0 = Release|Any CPU
|
||||
EndGlobalSection
|
||||
GlobalSection(SolutionProperties) = preSolution
|
||||
HideSolutionNode = FALSE
|
||||
EndGlobalSection
|
||||
EndGlobal
|
||||
@@ -0,0 +1,70 @@
|
||||
/***************************************************/
|
||||
//
|
||||
//
|
||||
/***************************************************/
|
||||
|
||||
|
||||
using System;
|
||||
using System.Drawing;
|
||||
using System.Windows.Forms;
|
||||
using System.Globalization;
|
||||
|
||||
|
||||
namespace IPadLibrary.FormsInterfaces {
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Collect all general porpouse routines used by forms.
|
||||
/// </summary>
|
||||
class GeneralLibrary {
|
||||
|
||||
/// <summary>
|
||||
/// Used to drawing the Form borders only.
|
||||
/// </summary>
|
||||
public static void DrawFormBorder(object sender, PaintEventArgs e) {
|
||||
|
||||
Graphics g = e.Graphics;
|
||||
Form f = (Form) sender;
|
||||
Size drawArea = new Size(f.ClientSize.Width, f.ClientSize.Height);
|
||||
// Drawing the cornice
|
||||
g.DrawRectangle(Pens.Black, 0, 0, drawArea.Width-1, drawArea.Height-1);
|
||||
g.DrawRectangle(Pens.White, 1, 1, drawArea.Width-3, drawArea.Height-3);
|
||||
g.DrawRectangle(Pens.LightGray, 2, 2, drawArea.Width-5, drawArea.Height-5);
|
||||
}
|
||||
|
||||
|
||||
|
||||
public static string float2string(float num) {
|
||||
|
||||
return String.Format("{0:0.00}", num).Replace(',','.');
|
||||
}
|
||||
|
||||
|
||||
|
||||
public static float string2float(string text) {
|
||||
|
||||
return float.Parse( text, new NumberFormatInfo() );
|
||||
}
|
||||
|
||||
|
||||
|
||||
public static PointF convertStr2Point(string xstr, string ystr) {
|
||||
|
||||
NumberFormatInfo nfi = new NumberFormatInfo(); // Number Format Info used for '.'
|
||||
float x, y;
|
||||
x = float.Parse( xstr, nfi );
|
||||
y = float.Parse( ystr, nfi );
|
||||
return ( new PointF(x, y) );
|
||||
}
|
||||
|
||||
|
||||
|
||||
public static bool isNegative(float num) {
|
||||
|
||||
return ( num < 0.0f );
|
||||
}
|
||||
|
||||
|
||||
} // end class
|
||||
|
||||
} // end namespace
|
||||
@@ -0,0 +1,643 @@
|
||||
/***************************************************/
|
||||
// __ ______
|
||||
|
||||
//
|
||||
/***************************************************/
|
||||
|
||||
|
||||
namespace IPadLibrary.FormsInterfaces {
|
||||
|
||||
|
||||
partial class KeyboradControl {
|
||||
/// <summary>
|
||||
/// Required designer variable.
|
||||
/// </summary>
|
||||
private System.ComponentModel.IContainer components = null;
|
||||
|
||||
/// <summary>
|
||||
/// Clean up any resources being used.
|
||||
/// </summary>
|
||||
/// <param name="disposing">true if managed resources should be disposed; otherwise, false.</param>
|
||||
protected override void Dispose(bool disposing) {
|
||||
if ( disposing && (components != null) ) {
|
||||
components.Dispose();
|
||||
}
|
||||
base.Dispose(disposing);
|
||||
}
|
||||
|
||||
#region Component Designer generated code
|
||||
|
||||
/// <summary>
|
||||
/// Required method for Designer support - do not modify
|
||||
/// the contents of this method with the code editor.
|
||||
/// </summary>
|
||||
private void InitializeComponent() {
|
||||
this.NUM0_Button = new System.Windows.Forms.Button();
|
||||
this.NUM1_Button = new System.Windows.Forms.Button();
|
||||
this.NUM2_Button = new System.Windows.Forms.Button();
|
||||
this.NUM3_Button = new System.Windows.Forms.Button();
|
||||
this.NUM5_Button = new System.Windows.Forms.Button();
|
||||
this.NUM4_Button = new System.Windows.Forms.Button();
|
||||
this.NUM6_Button = new System.Windows.Forms.Button();
|
||||
this.NUM7_Button = new System.Windows.Forms.Button();
|
||||
this.NUM8_Button = new System.Windows.Forms.Button();
|
||||
this.NUM9_Button = new System.Windows.Forms.Button();
|
||||
this.KEY1_Button = new System.Windows.Forms.Button();
|
||||
this.KEY2_Button = new System.Windows.Forms.Button();
|
||||
this.KEY3_Button = new System.Windows.Forms.Button();
|
||||
this.KEY4_Button = new System.Windows.Forms.Button();
|
||||
this.KEY5_Button = new System.Windows.Forms.Button();
|
||||
this.KEY6_Button = new System.Windows.Forms.Button();
|
||||
this.KEY7_Button = new System.Windows.Forms.Button();
|
||||
this.KEY8_Button = new System.Windows.Forms.Button();
|
||||
this.KEY9_Button = new System.Windows.Forms.Button();
|
||||
this.KEY10_Button = new System.Windows.Forms.Button();
|
||||
this.KEY11_Button = new System.Windows.Forms.Button();
|
||||
this.KEY12_Button = new System.Windows.Forms.Button();
|
||||
this.KEY13_Button = new System.Windows.Forms.Button();
|
||||
this.KEY14_Button = new System.Windows.Forms.Button();
|
||||
this.KEY15_Button = new System.Windows.Forms.Button();
|
||||
this.KEY16_Button = new System.Windows.Forms.Button();
|
||||
this.KEY17_Button = new System.Windows.Forms.Button();
|
||||
this.KEY18_Button = new System.Windows.Forms.Button();
|
||||
this.KEY19_Button = new System.Windows.Forms.Button();
|
||||
this.KEY20_Button = new System.Windows.Forms.Button();
|
||||
this.KEY21_Button = new System.Windows.Forms.Button();
|
||||
this.KEY22_Button = new System.Windows.Forms.Button();
|
||||
this.KEY23_Button = new System.Windows.Forms.Button();
|
||||
this.KEY24_Button = new System.Windows.Forms.Button();
|
||||
this.KEY25_Button = new System.Windows.Forms.Button();
|
||||
this.KEY26_Button = new System.Windows.Forms.Button();
|
||||
this.SHIFT_Button = new System.Windows.Forms.Button();
|
||||
this.BACKSPACE_Button = new System.Windows.Forms.Button();
|
||||
this.OK_Button = new System.Windows.Forms.Button();
|
||||
this.SPACE_Button = new System.Windows.Forms.Button();
|
||||
this.CANCEL_Button = new System.Windows.Forms.Button();
|
||||
this.Display = new System.Windows.Forms.MaskedTextBox();
|
||||
this.CLEAR_Button = new System.Windows.Forms.Button();
|
||||
this.SIMBOL_Button = new System.Windows.Forms.Button();
|
||||
this.SuspendLayout();
|
||||
//
|
||||
// NUM0_Button
|
||||
//
|
||||
this.NUM0_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM0_Button.Location = new System.Drawing.Point(560, 116);
|
||||
this.NUM0_Button.Name = "NUM0_Button";
|
||||
this.NUM0_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM0_Button.TabIndex = 9;
|
||||
this.NUM0_Button.Text = "0";
|
||||
this.NUM0_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM1_Button
|
||||
//
|
||||
this.NUM1_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM1_Button.Location = new System.Drawing.Point(11, 116);
|
||||
this.NUM1_Button.Name = "NUM1_Button";
|
||||
this.NUM1_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM1_Button.TabIndex = 0;
|
||||
this.NUM1_Button.Text = "1";
|
||||
this.NUM1_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM2_Button
|
||||
//
|
||||
this.NUM2_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM2_Button.Location = new System.Drawing.Point(72, 116);
|
||||
this.NUM2_Button.Name = "NUM2_Button";
|
||||
this.NUM2_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM2_Button.TabIndex = 1;
|
||||
this.NUM2_Button.Text = "2";
|
||||
this.NUM2_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM3_Button
|
||||
//
|
||||
this.NUM3_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM3_Button.Location = new System.Drawing.Point(133, 116);
|
||||
this.NUM3_Button.Name = "NUM3_Button";
|
||||
this.NUM3_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM3_Button.TabIndex = 2;
|
||||
this.NUM3_Button.Text = "3";
|
||||
this.NUM3_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM5_Button
|
||||
//
|
||||
this.NUM5_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM5_Button.Location = new System.Drawing.Point(255, 116);
|
||||
this.NUM5_Button.Name = "NUM5_Button";
|
||||
this.NUM5_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM5_Button.TabIndex = 4;
|
||||
this.NUM5_Button.Text = "5";
|
||||
this.NUM5_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM4_Button
|
||||
//
|
||||
this.NUM4_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM4_Button.Location = new System.Drawing.Point(194, 116);
|
||||
this.NUM4_Button.Name = "NUM4_Button";
|
||||
this.NUM4_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM4_Button.TabIndex = 3;
|
||||
this.NUM4_Button.Text = "4";
|
||||
this.NUM4_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM6_Button
|
||||
//
|
||||
this.NUM6_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM6_Button.Location = new System.Drawing.Point(316, 116);
|
||||
this.NUM6_Button.Name = "NUM6_Button";
|
||||
this.NUM6_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM6_Button.TabIndex = 5;
|
||||
this.NUM6_Button.Text = "6";
|
||||
this.NUM6_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM7_Button
|
||||
//
|
||||
this.NUM7_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM7_Button.Location = new System.Drawing.Point(377, 116);
|
||||
this.NUM7_Button.Name = "NUM7_Button";
|
||||
this.NUM7_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM7_Button.TabIndex = 6;
|
||||
this.NUM7_Button.Text = "7";
|
||||
this.NUM7_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM8_Button
|
||||
//
|
||||
this.NUM8_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM8_Button.Location = new System.Drawing.Point(438, 116);
|
||||
this.NUM8_Button.Name = "NUM8_Button";
|
||||
this.NUM8_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM8_Button.TabIndex = 7;
|
||||
this.NUM8_Button.Text = "8";
|
||||
this.NUM8_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM9_Button
|
||||
//
|
||||
this.NUM9_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM9_Button.Location = new System.Drawing.Point(499, 116);
|
||||
this.NUM9_Button.Name = "NUM9_Button";
|
||||
this.NUM9_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM9_Button.TabIndex = 8;
|
||||
this.NUM9_Button.Text = "9";
|
||||
this.NUM9_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY1_Button
|
||||
//
|
||||
this.KEY1_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY1_Button.Location = new System.Drawing.Point(499, 184);
|
||||
this.KEY1_Button.Name = "KEY1_Button";
|
||||
this.KEY1_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY1_Button.TabIndex = 18;
|
||||
this.KEY1_Button.Text = "o";
|
||||
this.KEY1_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY2_Button
|
||||
//
|
||||
this.KEY2_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY2_Button.Location = new System.Drawing.Point(560, 184);
|
||||
this.KEY2_Button.Name = "KEY2_Button";
|
||||
this.KEY2_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY2_Button.TabIndex = 19;
|
||||
this.KEY2_Button.Text = "p";
|
||||
this.KEY2_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY3_Button
|
||||
//
|
||||
this.KEY3_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY3_Button.Location = new System.Drawing.Point(438, 184);
|
||||
this.KEY3_Button.Name = "KEY3_Button";
|
||||
this.KEY3_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY3_Button.TabIndex = 17;
|
||||
this.KEY3_Button.Text = "i";
|
||||
this.KEY3_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY4_Button
|
||||
//
|
||||
this.KEY4_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY4_Button.Location = new System.Drawing.Point(377, 184);
|
||||
this.KEY4_Button.Name = "KEY4_Button";
|
||||
this.KEY4_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY4_Button.TabIndex = 16;
|
||||
this.KEY4_Button.Text = "u";
|
||||
this.KEY4_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY5_Button
|
||||
//
|
||||
this.KEY5_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY5_Button.Location = new System.Drawing.Point(316, 184);
|
||||
this.KEY5_Button.Name = "KEY5_Button";
|
||||
this.KEY5_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY5_Button.TabIndex = 15;
|
||||
this.KEY5_Button.Text = "y";
|
||||
this.KEY5_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY6_Button
|
||||
//
|
||||
this.KEY6_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY6_Button.Location = new System.Drawing.Point(194, 184);
|
||||
this.KEY6_Button.Name = "KEY6_Button";
|
||||
this.KEY6_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY6_Button.TabIndex = 13;
|
||||
this.KEY6_Button.Text = "r";
|
||||
this.KEY6_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY7_Button
|
||||
//
|
||||
this.KEY7_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY7_Button.Location = new System.Drawing.Point(255, 184);
|
||||
this.KEY7_Button.Name = "KEY7_Button";
|
||||
this.KEY7_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY7_Button.TabIndex = 14;
|
||||
this.KEY7_Button.Text = "t";
|
||||
this.KEY7_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY8_Button
|
||||
//
|
||||
this.KEY8_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY8_Button.Location = new System.Drawing.Point(133, 184);
|
||||
this.KEY8_Button.Name = "KEY8_Button";
|
||||
this.KEY8_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY8_Button.TabIndex = 12;
|
||||
this.KEY8_Button.Text = "e";
|
||||
this.KEY8_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY9_Button
|
||||
//
|
||||
this.KEY9_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY9_Button.Location = new System.Drawing.Point(72, 184);
|
||||
this.KEY9_Button.Name = "KEY9_Button";
|
||||
this.KEY9_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY9_Button.TabIndex = 11;
|
||||
this.KEY9_Button.Text = "w";
|
||||
this.KEY9_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY10_Button
|
||||
//
|
||||
this.KEY10_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY10_Button.Location = new System.Drawing.Point(11, 184);
|
||||
this.KEY10_Button.Name = "KEY10_Button";
|
||||
this.KEY10_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY10_Button.TabIndex = 10;
|
||||
this.KEY10_Button.Text = "q";
|
||||
this.KEY10_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY11_Button
|
||||
//
|
||||
this.KEY11_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY11_Button.Location = new System.Drawing.Point(26, 306);
|
||||
this.KEY11_Button.Name = "KEY11_Button";
|
||||
this.KEY11_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY11_Button.TabIndex = 30;
|
||||
this.KEY11_Button.Text = "z";
|
||||
this.KEY11_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY12_Button
|
||||
//
|
||||
this.KEY12_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY12_Button.Location = new System.Drawing.Point(468, 245);
|
||||
this.KEY12_Button.Name = "KEY12_Button";
|
||||
this.KEY12_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY12_Button.TabIndex = 28;
|
||||
this.KEY12_Button.Text = "k";
|
||||
this.KEY12_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY13_Button
|
||||
//
|
||||
this.KEY13_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY13_Button.Location = new System.Drawing.Point(529, 245);
|
||||
this.KEY13_Button.Name = "KEY13_Button";
|
||||
this.KEY13_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY13_Button.TabIndex = 29;
|
||||
this.KEY13_Button.Text = "l";
|
||||
this.KEY13_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY14_Button
|
||||
//
|
||||
this.KEY14_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY14_Button.Location = new System.Drawing.Point(407, 245);
|
||||
this.KEY14_Button.Name = "KEY14_Button";
|
||||
this.KEY14_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY14_Button.TabIndex = 27;
|
||||
this.KEY14_Button.Text = "j";
|
||||
this.KEY14_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY15_Button
|
||||
//
|
||||
this.KEY15_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY15_Button.Location = new System.Drawing.Point(346, 245);
|
||||
this.KEY15_Button.Name = "KEY15_Button";
|
||||
this.KEY15_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY15_Button.TabIndex = 26;
|
||||
this.KEY15_Button.Text = "h";
|
||||
this.KEY15_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY16_Button
|
||||
//
|
||||
this.KEY16_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY16_Button.Location = new System.Drawing.Point(285, 245);
|
||||
this.KEY16_Button.Name = "KEY16_Button";
|
||||
this.KEY16_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY16_Button.TabIndex = 25;
|
||||
this.KEY16_Button.Text = "g";
|
||||
this.KEY16_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY17_Button
|
||||
//
|
||||
this.KEY17_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY17_Button.Location = new System.Drawing.Point(163, 245);
|
||||
this.KEY17_Button.Name = "KEY17_Button";
|
||||
this.KEY17_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY17_Button.TabIndex = 23;
|
||||
this.KEY17_Button.Text = "d";
|
||||
this.KEY17_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY18_Button
|
||||
//
|
||||
this.KEY18_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY18_Button.Location = new System.Drawing.Point(224, 245);
|
||||
this.KEY18_Button.Name = "KEY18_Button";
|
||||
this.KEY18_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY18_Button.TabIndex = 24;
|
||||
this.KEY18_Button.Text = "f";
|
||||
this.KEY18_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY19_Button
|
||||
//
|
||||
this.KEY19_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY19_Button.Location = new System.Drawing.Point(102, 245);
|
||||
this.KEY19_Button.Name = "KEY19_Button";
|
||||
this.KEY19_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY19_Button.TabIndex = 22;
|
||||
this.KEY19_Button.Text = "s";
|
||||
this.KEY19_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY20_Button
|
||||
//
|
||||
this.KEY20_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY20_Button.Location = new System.Drawing.Point(41, 245);
|
||||
this.KEY20_Button.Name = "KEY20_Button";
|
||||
this.KEY20_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY20_Button.TabIndex = 21;
|
||||
this.KEY20_Button.Text = "a";
|
||||
this.KEY20_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY21_Button
|
||||
//
|
||||
this.KEY21_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY21_Button.Location = new System.Drawing.Point(392, 306);
|
||||
this.KEY21_Button.Name = "KEY21_Button";
|
||||
this.KEY21_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY21_Button.TabIndex = 36;
|
||||
this.KEY21_Button.Text = "m";
|
||||
this.KEY21_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY22_Button
|
||||
//
|
||||
this.KEY22_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY22_Button.Location = new System.Drawing.Point(331, 306);
|
||||
this.KEY22_Button.Name = "KEY22_Button";
|
||||
this.KEY22_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY22_Button.TabIndex = 35;
|
||||
this.KEY22_Button.Text = "n";
|
||||
this.KEY22_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY23_Button
|
||||
//
|
||||
this.KEY23_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY23_Button.Location = new System.Drawing.Point(209, 306);
|
||||
this.KEY23_Button.Name = "KEY23_Button";
|
||||
this.KEY23_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY23_Button.TabIndex = 33;
|
||||
this.KEY23_Button.Text = "v";
|
||||
this.KEY23_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY24_Button
|
||||
//
|
||||
this.KEY24_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY24_Button.Location = new System.Drawing.Point(270, 306);
|
||||
this.KEY24_Button.Name = "KEY24_Button";
|
||||
this.KEY24_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY24_Button.TabIndex = 34;
|
||||
this.KEY24_Button.Text = "b";
|
||||
this.KEY24_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY25_Button
|
||||
//
|
||||
this.KEY25_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY25_Button.Location = new System.Drawing.Point(148, 306);
|
||||
this.KEY25_Button.Name = "KEY25_Button";
|
||||
this.KEY25_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY25_Button.TabIndex = 32;
|
||||
this.KEY25_Button.Text = "c";
|
||||
this.KEY25_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// KEY26_Button
|
||||
//
|
||||
this.KEY26_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.KEY26_Button.Location = new System.Drawing.Point(87, 306);
|
||||
this.KEY26_Button.Name = "KEY26_Button";
|
||||
this.KEY26_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.KEY26_Button.TabIndex = 31;
|
||||
this.KEY26_Button.Text = "x";
|
||||
this.KEY26_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// SHIFT_Button
|
||||
//
|
||||
this.SHIFT_Button.Font = new System.Drawing.Font("Symbol", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.SHIFT_Button.Location = new System.Drawing.Point(11, 374);
|
||||
this.SHIFT_Button.Name = "SHIFT_Button";
|
||||
this.SHIFT_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.SHIFT_Button.TabIndex = 20;
|
||||
this.SHIFT_Button.Text = "T";
|
||||
this.SHIFT_Button.UseVisualStyleBackColor = true;
|
||||
this.SHIFT_Button.Click += new System.EventHandler(this.SHIFT_Button_Click);
|
||||
//
|
||||
// BACKSPACE_Button
|
||||
//
|
||||
this.BACKSPACE_Button.Font = new System.Drawing.Font("Symbol", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.BACKSPACE_Button.Location = new System.Drawing.Point(514, 306);
|
||||
this.BACKSPACE_Button.Name = "BACKSPACE_Button";
|
||||
this.BACKSPACE_Button.Size = new System.Drawing.Size(93, 62);
|
||||
this.BACKSPACE_Button.TabIndex = 38;
|
||||
this.BACKSPACE_Button.Text = "<-";
|
||||
this.BACKSPACE_Button.UseVisualStyleBackColor = true;
|
||||
this.BACKSPACE_Button.Click += new System.EventHandler(this.BACKSPACE_Button_Click);
|
||||
//
|
||||
// OK_Button
|
||||
//
|
||||
this.OK_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.OK_Button.Image = global::IPadLibrary.Properties.Resources.OK;
|
||||
this.OK_Button.Location = new System.Drawing.Point(319, 404);
|
||||
this.OK_Button.Name = "OK_Button";
|
||||
this.OK_Button.Size = new System.Drawing.Size(123, 62);
|
||||
this.OK_Button.TabIndex = 39;
|
||||
this.OK_Button.UseVisualStyleBackColor = true;
|
||||
this.OK_Button.Click += new System.EventHandler(this.OK_Button_Click);
|
||||
//
|
||||
// SPACE_Button
|
||||
//
|
||||
this.SPACE_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.SPACE_Button.Location = new System.Drawing.Point(453, 306);
|
||||
this.SPACE_Button.Name = "SPACE_Button";
|
||||
this.SPACE_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.SPACE_Button.TabIndex = 37;
|
||||
this.SPACE_Button.Text = " ";
|
||||
this.SPACE_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// CANCEL_Button
|
||||
//
|
||||
this.CANCEL_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel;
|
||||
this.CANCEL_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.CANCEL_Button.Image = global::IPadLibrary.Properties.Resources.Delete;
|
||||
this.CANCEL_Button.Location = new System.Drawing.Point(472, 404);
|
||||
this.CANCEL_Button.Name = "CANCEL_Button";
|
||||
this.CANCEL_Button.Size = new System.Drawing.Size(123, 62);
|
||||
this.CANCEL_Button.TabIndex = 40;
|
||||
this.CANCEL_Button.UseVisualStyleBackColor = true;
|
||||
this.CANCEL_Button.Click += new System.EventHandler(this.CANCEL_Button_Click);
|
||||
//
|
||||
// Display
|
||||
//
|
||||
this.Display.AsciiOnly = true;
|
||||
this.Display.BackColor = System.Drawing.Color.White;
|
||||
this.Display.CausesValidation = false;
|
||||
this.Display.Font = new System.Drawing.Font("Microsoft Sans Serif", 26.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.Display.Location = new System.Drawing.Point(34, 36);
|
||||
this.Display.Name = "Display";
|
||||
this.Display.PromptChar = '*';
|
||||
this.Display.ReadOnly = true;
|
||||
this.Display.Size = new System.Drawing.Size(573, 51);
|
||||
this.Display.TabIndex = 41;
|
||||
this.Display.TextAlign = System.Windows.Forms.HorizontalAlignment.Right;
|
||||
//
|
||||
// CLEAR_Button
|
||||
//
|
||||
this.CLEAR_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.CLEAR_Button.ForeColor = System.Drawing.Color.FromArgb(((int)(((byte)(192)))), ((int)(((byte)(0)))), ((int)(((byte)(0)))));
|
||||
this.CLEAR_Button.Location = new System.Drawing.Point(102, 374);
|
||||
this.CLEAR_Button.Name = "CLEAR_Button";
|
||||
this.CLEAR_Button.Size = new System.Drawing.Size(93, 62);
|
||||
this.CLEAR_Button.TabIndex = 42;
|
||||
this.CLEAR_Button.Text = "CE";
|
||||
this.CLEAR_Button.UseVisualStyleBackColor = true;
|
||||
this.CLEAR_Button.Click += new System.EventHandler(this.CLEAR_Button_Click);
|
||||
//
|
||||
// SIMBOL_Button
|
||||
//
|
||||
this.SIMBOL_Button.Font = new System.Drawing.Font("Symbol", 21.73585F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(2)));
|
||||
this.SIMBOL_Button.Location = new System.Drawing.Point(224, 375);
|
||||
this.SIMBOL_Button.Name = "SIMBOL_Button";
|
||||
this.SIMBOL_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.SIMBOL_Button.TabIndex = 43;
|
||||
this.SIMBOL_Button.Text = "&&";
|
||||
this.SIMBOL_Button.UseVisualStyleBackColor = true;
|
||||
this.SIMBOL_Button.Click += new System.EventHandler(this.SIMBOL_Button_Click);
|
||||
//
|
||||
// KeyboradControl
|
||||
//
|
||||
this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None;
|
||||
this.BackColor = System.Drawing.Color.LightSlateGray;
|
||||
this.CancelButton = this.CANCEL_Button;
|
||||
this.ClientSize = new System.Drawing.Size(640, 480);
|
||||
this.Controls.Add(this.SIMBOL_Button);
|
||||
this.Controls.Add(this.CLEAR_Button);
|
||||
this.Controls.Add(this.Display);
|
||||
this.Controls.Add(this.CANCEL_Button);
|
||||
this.Controls.Add(this.BACKSPACE_Button);
|
||||
this.Controls.Add(this.OK_Button);
|
||||
this.Controls.Add(this.SPACE_Button);
|
||||
this.Controls.Add(this.KEY21_Button);
|
||||
this.Controls.Add(this.KEY22_Button);
|
||||
this.Controls.Add(this.KEY23_Button);
|
||||
this.Controls.Add(this.KEY24_Button);
|
||||
this.Controls.Add(this.KEY25_Button);
|
||||
this.Controls.Add(this.KEY26_Button);
|
||||
this.Controls.Add(this.KEY11_Button);
|
||||
this.Controls.Add(this.KEY12_Button);
|
||||
this.Controls.Add(this.KEY13_Button);
|
||||
this.Controls.Add(this.KEY14_Button);
|
||||
this.Controls.Add(this.KEY15_Button);
|
||||
this.Controls.Add(this.KEY16_Button);
|
||||
this.Controls.Add(this.KEY17_Button);
|
||||
this.Controls.Add(this.KEY18_Button);
|
||||
this.Controls.Add(this.KEY19_Button);
|
||||
this.Controls.Add(this.KEY20_Button);
|
||||
this.Controls.Add(this.SHIFT_Button);
|
||||
this.Controls.Add(this.KEY1_Button);
|
||||
this.Controls.Add(this.KEY2_Button);
|
||||
this.Controls.Add(this.KEY3_Button);
|
||||
this.Controls.Add(this.KEY4_Button);
|
||||
this.Controls.Add(this.KEY5_Button);
|
||||
this.Controls.Add(this.KEY6_Button);
|
||||
this.Controls.Add(this.KEY7_Button);
|
||||
this.Controls.Add(this.KEY8_Button);
|
||||
this.Controls.Add(this.KEY9_Button);
|
||||
this.Controls.Add(this.KEY10_Button);
|
||||
this.Controls.Add(this.NUM9_Button);
|
||||
this.Controls.Add(this.NUM0_Button);
|
||||
this.Controls.Add(this.NUM8_Button);
|
||||
this.Controls.Add(this.NUM7_Button);
|
||||
this.Controls.Add(this.NUM6_Button);
|
||||
this.Controls.Add(this.NUM4_Button);
|
||||
this.Controls.Add(this.NUM5_Button);
|
||||
this.Controls.Add(this.NUM3_Button);
|
||||
this.Controls.Add(this.NUM2_Button);
|
||||
this.Controls.Add(this.NUM1_Button);
|
||||
this.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None;
|
||||
this.KeyPreview = true;
|
||||
this.Name = "KeyboradControl";
|
||||
this.ShowInTaskbar = false;
|
||||
this.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen;
|
||||
this.Paint += new System.Windows.Forms.PaintEventHandler(this.KeyboradControl_Paint);
|
||||
this.KeyPress += new System.Windows.Forms.KeyPressEventHandler(this.KeyboradControl_KeyPress);
|
||||
this.ResumeLayout(false);
|
||||
this.PerformLayout();
|
||||
|
||||
}
|
||||
|
||||
#endregion
|
||||
|
||||
private System.Windows.Forms.Button NUM0_Button;
|
||||
private System.Windows.Forms.Button NUM1_Button;
|
||||
private System.Windows.Forms.Button NUM2_Button;
|
||||
private System.Windows.Forms.Button NUM3_Button;
|
||||
private System.Windows.Forms.Button NUM5_Button;
|
||||
private System.Windows.Forms.Button NUM4_Button;
|
||||
private System.Windows.Forms.Button NUM6_Button;
|
||||
private System.Windows.Forms.Button NUM7_Button;
|
||||
private System.Windows.Forms.Button NUM8_Button;
|
||||
private System.Windows.Forms.Button NUM9_Button;
|
||||
private System.Windows.Forms.Button KEY1_Button;
|
||||
private System.Windows.Forms.Button KEY2_Button;
|
||||
private System.Windows.Forms.Button KEY3_Button;
|
||||
private System.Windows.Forms.Button KEY4_Button;
|
||||
private System.Windows.Forms.Button KEY5_Button;
|
||||
private System.Windows.Forms.Button KEY6_Button;
|
||||
private System.Windows.Forms.Button KEY7_Button;
|
||||
private System.Windows.Forms.Button KEY8_Button;
|
||||
private System.Windows.Forms.Button KEY9_Button;
|
||||
private System.Windows.Forms.Button KEY10_Button;
|
||||
private System.Windows.Forms.Button KEY12_Button;
|
||||
private System.Windows.Forms.Button KEY13_Button;
|
||||
private System.Windows.Forms.Button KEY14_Button;
|
||||
private System.Windows.Forms.Button KEY15_Button;
|
||||
private System.Windows.Forms.Button KEY16_Button;
|
||||
private System.Windows.Forms.Button KEY17_Button;
|
||||
private System.Windows.Forms.Button KEY18_Button;
|
||||
private System.Windows.Forms.Button KEY19_Button;
|
||||
private System.Windows.Forms.Button KEY20_Button;
|
||||
private System.Windows.Forms.Button KEY21_Button;
|
||||
private System.Windows.Forms.Button KEY22_Button;
|
||||
private System.Windows.Forms.Button KEY23_Button;
|
||||
private System.Windows.Forms.Button KEY24_Button;
|
||||
private System.Windows.Forms.Button KEY25_Button;
|
||||
private System.Windows.Forms.Button KEY26_Button;
|
||||
private System.Windows.Forms.Button KEY11_Button;
|
||||
private System.Windows.Forms.Button SHIFT_Button;
|
||||
private System.Windows.Forms.Button BACKSPACE_Button;
|
||||
private System.Windows.Forms.Button SPACE_Button;
|
||||
private System.Windows.Forms.Button OK_Button;
|
||||
private System.Windows.Forms.Button CANCEL_Button;
|
||||
private System.Windows.Forms.MaskedTextBox Display;
|
||||
private System.Windows.Forms.Button CLEAR_Button;
|
||||
private System.Windows.Forms.Button SIMBOL_Button;
|
||||
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,204 @@
|
||||
/***************************************************/
|
||||
/***************************************************/
|
||||
|
||||
|
||||
using System.Windows.Forms;
|
||||
|
||||
|
||||
namespace IPadLibrary.FormsInterfaces {
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Keyboard component, instantiate the Keyboard Form.
|
||||
/// </summary>
|
||||
partial class KeyboradControl {
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Constant & Static Variables
|
||||
/*******************************************************************************************/
|
||||
#region Constant & Static Variables
|
||||
|
||||
private const int MAX_DISPLAY_CHAR = 250; // Maximun number of char to text
|
||||
private const char SHIFT_CHAR = '\u00ad'; // The simbol ^
|
||||
private const char BACKSPACE_CHAR = '\u00ac'; // The simbol <--
|
||||
private const string SIMBOL_CHARS = "~'().,_\\-*"; // Symbol key sequence
|
||||
private const string NUMBER_CHARS = "0123456789"; // Number key sequence
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Public Variables Definition
|
||||
/*******************************************************************************************/
|
||||
#region Public Variables Definiton
|
||||
// ...
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Private Variables Definition
|
||||
/*******************************************************************************************/
|
||||
#region Private Variables Definition
|
||||
|
||||
private Control owner; ///< The owner of Form Dialog
|
||||
private Button[] buttonGroupNumbers; ///< Used to manage all group of Nubers buttons
|
||||
private Button[] buttonGroupKeys; ///< Used to manage all group of Keys buttons
|
||||
private bool shift_pressed; ///< Monitor the Shift-Key pression
|
||||
private bool simbol_pressed; ///< Monitor the Simbol-Key pression
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Public Methods Definition
|
||||
/*******************************************************************************************/
|
||||
#region Public Methods Definition
|
||||
|
||||
//------------------------------------ DIALOG SECTION -------------------------------------//
|
||||
|
||||
/// <summary>
|
||||
/// Show this dialog, in modal mode.
|
||||
/// </summary>
|
||||
/// <param name="owner">Any object that implement <c>IWin32Window</c> that is the fisrt level window owner of the modal dialog.</param>
|
||||
/// <returns>One value of <c>DialogResult</c>.</returns>
|
||||
public DialogResult ShowDialog(Control owner) {
|
||||
this.owner = owner;
|
||||
return base.ShowDialog(owner);
|
||||
}
|
||||
|
||||
//------------------------------------ GETS SECTION ---------------------------------------//
|
||||
|
||||
/// <summary>
|
||||
/// Get/Set the text typed.
|
||||
/// </summary>
|
||||
public override string Text {
|
||||
get {
|
||||
if ( Display != null )
|
||||
return Display.Text;
|
||||
else
|
||||
return "";
|
||||
}
|
||||
set {
|
||||
if ( Display != null ) {
|
||||
Display.Text = value.Trim();
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Private Methods Definition
|
||||
/*******************************************************************************************/
|
||||
#region Private Methods Definition
|
||||
|
||||
//------------------------------------- INIT SECTION --------------------------------------//
|
||||
|
||||
/// <summary>
|
||||
/// Initialize all component of this Form.
|
||||
/// </summary>
|
||||
private void InizializeLocalData() {
|
||||
|
||||
shift_pressed = false;
|
||||
simbol_pressed = false;
|
||||
SHIFT_Button.Text = SHIFT_CHAR.ToString(); // Set to correct ASCII char.
|
||||
BACKSPACE_Button.Text = BACKSPACE_CHAR.ToString(); // Set to correct ASCII char.
|
||||
|
||||
buttonGroupNumbers = new Button[] {
|
||||
NUM0_Button, NUM1_Button, NUM2_Button, NUM3_Button, NUM5_Button,
|
||||
NUM4_Button, NUM6_Button, NUM7_Button, NUM8_Button, NUM9_Button
|
||||
};
|
||||
setEventClick(buttonGroupNumbers);
|
||||
|
||||
buttonGroupKeys = new Button[] {
|
||||
KEY1_Button, KEY2_Button, KEY3_Button, KEY4_Button, KEY5_Button,
|
||||
KEY6_Button, KEY7_Button, KEY8_Button, KEY9_Button, KEY10_Button,
|
||||
KEY11_Button, KEY12_Button, KEY13_Button, KEY14_Button, KEY15_Button,
|
||||
KEY16_Button, KEY17_Button, KEY18_Button, KEY19_Button, KEY20_Button,
|
||||
KEY21_Button, KEY22_Button, KEY23_Button, KEY24_Button, KEY25_Button,
|
||||
KEY26_Button
|
||||
};
|
||||
setEventClick(buttonGroupKeys);
|
||||
setEventClick(SPACE_Button);
|
||||
this.Select(); // Default selceted button
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Add <c>Key_Button_Click</c> Event to button.
|
||||
/// </summary>
|
||||
/// <param name="b">The <c>Button</c> the implement a click event.</param>
|
||||
private void setEventClick(Button b) {
|
||||
|
||||
b.Click += new System.EventHandler(KEY_Button_Click);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Add <c>Key_Button_Click</c> Event to buttons group.
|
||||
/// </summary>
|
||||
/// <param name="group"></param>
|
||||
private void setEventClick(Button[] group) {
|
||||
|
||||
foreach ( Button b in group )
|
||||
b.Click += new System.EventHandler(KEY_Button_Click);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Change all keys char in UpperCase.
|
||||
/// </summary>
|
||||
private void toUpperChase() {
|
||||
|
||||
foreach ( Button b in buttonGroupKeys )
|
||||
b.Text = b.Text.ToUpper();
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Change all keys char in LowerCase.
|
||||
/// </summary>
|
||||
private void toLowerChase() {
|
||||
|
||||
foreach ( Button b in buttonGroupKeys )
|
||||
b.Text = b.Text.ToLower();
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Switch all Key numbers in symbol mode.
|
||||
/// </summary>
|
||||
private void switchToSymbol() {
|
||||
int idx = 0;
|
||||
foreach ( Button b in buttonGroupNumbers )
|
||||
b.Text = SIMBOL_CHARS[idx++].ToString();
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Switch all Key numbers in symbol mode.
|
||||
/// </summary>
|
||||
private void switchToNumber() {
|
||||
int idx = 0;
|
||||
foreach ( Button b in buttonGroupNumbers )
|
||||
b.Text = NUMBER_CHARS[idx++].ToString();
|
||||
}
|
||||
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
} // end class
|
||||
|
||||
} // end namespace
|
||||
|
||||
@@ -0,0 +1,147 @@
|
||||
/***************************************************/
|
||||
// __ ______
|
||||
//
|
||||
/***************************************************/
|
||||
|
||||
|
||||
using System;
|
||||
using System.Drawing;
|
||||
using System.Windows.Forms;
|
||||
|
||||
|
||||
namespace IPadLibrary.FormsInterfaces {
|
||||
|
||||
|
||||
public partial class KeyboradControl : Form {
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Constructors and Initialization
|
||||
/*******************************************************************************************/
|
||||
#region Public Class Constructors
|
||||
|
||||
|
||||
public KeyboradControl() {
|
||||
|
||||
InitializeComponent(); // This is for the designer (not edit)
|
||||
InizializeLocalData(); // This is for local data private/public
|
||||
}
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Form Events
|
||||
/*******************************************************************************************/
|
||||
#region Form Events
|
||||
|
||||
|
||||
private void SHIFT_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
shift_pressed = !shift_pressed;
|
||||
if ( shift_pressed ) {
|
||||
SHIFT_Button.FlatStyle = FlatStyle.Standard;
|
||||
SHIFT_Button.BackColor = ProfessionalColors.ButtonPressedHighlight;
|
||||
toUpperChase();
|
||||
}
|
||||
else {
|
||||
SHIFT_Button.FlatStyle = FlatStyle.System;
|
||||
SHIFT_Button.BackColor = Button.DefaultBackColor;
|
||||
toLowerChase();
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void SIMBOL_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
simbol_pressed = !simbol_pressed;
|
||||
if (simbol_pressed) {
|
||||
SIMBOL_Button.FlatStyle = FlatStyle.Standard;
|
||||
SIMBOL_Button.BackColor = ProfessionalColors.ButtonPressedHighlight;
|
||||
switchToSymbol();
|
||||
}
|
||||
else {
|
||||
SIMBOL_Button.FlatStyle = FlatStyle.System;
|
||||
SIMBOL_Button.BackColor = Button.DefaultBackColor;
|
||||
switchToNumber();
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void KEY_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
if (Display.Text.Length < MAX_DISPLAY_CHAR) { // If not reach the maximus text length
|
||||
Display.Text += ((Button)sender).Text; // Insert the char into text line
|
||||
Display.SelectionStart = Display.TextLength; // Allign the string on right
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void BACKSPACE_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
int len;
|
||||
if ((len = Display.Text.Length) > 0) { // If there is somethig to delete
|
||||
Display.Text = Display.Text.Remove(len - 1); // Remove last char (right side)
|
||||
Display.SelectionStart = Display.TextLength; // Allign the string on right
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void OK_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
this.DialogResult = DialogResult.OK;
|
||||
Close();
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void CANCEL_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
this.DialogResult = DialogResult.Cancel;
|
||||
Close();
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void CLEAR_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
Display.Text = "";
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Used to drawing the Form borders only.
|
||||
/// </summary>
|
||||
private void KeyboradControl_Paint(object sender, PaintEventArgs e) {
|
||||
|
||||
GeneralLibrary.DrawFormBorder(sender, e);
|
||||
}
|
||||
|
||||
|
||||
private void KeyboradControl_KeyPress(object sender, KeyPressEventArgs e) {
|
||||
|
||||
char ch = e.KeyChar;
|
||||
int len = Display.Text.Length;
|
||||
// If there is somethig to delete
|
||||
if (len > 0 && ch == '\b' ) {
|
||||
Display.Text = Display.Text.Remove(len - 1); // Remove last char (right side)
|
||||
} else
|
||||
if (Display.Text.Length < MAX_DISPLAY_CHAR) {
|
||||
Display.Text += ch.ToString(); // Insert the char into text line
|
||||
}
|
||||
Display.SelectionStart = Display.TextLength; // Allign the string on right
|
||||
}
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
} // end class
|
||||
|
||||
} // end namespace
|
||||
@@ -0,0 +1,123 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=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>
|
||||
<metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
</root>
|
||||
+302
@@ -0,0 +1,302 @@
|
||||
/***************************************************/
|
||||
// __ ______
|
||||
//
|
||||
/***************************************************/
|
||||
|
||||
|
||||
namespace IPadLibrary.FormsInterfaces {
|
||||
|
||||
|
||||
partial class NumericPad {
|
||||
/// <summary>
|
||||
/// Required designer variable.
|
||||
/// </summary>
|
||||
private System.ComponentModel.IContainer components = null;
|
||||
|
||||
/// <summary>
|
||||
/// Clean up any resources being used.
|
||||
/// </summary>
|
||||
/// <param name="disposing">true if managed resources should be disposed; otherwise, false.</param>
|
||||
protected override void Dispose(bool disposing) {
|
||||
if ( disposing && (components != null) ) {
|
||||
components.Dispose();
|
||||
}
|
||||
base.Dispose(disposing);
|
||||
}
|
||||
|
||||
#region Component Designer generated code
|
||||
|
||||
/// <summary>
|
||||
/// Required method for Designer support - do not modify
|
||||
/// the contents of this method with the code editor.
|
||||
/// </summary>
|
||||
private void InitializeComponent() {
|
||||
this.NUM0_Button = new System.Windows.Forms.Button();
|
||||
this.NUM1_Button = new System.Windows.Forms.Button();
|
||||
this.NUM2_Button = new System.Windows.Forms.Button();
|
||||
this.NUM3_Button = new System.Windows.Forms.Button();
|
||||
this.NUM5_Button = new System.Windows.Forms.Button();
|
||||
this.NUM4_Button = new System.Windows.Forms.Button();
|
||||
this.NUM6_Button = new System.Windows.Forms.Button();
|
||||
this.NUM7_Button = new System.Windows.Forms.Button();
|
||||
this.NUM8_Button = new System.Windows.Forms.Button();
|
||||
this.NUM9_Button = new System.Windows.Forms.Button();
|
||||
this.BACKSPACE_Button = new System.Windows.Forms.Button();
|
||||
this.OK_Button = new System.Windows.Forms.Button();
|
||||
this.DOT_Button = new System.Windows.Forms.Button();
|
||||
this.CANCEL_Button = new System.Windows.Forms.Button();
|
||||
this.Display = new System.Windows.Forms.MaskedTextBox();
|
||||
this.SIGN_Button = new System.Windows.Forms.Button();
|
||||
this.CE_Button = new System.Windows.Forms.Button();
|
||||
this.SuspendLayout();
|
||||
//
|
||||
// NUM0_Button
|
||||
//
|
||||
this.NUM0_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM0_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM0_Button.Location = new System.Drawing.Point(12, 323);
|
||||
this.NUM0_Button.Name = "NUM0_Button";
|
||||
this.NUM0_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM0_Button.TabIndex = 9;
|
||||
this.NUM0_Button.Text = "0";
|
||||
this.NUM0_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM1_Button
|
||||
//
|
||||
this.NUM1_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM1_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM1_Button.Location = new System.Drawing.Point(12, 262);
|
||||
this.NUM1_Button.Name = "NUM1_Button";
|
||||
this.NUM1_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM1_Button.TabIndex = 0;
|
||||
this.NUM1_Button.Text = "1";
|
||||
this.NUM1_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM2_Button
|
||||
//
|
||||
this.NUM2_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM2_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM2_Button.Location = new System.Drawing.Point(73, 262);
|
||||
this.NUM2_Button.Name = "NUM2_Button";
|
||||
this.NUM2_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM2_Button.TabIndex = 1;
|
||||
this.NUM2_Button.Text = "2";
|
||||
this.NUM2_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM3_Button
|
||||
//
|
||||
this.NUM3_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM3_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM3_Button.Location = new System.Drawing.Point(134, 262);
|
||||
this.NUM3_Button.Name = "NUM3_Button";
|
||||
this.NUM3_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM3_Button.TabIndex = 2;
|
||||
this.NUM3_Button.Text = "3";
|
||||
this.NUM3_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM5_Button
|
||||
//
|
||||
this.NUM5_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM5_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM5_Button.Location = new System.Drawing.Point(73, 201);
|
||||
this.NUM5_Button.Name = "NUM5_Button";
|
||||
this.NUM5_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM5_Button.TabIndex = 4;
|
||||
this.NUM5_Button.Text = "5";
|
||||
this.NUM5_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM4_Button
|
||||
//
|
||||
this.NUM4_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM4_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM4_Button.Location = new System.Drawing.Point(12, 201);
|
||||
this.NUM4_Button.Name = "NUM4_Button";
|
||||
this.NUM4_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM4_Button.TabIndex = 3;
|
||||
this.NUM4_Button.Text = "4";
|
||||
this.NUM4_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM6_Button
|
||||
//
|
||||
this.NUM6_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM6_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM6_Button.Location = new System.Drawing.Point(134, 201);
|
||||
this.NUM6_Button.Name = "NUM6_Button";
|
||||
this.NUM6_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM6_Button.TabIndex = 5;
|
||||
this.NUM6_Button.Text = "6";
|
||||
this.NUM6_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM7_Button
|
||||
//
|
||||
this.NUM7_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM7_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM7_Button.Location = new System.Drawing.Point(12, 140);
|
||||
this.NUM7_Button.Name = "NUM7_Button";
|
||||
this.NUM7_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM7_Button.TabIndex = 6;
|
||||
this.NUM7_Button.Text = "7";
|
||||
this.NUM7_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM8_Button
|
||||
//
|
||||
this.NUM8_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM8_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM8_Button.Location = new System.Drawing.Point(73, 140);
|
||||
this.NUM8_Button.Name = "NUM8_Button";
|
||||
this.NUM8_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM8_Button.TabIndex = 7;
|
||||
this.NUM8_Button.Text = "8";
|
||||
this.NUM8_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// NUM9_Button
|
||||
//
|
||||
this.NUM9_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.NUM9_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.NUM9_Button.Location = new System.Drawing.Point(134, 140);
|
||||
this.NUM9_Button.Name = "NUM9_Button";
|
||||
this.NUM9_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.NUM9_Button.TabIndex = 8;
|
||||
this.NUM9_Button.Text = "9";
|
||||
this.NUM9_Button.UseVisualStyleBackColor = true;
|
||||
//
|
||||
// BACKSPACE_Button
|
||||
//
|
||||
this.BACKSPACE_Button.Font = new System.Drawing.Font("Symbol", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.BACKSPACE_Button.ForeColor = System.Drawing.Color.Red;
|
||||
this.BACKSPACE_Button.Location = new System.Drawing.Point(12, 72);
|
||||
this.BACKSPACE_Button.Name = "BACKSPACE_Button";
|
||||
this.BACKSPACE_Button.Size = new System.Drawing.Size(90, 62);
|
||||
this.BACKSPACE_Button.TabIndex = 38;
|
||||
this.BACKSPACE_Button.Text = "<-";
|
||||
this.BACKSPACE_Button.UseVisualStyleBackColor = true;
|
||||
this.BACKSPACE_Button.Click += new System.EventHandler(this.BACKSPACE_Button_Click);
|
||||
//
|
||||
// OK_Button
|
||||
//
|
||||
this.OK_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.OK_Button.Image = global::IPadLibrary.Properties.Resources.OK;
|
||||
this.OK_Button.Location = new System.Drawing.Point(12, 406);
|
||||
this.OK_Button.Name = "OK_Button";
|
||||
this.OK_Button.Size = new System.Drawing.Size(78, 62);
|
||||
this.OK_Button.TabIndex = 39;
|
||||
this.OK_Button.UseVisualStyleBackColor = true;
|
||||
this.OK_Button.Click += new System.EventHandler(this.OK_Button_Click);
|
||||
//
|
||||
// DOT_Button
|
||||
//
|
||||
this.DOT_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.DOT_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.DOT_Button.Location = new System.Drawing.Point(134, 323);
|
||||
this.DOT_Button.Name = "DOT_Button";
|
||||
this.DOT_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.DOT_Button.TabIndex = 37;
|
||||
this.DOT_Button.Text = ".";
|
||||
this.DOT_Button.UseVisualStyleBackColor = true;
|
||||
this.DOT_Button.Click += new System.EventHandler(this.DOT_Button_Click);
|
||||
//
|
||||
// CANCEL_Button
|
||||
//
|
||||
this.CANCEL_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel;
|
||||
this.CANCEL_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.CANCEL_Button.Image = global::IPadLibrary.Properties.Resources.Delete;
|
||||
this.CANCEL_Button.Location = new System.Drawing.Point(118, 406);
|
||||
this.CANCEL_Button.Name = "CANCEL_Button";
|
||||
this.CANCEL_Button.Size = new System.Drawing.Size(78, 62);
|
||||
this.CANCEL_Button.TabIndex = 40;
|
||||
this.CANCEL_Button.UseVisualStyleBackColor = true;
|
||||
this.CANCEL_Button.Click += new System.EventHandler(this.CANCEL_Button_Click);
|
||||
//
|
||||
// Display
|
||||
//
|
||||
this.Display.AsciiOnly = true;
|
||||
this.Display.BackColor = System.Drawing.Color.White;
|
||||
this.Display.CausesValidation = false;
|
||||
this.Display.Font = new System.Drawing.Font("Microsoft Sans Serif", 26.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.Display.Location = new System.Drawing.Point(12, 12);
|
||||
this.Display.Name = "Display";
|
||||
this.Display.ReadOnly = true;
|
||||
this.Display.Size = new System.Drawing.Size(184, 57);
|
||||
this.Display.TabIndex = 41;
|
||||
this.Display.Text = "0";
|
||||
this.Display.TextAlign = System.Windows.Forms.HorizontalAlignment.Right;
|
||||
this.Display.MaskInputRejected += new System.Windows.Forms.MaskInputRejectedEventHandler(this.Display_MaskInputRejected);
|
||||
//
|
||||
// SIGN_Button
|
||||
//
|
||||
this.SIGN_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.SIGN_Button.ForeColor = System.Drawing.Color.Blue;
|
||||
this.SIGN_Button.Location = new System.Drawing.Point(73, 323);
|
||||
this.SIGN_Button.Name = "SIGN_Button";
|
||||
this.SIGN_Button.Size = new System.Drawing.Size(62, 62);
|
||||
this.SIGN_Button.TabIndex = 42;
|
||||
this.SIGN_Button.Text = "+/-";
|
||||
this.SIGN_Button.UseVisualStyleBackColor = true;
|
||||
this.SIGN_Button.Click += new System.EventHandler(this.SIGN_Button_Click);
|
||||
//
|
||||
// CE_Button
|
||||
//
|
||||
this.CE_Button.Font = new System.Drawing.Font("Microsoft Sans Serif", 21.75F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(0)));
|
||||
this.CE_Button.ForeColor = System.Drawing.Color.Red;
|
||||
this.CE_Button.Location = new System.Drawing.Point(106, 72);
|
||||
this.CE_Button.Name = "CE_Button";
|
||||
this.CE_Button.Size = new System.Drawing.Size(90, 62);
|
||||
this.CE_Button.TabIndex = 43;
|
||||
this.CE_Button.Text = "C";
|
||||
this.CE_Button.UseVisualStyleBackColor = true;
|
||||
this.CE_Button.Click += new System.EventHandler(this.CE_Button_Click);
|
||||
//
|
||||
// NumericPad
|
||||
//
|
||||
this.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None;
|
||||
this.BackColor = System.Drawing.Color.LightSlateGray;
|
||||
this.ClientSize = new System.Drawing.Size(208, 480);
|
||||
this.Controls.Add(this.CE_Button);
|
||||
this.Controls.Add(this.SIGN_Button);
|
||||
this.Controls.Add(this.Display);
|
||||
this.Controls.Add(this.CANCEL_Button);
|
||||
this.Controls.Add(this.BACKSPACE_Button);
|
||||
this.Controls.Add(this.OK_Button);
|
||||
this.Controls.Add(this.DOT_Button);
|
||||
this.Controls.Add(this.NUM9_Button);
|
||||
this.Controls.Add(this.NUM0_Button);
|
||||
this.Controls.Add(this.NUM8_Button);
|
||||
this.Controls.Add(this.NUM7_Button);
|
||||
this.Controls.Add(this.NUM6_Button);
|
||||
this.Controls.Add(this.NUM4_Button);
|
||||
this.Controls.Add(this.NUM5_Button);
|
||||
this.Controls.Add(this.NUM3_Button);
|
||||
this.Controls.Add(this.NUM2_Button);
|
||||
this.Controls.Add(this.NUM1_Button);
|
||||
this.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None;
|
||||
this.Name = "NumericPad";
|
||||
this.ShowInTaskbar = false;
|
||||
this.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent;
|
||||
this.Paint += new System.Windows.Forms.PaintEventHandler(this.NumericPad_Paint);
|
||||
this.ResumeLayout(false);
|
||||
this.PerformLayout();
|
||||
|
||||
}
|
||||
|
||||
#endregion
|
||||
|
||||
private System.Windows.Forms.Button NUM0_Button;
|
||||
private System.Windows.Forms.Button NUM1_Button;
|
||||
private System.Windows.Forms.Button NUM2_Button;
|
||||
private System.Windows.Forms.Button NUM3_Button;
|
||||
private System.Windows.Forms.Button NUM5_Button;
|
||||
private System.Windows.Forms.Button NUM4_Button;
|
||||
private System.Windows.Forms.Button NUM6_Button;
|
||||
private System.Windows.Forms.Button NUM7_Button;
|
||||
private System.Windows.Forms.Button NUM8_Button;
|
||||
private System.Windows.Forms.Button NUM9_Button;
|
||||
private System.Windows.Forms.Button BACKSPACE_Button;
|
||||
private System.Windows.Forms.Button DOT_Button;
|
||||
private System.Windows.Forms.Button OK_Button;
|
||||
private System.Windows.Forms.Button CANCEL_Button;
|
||||
private System.Windows.Forms.MaskedTextBox Display;
|
||||
private System.Windows.Forms.Button SIGN_Button;
|
||||
private System.Windows.Forms.Button CE_Button;
|
||||
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,158 @@
|
||||
/***************************************************/
|
||||
// __ ______
|
||||
//
|
||||
/***************************************************/
|
||||
|
||||
|
||||
using System.Drawing;
|
||||
using System.Windows.Forms;
|
||||
|
||||
|
||||
namespace IPadLibrary.FormsInterfaces {
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Keypad component, instantiate the Keypad Form.
|
||||
/// </summary>
|
||||
partial class NumericPad {
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Constant & Static Variables
|
||||
/*******************************************************************************************/
|
||||
#region Constant & Static Variables
|
||||
|
||||
private const char BACKSPACE_CHAR = '\u00dc'; ///< The simbol <--
|
||||
private const int MAX_DISPLAY_NUMBERS = 9; ///< Maximun number of char to text
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Public Variables Definition
|
||||
/*******************************************************************************************/
|
||||
#region Public Variables Definiton
|
||||
// ...
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Private Variables Definition
|
||||
/*******************************************************************************************/
|
||||
#region Private Variables Definition
|
||||
|
||||
private Button[] buttonGroupNumbers; ///< Used to manage all group of Keys buttons
|
||||
private Control owner; ///< The owner of Form Dialog
|
||||
private bool dot; ///< Monitor the dot key pression
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Public Methods Definition
|
||||
/*******************************************************************************************/
|
||||
#region Public Methods Definition
|
||||
|
||||
//------------------------------------ DIALOG SECTION -------------------------------------//
|
||||
|
||||
/// <summary>
|
||||
/// Show this dialog, in modal mode.
|
||||
/// </summary>
|
||||
/// <param name="owner">Any object that implement <c>IWin32Window</c> that is the fisrt level window owner of the modal dialog.</param>
|
||||
/// <returns>One value of <c>DialogResult</c>.</returns>
|
||||
public DialogResult ShowDialog(Control owner) {
|
||||
this.owner = owner;
|
||||
return base.ShowDialog(owner);
|
||||
}
|
||||
|
||||
//------------------------------------ GETS SECTION ---------------------------------------//
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Get/Set the text typed.
|
||||
/// </summary>
|
||||
public override string Text {
|
||||
get {
|
||||
if ( Display != null )
|
||||
return Display.Text;
|
||||
else
|
||||
return "";
|
||||
}
|
||||
set {
|
||||
if ( Display != null ) {
|
||||
Display.Text = value.Trim();
|
||||
dot = value.IndexOf('.') == -1 ? false : true ;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Get/Set the password char for input data.
|
||||
/// </summary>
|
||||
public char PasswordChar {
|
||||
get {
|
||||
return Display.PasswordChar;
|
||||
}
|
||||
set {
|
||||
Display.PasswordChar = value;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Private Methods Definition
|
||||
/*******************************************************************************************/
|
||||
#region Private Methods Definition
|
||||
|
||||
//------------------------------------- INIT SECTION --------------------------------------//
|
||||
|
||||
/// <summary>
|
||||
/// Initialize all component of this Form.
|
||||
/// </summary>
|
||||
private void InizializeLocalData() {
|
||||
|
||||
dot = false;
|
||||
BACKSPACE_Button.Text = BACKSPACE_CHAR.ToString();
|
||||
|
||||
buttonGroupNumbers = new Button[] {
|
||||
NUM0_Button, NUM1_Button, NUM2_Button, NUM3_Button, NUM4_Button,
|
||||
NUM5_Button, NUM6_Button, NUM7_Button, NUM8_Button, NUM9_Button
|
||||
};
|
||||
setEventClick(buttonGroupNumbers);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Add <c>Key_Button_Click</c> Event to button.
|
||||
/// </summary>
|
||||
/// <param name="b">The <c>Button</c> the implement a click event.</param>
|
||||
private void setEventClick(Button b) {
|
||||
|
||||
b.Click += new System.EventHandler(KEY_Button_Click);
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Add <c>Key_Button_Click</c> Event to buttons group.
|
||||
/// </summary>
|
||||
/// <param name="group"></param>
|
||||
private void setEventClick(Button[] group) {
|
||||
|
||||
foreach ( Button b in group )
|
||||
b.Click += new System.EventHandler(KEY_Button_Click);
|
||||
}
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
} // end class
|
||||
|
||||
} // end namespace
|
||||
|
||||
@@ -0,0 +1,167 @@
|
||||
/***************************************************/
|
||||
// __ ______
|
||||
/***************************************************/
|
||||
|
||||
|
||||
using System;
|
||||
using System.Drawing;
|
||||
using System.Windows.Forms;
|
||||
using System.Threading;
|
||||
|
||||
|
||||
namespace IPadLibrary.FormsInterfaces {
|
||||
|
||||
|
||||
public partial class NumericPad : Form {
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Constructors and Initialization
|
||||
/*******************************************************************************************/
|
||||
#region Public Class Constructors
|
||||
|
||||
|
||||
public NumericPad(string text) {
|
||||
|
||||
InitializeComponent(); // This is for the designer (not edit)
|
||||
InizializeLocalData(); // This is for local data private/public
|
||||
Display.Text = text.Trim();
|
||||
}
|
||||
|
||||
|
||||
public NumericPad() :
|
||||
this("0") {
|
||||
}
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Form Events
|
||||
/*******************************************************************************************/
|
||||
#region Form Events
|
||||
|
||||
|
||||
private void KEY_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
if ( Display.Text.Length >= MAX_DISPLAY_NUMBERS )
|
||||
return;
|
||||
if ( Display.Text == "0" )
|
||||
Display.Text = ((Button) sender).Text;
|
||||
else if ( Display.Text == "-0" )
|
||||
Display.Text = "-" + ((Button) sender).Text;
|
||||
else
|
||||
Display.Text += ((Button) sender).Text;
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void BACKSPACE_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
int len;
|
||||
|
||||
if ((len = Display.Text.Length) > 1) {
|
||||
if (Display.Text[Display.Text.Length - 1] == '.')
|
||||
dot = false;
|
||||
Display.Text = Display.Text.Remove(len - 1);
|
||||
}
|
||||
else {
|
||||
if (Display.PasswordChar != '*' )
|
||||
Display.Text = "0";
|
||||
else
|
||||
Display.Text = "";
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void OK_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
this.DialogResult = DialogResult.OK;
|
||||
Close();
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void CANCEL_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
this.DialogResult = DialogResult.Cancel;
|
||||
Close();
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void CE_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
dot = false;
|
||||
if (Display.PasswordChar != '*')
|
||||
Display.Text = "0";
|
||||
else
|
||||
Display.Text = "";
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void SIGN_Button_Click(object sender, EventArgs e) {
|
||||
|
||||
if ( Display.Text[0] == '-' )
|
||||
Display.Text = Display.Text.Substring(1);
|
||||
else
|
||||
Display.Text = "-" + Display.Text;
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void DOT_Button_Click(object sender, EventArgs e) {
|
||||
// uso il carattere ',' perchè nel codice è usato il metodo 'CDbl' per eseguire la
|
||||
// cnversione da stringa a double: CDbl("3.5") -> 35, CDbl("3,5") -> 3.5
|
||||
if ( !dot )
|
||||
Display.Text += ",";
|
||||
dot = true;
|
||||
}
|
||||
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// Used to drawing the Form borders only.
|
||||
/// </summary>
|
||||
private void NumericPad_Paint(object sender, PaintEventArgs e) {
|
||||
|
||||
GeneralLibrary.DrawFormBorder(sender, e);
|
||||
}
|
||||
|
||||
|
||||
|
||||
public void Close(int n) {
|
||||
|
||||
if ( n == 1 ) {
|
||||
int height = this.ClientSize.Height;
|
||||
int width = this.ClientSize.Width;
|
||||
|
||||
while ( this.ClientSize.Height > 10 ) {
|
||||
this.Height -= 3;
|
||||
Thread.Sleep(1);
|
||||
}
|
||||
|
||||
while ( this.ClientSize.Width > 10 ) {
|
||||
this.Width -= 2;
|
||||
Thread.Sleep(1);
|
||||
}
|
||||
}
|
||||
Close();
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
private void Display_MaskInputRejected(object sender, MaskInputRejectedEventArgs e)
|
||||
{
|
||||
|
||||
}
|
||||
} // end class
|
||||
|
||||
} // end namespace
|
||||
@@ -0,0 +1,123 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="$this.Locked" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
</root>
|
||||
@@ -0,0 +1,111 @@
|
||||
/***************************************************/
|
||||
// __ ______
|
||||
// / / /_ __/_
|
||||
// / //\/\ / //_ /\ /\/\
|
||||
// /_// \\ /_//__ /¯ \/ \\
|
||||
//
|
||||
// Written by Alberto Bettinelli
|
||||
// SIATEC srl
|
||||
// Via Sigismondi, 40 - 24018 Villa d'Almè (BG)
|
||||
// tel: +39.035.636029 fax: +39.035.638129
|
||||
// <http://www.imteam.it>
|
||||
//
|
||||
/***************************************************/
|
||||
|
||||
|
||||
using System;
|
||||
using System.IO;
|
||||
using System.Collections.Generic;
|
||||
using System.Text;
|
||||
|
||||
|
||||
namespace IPadLibrary {
|
||||
|
||||
|
||||
class IOLibrary {
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Constant & Static Variables
|
||||
/*******************************************************************************************/
|
||||
#region Constant & Static Variables
|
||||
// ...
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Public Variables Definition
|
||||
/*******************************************************************************************/
|
||||
#region Public Variables Definiton
|
||||
// ...
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Private Variables Definition
|
||||
/*******************************************************************************************/
|
||||
#region Private Variables Definition
|
||||
|
||||
// FileStream istream;
|
||||
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Public Methods Definition
|
||||
/*******************************************************************************************/
|
||||
#region Public Methods Definition
|
||||
|
||||
|
||||
//public void OpenTextFile(string pathname, FileAccess mode) {
|
||||
//}
|
||||
|
||||
|
||||
//public string readLine() {
|
||||
//}
|
||||
|
||||
//public string readLineWithoutComment() {
|
||||
//}
|
||||
|
||||
|
||||
|
||||
//private string removeComment(string line, char ch) {
|
||||
|
||||
// int idx;
|
||||
// if ( (idx = line.IndexOf(ch)) > -1 )
|
||||
// line.Remove(idx);
|
||||
// return line.Trim();
|
||||
//}
|
||||
|
||||
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
/*******************************************************************************************/
|
||||
/* Private Methods Definition
|
||||
/*******************************************************************************************/
|
||||
#region Private Methods Definition
|
||||
|
||||
//------------------------------------- INIT SECTION --------------------------------------//
|
||||
|
||||
|
||||
//------------------------------- FILE CONFIGURATION SECTION ------------------------------//
|
||||
|
||||
|
||||
//----------------------------- TEXT & DRAWING UPDATES SECTION ----------------------------//
|
||||
|
||||
|
||||
//------------------------------------ DIALOG SECTION -------------------------------------//
|
||||
|
||||
|
||||
//------------------------------------- UNDO SECTION --------------------------------------//
|
||||
|
||||
#endregion
|
||||
|
||||
|
||||
} // end class
|
||||
|
||||
} // end namespace
|
||||
|
||||
Binary file not shown.
|
After Width: | Height: | Size: 1.1 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 988 B |
Binary file not shown.
@@ -0,0 +1,33 @@
|
||||
using System.Reflection;
|
||||
using System.Runtime.CompilerServices;
|
||||
using 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.
|
||||
[assembly: AssemblyTitle("KeyLibrary")]
|
||||
[assembly: AssemblyDescription("Data input pad")]
|
||||
[assembly: AssemblyConfiguration("")]
|
||||
[assembly: AssemblyCompany("EgalTech")]
|
||||
[assembly: AssemblyProduct("KeyLibrary")]
|
||||
[assembly: AssemblyCopyright("Copyright © 2015-2018")]
|
||||
[assembly: AssemblyTrademark("")]
|
||||
[assembly: AssemblyCulture("")]
|
||||
|
||||
// Setting ComVisible to false makes the types in this assembly not visible
|
||||
// to COM components. If you need to access a type in this assembly from
|
||||
// COM, set the ComVisible attribute to true on that type.
|
||||
[assembly: ComVisible(false)]
|
||||
|
||||
// The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
[assembly: Guid("49061da8-711e-4a50-968b-935047f5bff9")]
|
||||
|
||||
// Version information for an assembly consists of the following four values:
|
||||
//
|
||||
// Major Version
|
||||
// Minor Version
|
||||
// Build Number
|
||||
// Revision
|
||||
//
|
||||
[assembly: AssemblyVersion("2.2.5.1")]
|
||||
[assembly: AssemblyFileVersion("2.2.5.1")]
|
||||
+83
@@ -0,0 +1,83 @@
|
||||
//------------------------------------------------------------------------------
|
||||
// <auto-generated>
|
||||
// This code was generated by a tool.
|
||||
// Runtime Version:4.0.30319.34209
|
||||
//
|
||||
// Changes to this file may cause incorrect behavior and will be lost if
|
||||
// the code is regenerated.
|
||||
// </auto-generated>
|
||||
//------------------------------------------------------------------------------
|
||||
|
||||
namespace IPadLibrary.Properties {
|
||||
using System;
|
||||
|
||||
|
||||
/// <summary>
|
||||
/// A strongly-typed resource class, for looking up localized strings, etc.
|
||||
/// </summary>
|
||||
// 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.
|
||||
[global::System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0")]
|
||||
[global::System.Diagnostics.DebuggerNonUserCodeAttribute()]
|
||||
[global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
|
||||
internal class Resources {
|
||||
|
||||
private static global::System.Resources.ResourceManager resourceMan;
|
||||
|
||||
private static global::System.Globalization.CultureInfo resourceCulture;
|
||||
|
||||
[global::System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")]
|
||||
internal Resources() {
|
||||
}
|
||||
|
||||
/// <summary>
|
||||
/// Returns the cached ResourceManager instance used by this class.
|
||||
/// </summary>
|
||||
[global::System.ComponentModel.EditorBrowsableAttribute(global::System.ComponentModel.EditorBrowsableState.Advanced)]
|
||||
internal static global::System.Resources.ResourceManager ResourceManager {
|
||||
get {
|
||||
if (object.ReferenceEquals(resourceMan, null)) {
|
||||
global::System.Resources.ResourceManager temp = new global::System.Resources.ResourceManager("IPadLibrary.Properties.Resources", typeof(Resources).Assembly);
|
||||
resourceMan = temp;
|
||||
}
|
||||
return resourceMan;
|
||||
}
|
||||
}
|
||||
|
||||
/// <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)]
|
||||
internal static global::System.Globalization.CultureInfo Culture {
|
||||
get {
|
||||
return resourceCulture;
|
||||
}
|
||||
set {
|
||||
resourceCulture = value;
|
||||
}
|
||||
}
|
||||
|
||||
/// <summary>
|
||||
/// Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
/// </summary>
|
||||
internal static System.Drawing.Bitmap Delete {
|
||||
get {
|
||||
object obj = ResourceManager.GetObject("Delete", resourceCulture);
|
||||
return ((System.Drawing.Bitmap)(obj));
|
||||
}
|
||||
}
|
||||
|
||||
/// <summary>
|
||||
/// Looks up a localized resource of type System.Drawing.Bitmap.
|
||||
/// </summary>
|
||||
internal static System.Drawing.Bitmap OK {
|
||||
get {
|
||||
object obj = ResourceManager.GetObject("OK", resourceCulture);
|
||||
return ((System.Drawing.Bitmap)(obj));
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,127 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=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>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="Delete" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Icons\Delete.gif;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="OK" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Icons\OK.gif;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
||||
+26
@@ -0,0 +1,26 @@
|
||||
//------------------------------------------------------------------------------
|
||||
// <auto-generated>
|
||||
// This code was generated by a tool.
|
||||
// Runtime Version:4.0.30319.34209
|
||||
//
|
||||
// Changes to this file may cause incorrect behavior and will be lost if
|
||||
// the code is regenerated.
|
||||
// </auto-generated>
|
||||
//------------------------------------------------------------------------------
|
||||
|
||||
namespace IPadLibrary.Properties {
|
||||
|
||||
|
||||
[global::System.Runtime.CompilerServices.CompilerGeneratedAttribute()]
|
||||
[global::System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0")]
|
||||
internal sealed partial class Settings : global::System.Configuration.ApplicationSettingsBase {
|
||||
|
||||
private static Settings defaultInstance = ((Settings)(global::System.Configuration.ApplicationSettingsBase.Synchronized(new Settings())));
|
||||
|
||||
public static Settings Default {
|
||||
get {
|
||||
return defaultInstance;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
@@ -0,0 +1,5 @@
|
||||
<?xml version='1.0' encoding='utf-8'?>
|
||||
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)">
|
||||
<Profiles />
|
||||
<Settings />
|
||||
</SettingsFile>
|
||||
@@ -0,0 +1,5 @@
|
||||
<?xml version="1.0"?>
|
||||
<configuration>
|
||||
<configSections>
|
||||
</configSections>
|
||||
<startup><supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.0"/></startup></configuration>
|
||||
@@ -0,0 +1,44 @@
|
||||
|
||||
Microsoft Visual Studio Solution File, Format Version 12.00
|
||||
# Visual Studio Version 17
|
||||
VisualStudioVersion = 17.14.36414.22
|
||||
MinimumVisualStudioVersion = 10.0.40219.1
|
||||
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "CameraMng", "CameraMng\CameraMng.vbproj", "{5BBC23C8-48BC-47EC-B801-79F27347503C}"
|
||||
ProjectSection(ProjectDependencies) = postProject
|
||||
{60CE9527-95BC-433A-BE8F-640489315539} = {60CE9527-95BC-433A-BE8F-640489315539}
|
||||
EndProjectSection
|
||||
EndProject
|
||||
Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "CSharpLibrary", "CSharpLibrary\CSharpLibrary.csproj", "{60CE9527-95BC-433A-BE8F-640489315539}"
|
||||
EndProject
|
||||
Global
|
||||
GlobalSection(SolutionConfigurationPlatforms) = preSolution
|
||||
Debug|x64 = Debug|x64
|
||||
Debug|x86 = Debug|x86
|
||||
Release|x64 = Release|x64
|
||||
Release|x86 = Release|x86
|
||||
EndGlobalSection
|
||||
GlobalSection(ProjectConfigurationPlatforms) = postSolution
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Debug|x64.ActiveCfg = Debug|x64
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Debug|x64.Build.0 = Debug|x64
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Debug|x86.ActiveCfg = Debug|x86
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Debug|x86.Build.0 = Debug|x86
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Release|x64.ActiveCfg = Release|x64
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Release|x64.Build.0 = Release|x64
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Release|x86.ActiveCfg = Release|x86
|
||||
{5BBC23C8-48BC-47EC-B801-79F27347503C}.Release|x86.Build.0 = Release|x86
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Debug|x64.ActiveCfg = Debug|x64
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Debug|x64.Build.0 = Debug|x64
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Debug|x86.ActiveCfg = Debug|x86
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Debug|x86.Build.0 = Debug|x86
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Release|x64.ActiveCfg = Release|x64
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Release|x64.Build.0 = Release|x64
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Release|x86.ActiveCfg = Release|x86
|
||||
{60CE9527-95BC-433A-BE8F-640489315539}.Release|x86.Build.0 = Release|x86
|
||||
EndGlobalSection
|
||||
GlobalSection(SolutionProperties) = preSolution
|
||||
HideSolutionNode = FALSE
|
||||
EndGlobalSection
|
||||
GlobalSection(ExtensibilityGlobals) = postSolution
|
||||
SolutionGuid = {197BD59C-648D-4924-8AD7-9596E774272D}
|
||||
EndGlobalSection
|
||||
EndGlobal
|
||||
@@ -0,0 +1,71 @@
|
||||
|
||||
Namespace My
|
||||
|
||||
' The following events are available for MyApplication:
|
||||
'
|
||||
' Startup: Raised when the application starts, before the startup form is created.
|
||||
' Shutdown: Raised after all application forms are closed. This event is not raised if the application terminates abnormally.
|
||||
' UnhandledException: Raised if the application encounters an unhandled exception.
|
||||
' StartupNextInstance: Raised when launching a single-instance application and the application is already active.
|
||||
' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected.
|
||||
Partial Friend Class MyApplication
|
||||
|
||||
|
||||
Private Sub MyApplication_Startup(sender As Object, e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
|
||||
If e.CommandLine.Count > 0 Then
|
||||
' Args: "0 #n" -> 0: avvio in modalità nascosta, #n: indice tavola
|
||||
If e.CommandLine(0) = "0" Then
|
||||
ModalitaNascosta = True
|
||||
Else
|
||||
' avviare il programma in modalità standard
|
||||
End If
|
||||
' Salvo l'inidice della tavola come indice di processo
|
||||
If e.CommandLine.Count > 1 Then MainModule.IndexProc = e.CommandLine(1)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
' METODO NON IN USO: DA RIMUOVERE (il processo è avviato una volta sola)
|
||||
Private Sub MyApplication_StartupNextInstance(sender As Object, e As Microsoft.VisualBasic.ApplicationServices.StartupNextInstanceEventArgs) Handles Me.StartupNextInstance
|
||||
|
||||
If e.CommandLine.Count > 1 Then
|
||||
MainModule.SpessLastra = Val(e.CommandLine(1))
|
||||
End If
|
||||
If e.CommandLine.Count > 2 Then
|
||||
MainModule.SogliaPercentuale = Val(e.CommandLine(2))
|
||||
End If
|
||||
|
||||
If e.CommandLine.Count > 3 Then
|
||||
FrmMain.SetSearchMode(CInt(Val(e.CommandLine(3))))
|
||||
Else
|
||||
|
||||
End If
|
||||
|
||||
If e.CommandLine.Count > 0 Then
|
||||
If e.CommandLine(0) = "0" Then
|
||||
ModalitaNascosta = True
|
||||
FrmMain.Hide()
|
||||
ElseIf e.CommandLine(0) = "1" Then
|
||||
ModalitaNascosta = False
|
||||
FrmMain.Visible = True
|
||||
ElseIf e.CommandLine(0) = "2" Then
|
||||
CorrezioneAutomatica = True
|
||||
RichiestaBordi = False
|
||||
FrmMain.RichiestaClick()
|
||||
ElseIf e.CommandLine(0) = "3" Then
|
||||
FrmMain.RichiestaStatoCamera()
|
||||
ElseIf e.CommandLine(0) = "4" Then
|
||||
FrmMain.ScattoBackGround()
|
||||
ElseIf e.CommandLine(0) = "5" Then
|
||||
RichiestaBordi = True
|
||||
FrmMain.RichiestaClick()
|
||||
ElseIf e.CommandLine(0) = "6" Then
|
||||
FrmMain.RipetiThreshold()
|
||||
End If
|
||||
End If
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
End Namespace
|
||||
|
||||
@@ -0,0 +1,114 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : CameraController.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
|
||||
|
||||
Public Class CameraController
|
||||
|
||||
'// Camera model
|
||||
Protected model As CameraModel
|
||||
|
||||
'// Command processing
|
||||
Protected processor As New Processor
|
||||
|
||||
|
||||
'// Constractor
|
||||
Public Sub New()
|
||||
model = Nothing
|
||||
End Sub
|
||||
|
||||
'// Destructor
|
||||
Protected Overrides Sub Finalize()
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub setCameraModel(ByVal model As CameraModel)
|
||||
Me.model = model
|
||||
End Sub
|
||||
|
||||
|
||||
'// Start processor thread
|
||||
Public Sub run()
|
||||
|
||||
processor.start()
|
||||
|
||||
'The communication with the camera begins
|
||||
StoreAsync(New OpenSessionCommand(model))
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub actionPerformed(ByVal strEvent As String, ByVal inObject As IntPtr)
|
||||
If strEvent = "download" Then
|
||||
'StoreAsync(New DownloadCommand(model, inObject)) '
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub actionPerformed(ByVal strEvent As String)
|
||||
|
||||
If strEvent = "opensession" Then
|
||||
|
||||
'// Start communication with remote camera.
|
||||
StoreAsync(New OpenSessionCommand(model))
|
||||
|
||||
ElseIf strEvent = "takepicture" Then
|
||||
StoreAsync(New TakePictureCommand(model))
|
||||
|
||||
ElseIf strEvent = "close" Then
|
||||
model.notifyObservers(clse)
|
||||
processor.setCloseCommand(New CloseSessionCommand(model))
|
||||
processor.stopTh()
|
||||
processor.join()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub actionPerformed(ByVal strEvent As String, ByVal id As Integer, Optional ByVal data As Integer = 0)
|
||||
If strEvent = "get" Then
|
||||
StoreAsync(New GetPropertyCommand(model, id))
|
||||
|
||||
ElseIf strEvent = "set" Then
|
||||
StoreAsync(New SetPropertyCommand(model, id, data))
|
||||
|
||||
ElseIf strEvent = "getlist" Then
|
||||
StoreAsync(New GetPropertyDescCommand(model, id))
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'// Receive a command
|
||||
Protected Sub StoreAsync(ByVal command As Command)
|
||||
If IsNothing(command) = False Then
|
||||
processor.enqueue(command)
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,327 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : CameraModel.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Class CameraModel
|
||||
Inherits Observable
|
||||
|
||||
|
||||
Protected camera As IntPtr
|
||||
|
||||
'// UIlock counter
|
||||
Protected lockCount As Integer
|
||||
|
||||
'// Model name
|
||||
Protected modelName As String
|
||||
Protected ownerName As String
|
||||
|
||||
'// Parameters
|
||||
Protected AEMode As Integer
|
||||
Protected Av As Integer
|
||||
Protected Tv As Integer
|
||||
Protected Iso As Integer
|
||||
Protected MeteringMode As Integer
|
||||
Protected ExposureCompensation As Integer
|
||||
Protected ImageQuality As Integer
|
||||
Protected availableShot As Integer
|
||||
|
||||
'// Available parameter lists
|
||||
Protected AEModeDesc As EdsPropertyDesc
|
||||
Protected AvDesc As EdsPropertyDesc
|
||||
Protected TvDesc As EdsPropertyDesc
|
||||
Protected IsoDesc As EdsPropertyDesc
|
||||
Protected MeteringModeDesc As EdsPropertyDesc
|
||||
Protected ExposureCompensationDesc As EdsPropertyDesc
|
||||
Protected ImageQualityDesc As EdsPropertyDesc
|
||||
Protected IDBodyCAmera As String = ""
|
||||
|
||||
|
||||
'// Constructor
|
||||
Public Sub New(ByVal camera As IntPtr)
|
||||
Me.lockCount = 0
|
||||
Me.camera = camera
|
||||
End Sub
|
||||
|
||||
'// Get a camera object
|
||||
Public Function getCameraObject() As IntPtr
|
||||
Return Me.camera
|
||||
End Function
|
||||
|
||||
|
||||
'// -----------------------------------------------------------------
|
||||
'// Stock parameters ---------------------------------------------
|
||||
|
||||
Private Sub setAEMode(ByVal value As Integer)
|
||||
AEMode = value
|
||||
End Sub
|
||||
|
||||
Private Sub setTv(ByVal value As Integer)
|
||||
Tv = value
|
||||
End Sub
|
||||
|
||||
Private Sub setAv(ByVal value As Integer)
|
||||
Av = value
|
||||
End Sub
|
||||
|
||||
Private Sub setIso(ByVal value As Integer)
|
||||
Iso = value
|
||||
End Sub
|
||||
|
||||
Private Sub setMeteringMode(ByVal value As Integer)
|
||||
MeteringMode = value
|
||||
End Sub
|
||||
|
||||
Private Sub setExposureCompensation(ByVal value As Integer)
|
||||
ExposureCompensation = value
|
||||
End Sub
|
||||
|
||||
Private Sub setBodyIDEx(ByVal value As String)
|
||||
IDBodyCAmera = value
|
||||
End Sub
|
||||
|
||||
Private Sub setModelName(ByVal modelName As String)
|
||||
modelName = modelName
|
||||
End Sub
|
||||
Private Sub setImageQuality(ByVal value As Integer)
|
||||
ImageQuality = value
|
||||
End Sub
|
||||
|
||||
'// -----------------------------------------------------------------
|
||||
'// Give parameters ---------------------------------------------
|
||||
|
||||
Private Function getAEMode() As Integer
|
||||
Return AEMode
|
||||
End Function
|
||||
|
||||
Private Function getTv() As Integer
|
||||
Return Tv
|
||||
End Function
|
||||
|
||||
Private Function getAv() As Integer
|
||||
Return Av
|
||||
End Function
|
||||
|
||||
Private Function getIso() As Integer
|
||||
Return Iso
|
||||
End Function
|
||||
|
||||
Private Function getMeteringMode() As Integer
|
||||
Return MeteringMode
|
||||
End Function
|
||||
|
||||
Private Function getExposureCompensation() As Integer
|
||||
Return ExposureCompensation
|
||||
End Function
|
||||
|
||||
Private Function getImageQuality() As Integer
|
||||
Return ImageQuality
|
||||
End Function
|
||||
Private Function getIDCamera() As String
|
||||
Return IDBodyCAmera
|
||||
End Function
|
||||
|
||||
'// -----------------------------------------------------------------
|
||||
'// Give available parameter lists ----------------------------------
|
||||
|
||||
Private Function getAEModeDesc() As EdsPropertyDesc
|
||||
Return AEModeDesc
|
||||
End Function
|
||||
|
||||
Private Function getAvDesc() As EdsPropertyDesc
|
||||
Return AvDesc
|
||||
End Function
|
||||
|
||||
Private Function getTvDesc() As EdsPropertyDesc
|
||||
Return TvDesc
|
||||
End Function
|
||||
|
||||
Private Function getIsoDesc() As EdsPropertyDesc
|
||||
Return IsoDesc
|
||||
End Function
|
||||
|
||||
Private Function getMeteringModeDesc() As EdsPropertyDesc
|
||||
Return MeteringModeDesc
|
||||
End Function
|
||||
|
||||
Private Function getExposureCompensationDesc() As EdsPropertyDesc
|
||||
Return ExposureCompensationDesc
|
||||
End Function
|
||||
|
||||
Private Function getImageQualityDesc() As EdsPropertyDesc
|
||||
Return ImageQualityDesc
|
||||
End Function
|
||||
|
||||
|
||||
'// -----------------------------------------------------------------
|
||||
'// Stock available parameter lists ---------------------------------
|
||||
|
||||
Private Sub setAEModeDesc(ByVal desc As EdsPropertyDesc)
|
||||
AEModeDesc = desc
|
||||
End Sub
|
||||
|
||||
Private Sub setAvDesc(ByVal desc As EdsPropertyDesc)
|
||||
AvDesc = desc
|
||||
End Sub
|
||||
|
||||
Private Sub setTvDesc(ByVal desc As EdsPropertyDesc)
|
||||
TvDesc = desc
|
||||
End Sub
|
||||
|
||||
Private Sub setIsoDesc(ByVal desc As EdsPropertyDesc)
|
||||
IsoDesc = desc
|
||||
End Sub
|
||||
|
||||
Private Sub setMeteringModeDesc(ByVal desc As EdsPropertyDesc)
|
||||
MeteringModeDesc = desc
|
||||
End Sub
|
||||
|
||||
Private Sub setExposureCompensationDesc(ByVal desc As EdsPropertyDesc)
|
||||
ExposureCompensationDesc = desc
|
||||
End Sub
|
||||
|
||||
Private Sub setImageQualityDesc(ByVal desc As EdsPropertyDesc)
|
||||
ImageQualityDesc = desc
|
||||
End Sub
|
||||
|
||||
|
||||
'// Set a property <UInt32>
|
||||
Public Sub setPropertyUInt32(ByVal propertyID As Integer, ByVal value As Integer)
|
||||
Select Case propertyID
|
||||
Case kEdsPropID_AEModeSelect
|
||||
setAEMode(value)
|
||||
Case kEdsPropID_Tv
|
||||
setTv(value)
|
||||
Case kEdsPropID_Av
|
||||
setAv(value)
|
||||
Case kEdsPropID_ISOSpeed
|
||||
setIso(value)
|
||||
Case kEdsPropID_MeteringMode
|
||||
setMeteringMode(value)
|
||||
Case kEdsPropID_ExposureCompensation
|
||||
setExposureCompensation(value)
|
||||
Case kEdsPropID_ImageQuality
|
||||
setImageQuality(value)
|
||||
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
|
||||
'// Get a property <UInt32>
|
||||
Public Function getPropertyUInt32(ByVal propertyID As Integer) As Integer
|
||||
Dim value As Integer = &HFFFFFFFF
|
||||
Select Case propertyID
|
||||
Case kEdsPropID_AEModeSelect
|
||||
value = getAEMode()
|
||||
Case kEdsPropID_Tv
|
||||
value = getTv()
|
||||
Case kEdsPropID_Av
|
||||
value = getAv()
|
||||
Case kEdsPropID_ISOSpeed
|
||||
value = getIso()
|
||||
Case kEdsPropID_MeteringMode
|
||||
value = getMeteringMode()
|
||||
Case kEdsPropID_ExposureCompensation
|
||||
value = getExposureCompensation()
|
||||
Case kEdsPropID_ImageQuality
|
||||
value = getImageQuality()
|
||||
End Select
|
||||
Return value
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
'// Get a property <String>
|
||||
Public Sub getPropertyString(ByVal propertyID As Integer, ByRef str As String)
|
||||
Select Case propertyID
|
||||
Case kEdsPropID_ProductName
|
||||
str = modelName
|
||||
Case kEdsPropID_OwnerName
|
||||
str = ownerName
|
||||
Case kEdsPropID_BodyIDEx
|
||||
str = IDBodyCAmera
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
|
||||
'// Set a property <String>
|
||||
Public Sub setPropertyString(ByVal propertyID As Integer, ByVal str As String)
|
||||
Select Case propertyID
|
||||
Case kEdsPropID_ProductName
|
||||
modelName = str
|
||||
Case kEdsPropID_OwnerName
|
||||
ownerName = str
|
||||
Case kEdsPropID_BodyIDEx
|
||||
setBodyIDEx(str)
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
|
||||
'// Set an available parameter list.
|
||||
Public Sub setPropertyDesc(ByVal propertyID As Integer, ByVal desc As EdsPropertyDesc)
|
||||
Select Case propertyID
|
||||
Case kEdsPropID_AEModeSelect
|
||||
setAEModeDesc(desc)
|
||||
Case kEdsPropID_Tv
|
||||
setTvDesc(desc)
|
||||
Case kEdsPropID_Av
|
||||
setAvDesc(desc)
|
||||
Case kEdsPropID_ISOSpeed
|
||||
setIsoDesc(desc)
|
||||
Case kEdsPropID_MeteringMode
|
||||
setMeteringModeDesc(desc)
|
||||
Case kEdsPropID_ExposureCompensation
|
||||
setExposureCompensationDesc(desc)
|
||||
Case kEdsPropID_ImageQuality
|
||||
setImageQualityDesc(desc)
|
||||
End Select
|
||||
End Sub
|
||||
|
||||
'// Get an available parameter list.
|
||||
Public Function getPropertyDesc(ByVal propertyID As Integer) As EdsPropertyDesc
|
||||
Dim desc As EdsPropertyDesc = Nothing
|
||||
Select Case propertyID
|
||||
Case kEdsPropID_AEModeSelect
|
||||
desc = getAEModeDesc()
|
||||
Case kEdsPropID_Tv
|
||||
desc = getTvDesc()
|
||||
Case kEdsPropID_Av
|
||||
desc = getAvDesc()
|
||||
Case kEdsPropID_ISOSpeed
|
||||
desc = getIsoDesc()
|
||||
Case kEdsPropID_MeteringMode
|
||||
desc = getMeteringModeDesc()
|
||||
Case kEdsPropID_ExposureCompensation
|
||||
desc = getExposureCompensationDesc()
|
||||
Case kEdsPropID_ImageQuality
|
||||
desc = getImageQualityDesc()
|
||||
End Select
|
||||
Return desc
|
||||
End Function
|
||||
|
||||
'// Check camera accessing flag.
|
||||
'// Connected camera is not a legacy one, this method will be called.
|
||||
Public Overridable Function isLegacy() As Boolean
|
||||
Return False
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,37 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : CameraModelLegacy.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Public Class CameraModelLegacy
|
||||
Inherits CameraModel
|
||||
|
||||
'//Constructor
|
||||
Public Sub New(ByVal camera As IntPtr)
|
||||
MyBase.new(camera)
|
||||
End Sub
|
||||
|
||||
|
||||
Public Overrides Function isLegacy() As Boolean
|
||||
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,315 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">x86</Platform>
|
||||
<ProductVersion>
|
||||
</ProductVersion>
|
||||
<SchemaVersion>2.0</SchemaVersion>
|
||||
<ProjectGuid>{5BBC23C8-48BC-47EC-B801-79F27347503C}</ProjectGuid>
|
||||
<OutputType>WinExe</OutputType>
|
||||
<StartupObject>My.MyApplication</StartupObject>
|
||||
<RootNamespace>
|
||||
</RootNamespace>
|
||||
<AssemblyName>CameraMng</AssemblyName>
|
||||
<FileAlignment>512</FileAlignment>
|
||||
<MyType>WindowsForms</MyType>
|
||||
<TargetFrameworkVersion>v4.0</TargetFrameworkVersion>
|
||||
<TargetFrameworkProfile>
|
||||
</TargetFrameworkProfile>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
|
||||
<PlatformTarget>x86</PlatformTarget>
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DebugType>full</DebugType>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\Debug\</OutputPath>
|
||||
<DocumentationFile>CameraMng.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
<DefineConstants>
|
||||
</DefineConstants>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
|
||||
<PlatformTarget>x86</PlatformTarget>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<DefineDebug>false</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<Optimize>true</Optimize>
|
||||
<OutputPath>bin\Release\</OutputPath>
|
||||
<DocumentationFile>CameraMng.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
<DefineConstants>
|
||||
</DefineConstants>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionExplicit>On</OptionExplicit>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionCompare>Binary</OptionCompare>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionStrict>Off</OptionStrict>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<OptionInfer>On</OptionInfer>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup>
|
||||
<ApplicationManifest>My Project\app.manifest</ApplicationManifest>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|x64'">
|
||||
<DebugSymbols>true</DebugSymbols>
|
||||
<DefineDebug>true</DefineDebug>
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\x64\Debug\</OutputPath>
|
||||
<DocumentationFile>CameraMng.xml</DocumentationFile>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
<DebugType>full</DebugType>
|
||||
<PlatformTarget>x64</PlatformTarget>
|
||||
<CodeAnalysisIgnoreBuiltInRuleSets>false</CodeAnalysisIgnoreBuiltInRuleSets>
|
||||
<CodeAnalysisIgnoreBuiltInRules>false</CodeAnalysisIgnoreBuiltInRules>
|
||||
<CodeAnalysisFailOnMissingRules>false</CodeAnalysisFailOnMissingRules>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Release|x64'">
|
||||
<DefineTrace>true</DefineTrace>
|
||||
<OutputPath>bin\x64\Release\</OutputPath>
|
||||
<DocumentationFile>CameraMng.xml</DocumentationFile>
|
||||
<Optimize>true</Optimize>
|
||||
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
|
||||
<DebugType>pdbonly</DebugType>
|
||||
<PlatformTarget>x64</PlatformTarget>
|
||||
<CodeAnalysisIgnoreBuiltInRules>false</CodeAnalysisIgnoreBuiltInRules>
|
||||
<CodeAnalysisFailOnMissingRules>false</CodeAnalysisFailOnMissingRules>
|
||||
</PropertyGroup>
|
||||
<ItemGroup>
|
||||
<Reference Include="Emgu.CV.UI" Condition="'$(Configuration)' == 'Debug WinXP'">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>DepEmguXP\Emgu.CV.UI.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Emgu.CV.UI">
|
||||
<HintPath>..\..\..\EgtProg\CameraMng\Emgu.CV.UI.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Emgu.CV.World" Condition="'$(Configuration)' == 'Release'">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>DepEmgu\Emgu.CV.World.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Emgu.CV.UI" Condition="'$(Configuration)' == 'Release'">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>DepEmgu\Emgu.CV.UI.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Emgu.CV.UI" Condition="'$(Configuration)' == 'Release WinXP'">
|
||||
<SpecificVersion>False</SpecificVersion>
|
||||
<HintPath>DepEmguXP\Emgu.CV.UI.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="Emgu.CV.World">
|
||||
<HintPath>..\..\..\EgtProg\CameraMng\Emgu.CV.World.dll</HintPath>
|
||||
</Reference>
|
||||
<Reference Include="System" />
|
||||
<Reference Include="System.Data" />
|
||||
<Reference Include="System.Deployment" />
|
||||
<Reference Include="System.Drawing" />
|
||||
<Reference Include="System.Windows.Forms" />
|
||||
<Reference Include="System.Xml" />
|
||||
<Reference Include="System.Core" />
|
||||
<Reference Include="System.Xml.Linq" />
|
||||
<Reference Include="System.Data.DataSetExtensions" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Import Include="Microsoft.VisualBasic" />
|
||||
<Import Include="System" />
|
||||
<Import Include="System.Collections" />
|
||||
<Import Include="System.Collections.Generic" />
|
||||
<Import Include="System.Data" />
|
||||
<Import Include="System.Drawing" />
|
||||
<Import Include="System.Diagnostics" />
|
||||
<Import Include="System.Windows.Forms" />
|
||||
<Import Include="System.Linq" />
|
||||
<Import Include="System.Xml.Linq" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Compile Include="ApplicationEvents.vb" />
|
||||
<Compile Include="Camera\CameraController.vb" />
|
||||
<Compile Include="Camera\CameraModel.vb" />
|
||||
<Compile Include="Camera\CameraModelLegacy.vb" />
|
||||
<Compile Include="CfgForm.Designer.vb">
|
||||
<DependentUpon>CfgForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="CfgForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="clsCamera\clsCamera.vb" />
|
||||
<Compile Include="clsImageMng\BitmapBytesRGB24.vb" />
|
||||
<Compile Include="clsImageMng\clsImageMng.vb" />
|
||||
<Compile Include="clsImageMng\clsRicerca.vb" />
|
||||
<Compile Include="clsImageMng\clsVisione.vb" />
|
||||
<Compile Include="clsImageMng\FrmImgShow.Designer.vb">
|
||||
<DependentUpon>FrmImgShow.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="clsImageMng\FrmImgShow.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="Command\CloseSessionCommand.vb" />
|
||||
<Compile Include="Command\Command.vb" />
|
||||
<Compile Include="Command\GetPropertyCommand.vb" />
|
||||
<Compile Include="Command\GetPropertyDescCommand.vb" />
|
||||
<Compile Include="Command\OpenSessionCommand.vb" />
|
||||
<Compile Include="Command\SaveSettingCommand.vb" />
|
||||
<Compile Include="Command\SetPropertyCommand.vb" />
|
||||
<Compile Include="Command\TakePictureCommand.vb" />
|
||||
<Compile Include="Common\EDSDK.vb" />
|
||||
<Compile Include="Common\EDSDKErrors.vb" />
|
||||
<Compile Include="Common\EDSDKTypes.vb" />
|
||||
<Compile Include="Common\EDSDKTypesXP.vb" />
|
||||
<Compile Include="Common\EDSDKXP.vb" />
|
||||
<Compile Include="ExifWorks.vb" />
|
||||
<Compile Include="FrmCfgGeo.Designer.vb">
|
||||
<DependentUpon>FrmCfgGeo.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="FrmCfgGeo.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="FormSce.Designer.vb">
|
||||
<DependentUpon>FormSce.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="FormSce.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="FrmStart.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="FrmStart.Designer.vb">
|
||||
<DependentUpon>FrmStart.vb</DependentUpon>
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="FrmMain.designer.vb">
|
||||
<DependentUpon>FrmMain.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="FrmMain.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="ImageCtrl\DrawingBoard.Designer.vb">
|
||||
<DependentUpon>DrawingBoard.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="ImageCtrl\DrawingBoard.vb">
|
||||
<SubType>UserControl</SubType>
|
||||
</Compile>
|
||||
<Compile Include="ImageCtrl\ImageControl.Designer.vb">
|
||||
<DependentUpon>ImageControl.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="ImageCtrl\ImageControl.vb">
|
||||
<SubType>UserControl</SubType>
|
||||
</Compile>
|
||||
<Compile Include="MainModule.vb" />
|
||||
<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>
|
||||
<Compile Include="Observer.vb" />
|
||||
<Compile Include="Processor.vb" />
|
||||
<Compile Include="property\Property.vb" />
|
||||
<Compile Include="SetConfigForm.Designer.vb">
|
||||
<DependentUpon>SetConfigForm.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="SetConfigForm.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<EmbeddedResource Include="CfgForm.resx">
|
||||
<DependentUpon>CfgForm.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="clsImageMng\FrmImgShow.resx">
|
||||
<DependentUpon>FrmImgShow.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="FormSce.resx">
|
||||
<DependentUpon>FormSce.vb</DependentUpon>
|
||||
<SubType>Designer</SubType>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="FrmCfgGeo.resx">
|
||||
<DependentUpon>FrmCfgGeo.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="FrmMain.resx">
|
||||
<DependentUpon>FrmMain.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="FrmStart.resx">
|
||||
<DependentUpon>FrmStart.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="ImageCtrl\DrawingBoard.resx">
|
||||
<DependentUpon>DrawingBoard.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="ImageCtrl\ImageControl.resx">
|
||||
<DependentUpon>ImageControl.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>
|
||||
<EmbeddedResource Include="SetConfigForm.resx">
|
||||
<DependentUpon>SetConfigForm.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<None Include="app.config" />
|
||||
<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>
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<Content Include="Resources\25_tape.png" />
|
||||
<Content Include="Resources\Blocchetti.bmp" />
|
||||
<None Include="Resources\bordo.png" />
|
||||
<None Include="Resources\bordo2.png" />
|
||||
<Content Include="Resources\Calibrazione.bmp" />
|
||||
<Content Include="Resources\Cfg.jpg" />
|
||||
<Content Include="Resources\Correction.bmp" />
|
||||
<None Include="Resources\DefAree.bmp" />
|
||||
<Content Include="Resources\exit.jpg" />
|
||||
<Content Include="Resources\Spessore.bmp" />
|
||||
<None Include="Resources\ventosa2.png" />
|
||||
<Content Include="Resources\zoom_all_img.bmp" />
|
||||
<Content Include="Resources\zoom_all_img1.bmp" />
|
||||
<Content Include="Resources\zoom_in_img.bmp" />
|
||||
<Content Include="Resources\zoom_out_img.bmp" />
|
||||
<Content Include="Resources\zoom_window_img.bmp" />
|
||||
</ItemGroup>
|
||||
<ItemGroup>
|
||||
<ProjectReference Include="..\CSharpLibrary\CSharpLibrary.csproj">
|
||||
<Project>{60CE9527-95BC-433A-BE8F-640489315539}</Project>
|
||||
<Name>CSharpLibrary</Name>
|
||||
</ProjectReference>
|
||||
</ItemGroup>
|
||||
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
|
||||
<PropertyGroup>
|
||||
<PostBuildEvent>IF "$(PlatformName)"=="x64" IF "$(ConfigurationName)" == "Release" copy $(TargetPath) c:\EgtProg\CameraMng\CameraMng.exe
|
||||
IF "$(PlatformName)"=="x64" IF "$(ConfigurationName)" == "Debug" copy $(TargetPath) c:\EgtProg\CameraMng\CameraMngD64.exe
|
||||
</PostBuildEvent>
|
||||
</PropertyGroup>
|
||||
<!-- 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>
|
||||
Generated
+193
@@ -0,0 +1,193 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class CaliProspCfg
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.tBoxP1X = New System.Windows.Forms.TextBox()
|
||||
Me.tBoxP1Y = New System.Windows.Forms.TextBox()
|
||||
Me.TextBox1 = New System.Windows.Forms.TextBox()
|
||||
Me.TextBox2 = New System.Windows.Forms.TextBox()
|
||||
Me.TextBox3 = New System.Windows.Forms.TextBox()
|
||||
Me.TextBox4 = New System.Windows.Forms.TextBox()
|
||||
Me.TextBox5 = New System.Windows.Forms.TextBox()
|
||||
Me.TextBox6 = New System.Windows.Forms.TextBox()
|
||||
Me.lblP1 = New System.Windows.Forms.Label()
|
||||
Me.lblP2 = New System.Windows.Forms.Label()
|
||||
Me.lblP3 = New System.Windows.Forms.Label()
|
||||
Me.lblP4 = New System.Windows.Forms.Label()
|
||||
Me.lblX = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'tBoxP1X
|
||||
'
|
||||
Me.tBoxP1X.Location = New System.Drawing.Point(54, 54)
|
||||
Me.tBoxP1X.Name = "tBoxP1X"
|
||||
Me.tBoxP1X.Size = New System.Drawing.Size(64, 20)
|
||||
Me.tBoxP1X.TabIndex = 0
|
||||
'
|
||||
'tBoxP1Y
|
||||
'
|
||||
Me.tBoxP1Y.Location = New System.Drawing.Point(54, 77)
|
||||
Me.tBoxP1Y.Name = "tBoxP1Y"
|
||||
Me.tBoxP1Y.Size = New System.Drawing.Size(64, 20)
|
||||
Me.tBoxP1Y.TabIndex = 1
|
||||
'
|
||||
'TextBox1
|
||||
'
|
||||
Me.TextBox1.Location = New System.Drawing.Point(37, 299)
|
||||
Me.TextBox1.Name = "TextBox1"
|
||||
Me.TextBox1.Size = New System.Drawing.Size(64, 20)
|
||||
Me.TextBox1.TabIndex = 3
|
||||
'
|
||||
'TextBox2
|
||||
'
|
||||
Me.TextBox2.Location = New System.Drawing.Point(37, 273)
|
||||
Me.TextBox2.Name = "TextBox2"
|
||||
Me.TextBox2.Size = New System.Drawing.Size(64, 20)
|
||||
Me.TextBox2.TabIndex = 2
|
||||
'
|
||||
'TextBox3
|
||||
'
|
||||
Me.TextBox3.Location = New System.Drawing.Point(530, 299)
|
||||
Me.TextBox3.Name = "TextBox3"
|
||||
Me.TextBox3.Size = New System.Drawing.Size(64, 20)
|
||||
Me.TextBox3.TabIndex = 5
|
||||
'
|
||||
'TextBox4
|
||||
'
|
||||
Me.TextBox4.Location = New System.Drawing.Point(530, 320)
|
||||
Me.TextBox4.Name = "TextBox4"
|
||||
Me.TextBox4.Size = New System.Drawing.Size(64, 20)
|
||||
Me.TextBox4.TabIndex = 4
|
||||
'
|
||||
'TextBox5
|
||||
'
|
||||
Me.TextBox5.Location = New System.Drawing.Point(497, 77)
|
||||
Me.TextBox5.Name = "TextBox5"
|
||||
Me.TextBox5.Size = New System.Drawing.Size(64, 20)
|
||||
Me.TextBox5.TabIndex = 7
|
||||
'
|
||||
'TextBox6
|
||||
'
|
||||
Me.TextBox6.Location = New System.Drawing.Point(497, 54)
|
||||
Me.TextBox6.Name = "TextBox6"
|
||||
Me.TextBox6.Size = New System.Drawing.Size(64, 20)
|
||||
Me.TextBox6.TabIndex = 6
|
||||
'
|
||||
'lblP1
|
||||
'
|
||||
Me.lblP1.AutoSize = True
|
||||
Me.lblP1.Location = New System.Drawing.Point(78, 129)
|
||||
Me.lblP1.Name = "lblP1"
|
||||
Me.lblP1.Size = New System.Drawing.Size(40, 13)
|
||||
Me.lblP1.TabIndex = 8
|
||||
Me.lblP1.Text = "Point 1"
|
||||
'
|
||||
'lblP2
|
||||
'
|
||||
Me.lblP2.AutoSize = True
|
||||
Me.lblP2.Location = New System.Drawing.Point(78, 229)
|
||||
Me.lblP2.Name = "lblP2"
|
||||
Me.lblP2.Size = New System.Drawing.Size(40, 13)
|
||||
Me.lblP2.TabIndex = 9
|
||||
Me.lblP2.Text = "Point 2"
|
||||
'
|
||||
'lblP3
|
||||
'
|
||||
Me.lblP3.AutoSize = True
|
||||
Me.lblP3.Location = New System.Drawing.Point(545, 239)
|
||||
Me.lblP3.Name = "lblP3"
|
||||
Me.lblP3.Size = New System.Drawing.Size(40, 13)
|
||||
Me.lblP3.TabIndex = 10
|
||||
Me.lblP3.Text = "Point 3"
|
||||
'
|
||||
'lblP4
|
||||
'
|
||||
Me.lblP4.AutoSize = True
|
||||
Me.lblP4.Location = New System.Drawing.Point(545, 120)
|
||||
Me.lblP4.Name = "lblP4"
|
||||
Me.lblP4.Size = New System.Drawing.Size(40, 13)
|
||||
Me.lblP4.TabIndex = 11
|
||||
Me.lblP4.Text = "Point 4"
|
||||
'
|
||||
'lblX
|
||||
'
|
||||
Me.lblX.AutoSize = True
|
||||
Me.lblX.Location = New System.Drawing.Point(34, 61)
|
||||
Me.lblX.Name = "lblX"
|
||||
Me.lblX.Size = New System.Drawing.Size(14, 13)
|
||||
Me.lblX.TabIndex = 12
|
||||
Me.lblX.Text = "X"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(34, 84)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(14, 13)
|
||||
Me.Label1.TabIndex = 13
|
||||
Me.Label1.Text = "Y"
|
||||
'
|
||||
'CaliProspCfg
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackgroundImage = Global.CameraMng.My.Resources.Resources.Prova
|
||||
Me.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
|
||||
Me.ClientSize = New System.Drawing.Size(637, 378)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Controls.Add(Me.lblX)
|
||||
Me.Controls.Add(Me.lblP4)
|
||||
Me.Controls.Add(Me.lblP3)
|
||||
Me.Controls.Add(Me.lblP2)
|
||||
Me.Controls.Add(Me.lblP1)
|
||||
Me.Controls.Add(Me.TextBox5)
|
||||
Me.Controls.Add(Me.TextBox6)
|
||||
Me.Controls.Add(Me.TextBox3)
|
||||
Me.Controls.Add(Me.TextBox4)
|
||||
Me.Controls.Add(Me.TextBox1)
|
||||
Me.Controls.Add(Me.TextBox2)
|
||||
Me.Controls.Add(Me.tBoxP1Y)
|
||||
Me.Controls.Add(Me.tBoxP1X)
|
||||
Me.DoubleBuffered = True
|
||||
Me.Name = "CaliProspCfg"
|
||||
Me.Text = "CaliProspCfg"
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents tBoxP1X As System.Windows.Forms.TextBox
|
||||
Friend WithEvents tBoxP1Y As System.Windows.Forms.TextBox
|
||||
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents TextBox2 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents TextBox3 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents TextBox4 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents TextBox5 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents TextBox6 As System.Windows.Forms.TextBox
|
||||
Friend WithEvents lblP1 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblP2 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblP3 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblP4 As System.Windows.Forms.Label
|
||||
Friend WithEvents lblX As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
End Class
|
||||
@@ -0,0 +1,3 @@
|
||||
Public Class CaliProspCfg
|
||||
|
||||
End Class
|
||||
Generated
+300
@@ -0,0 +1,300 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class CfgForm
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.BtnOk = New System.Windows.Forms.Button()
|
||||
Me.PanelDeviceStatus = New System.Windows.Forms.GroupBox()
|
||||
Me.LbCfgCameraID = New System.Windows.Forms.Label()
|
||||
Me.Label8 = New System.Windows.Forms.Label()
|
||||
Me.BtnResetID = New System.Windows.Forms.Button()
|
||||
Me.LbCameraID = New System.Windows.Forms.Label()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.BtnSetID = New System.Windows.Forms.Button()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.BtnDisConnect = New System.Windows.Forms.Button()
|
||||
Me.LbDeviceDescription = New System.Windows.Forms.Label()
|
||||
Me.LbDeviceStatus = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
|
||||
Me.LbTempDir = New System.Windows.Forms.Label()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.LbImageDir = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.LbFileCali = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.PanelDeviceStatus.SuspendLayout()
|
||||
Me.GroupBox1.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'BtnOk
|
||||
'
|
||||
Me.BtnOk.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.BtnOk.Location = New System.Drawing.Point(538, 260)
|
||||
Me.BtnOk.Name = "BtnOk"
|
||||
Me.BtnOk.Size = New System.Drawing.Size(60, 23)
|
||||
Me.BtnOk.TabIndex = 24
|
||||
Me.BtnOk.Text = "OK"
|
||||
Me.BtnOk.UseVisualStyleBackColor = True
|
||||
'
|
||||
'PanelDeviceStatus
|
||||
'
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.LbCfgCameraID)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.Label8)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.BtnResetID)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.LbCameraID)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.Label6)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.BtnSetID)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.Label3)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.BtnDisConnect)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.LbDeviceDescription)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.LbDeviceStatus)
|
||||
Me.PanelDeviceStatus.Controls.Add(Me.Label2)
|
||||
Me.PanelDeviceStatus.Location = New System.Drawing.Point(22, 26)
|
||||
Me.PanelDeviceStatus.Name = "PanelDeviceStatus"
|
||||
Me.PanelDeviceStatus.Size = New System.Drawing.Size(463, 141)
|
||||
Me.PanelDeviceStatus.TabIndex = 25
|
||||
Me.PanelDeviceStatus.TabStop = False
|
||||
Me.PanelDeviceStatus.Text = "Device Status"
|
||||
'
|
||||
'LbCfgCameraID
|
||||
'
|
||||
Me.LbCfgCameraID.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.LbCfgCameraID.Location = New System.Drawing.Point(111, 97)
|
||||
Me.LbCfgCameraID.Name = "LbCfgCameraID"
|
||||
Me.LbCfgCameraID.Size = New System.Drawing.Size(129, 19)
|
||||
Me.LbCfgCameraID.TabIndex = 32
|
||||
'
|
||||
'Label8
|
||||
'
|
||||
Me.Label8.AutoSize = True
|
||||
Me.Label8.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Label8.Location = New System.Drawing.Point(13, 97)
|
||||
Me.Label8.Name = "Label8"
|
||||
Me.Label8.Size = New System.Drawing.Size(79, 13)
|
||||
Me.Label8.TabIndex = 31
|
||||
Me.Label8.Text = "Cfg Camera ID:"
|
||||
'
|
||||
'BtnResetID
|
||||
'
|
||||
Me.BtnResetID.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.BtnResetID.Location = New System.Drawing.Point(287, 79)
|
||||
Me.BtnResetID.Name = "BtnResetID"
|
||||
Me.BtnResetID.Size = New System.Drawing.Size(131, 21)
|
||||
Me.BtnResetID.TabIndex = 30
|
||||
Me.BtnResetID.Text = "Reset ID"
|
||||
Me.BtnResetID.UseVisualStyleBackColor = True
|
||||
'
|
||||
'LbCameraID
|
||||
'
|
||||
Me.LbCameraID.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.LbCameraID.Location = New System.Drawing.Point(111, 73)
|
||||
Me.LbCameraID.Name = "LbCameraID"
|
||||
Me.LbCameraID.Size = New System.Drawing.Size(129, 19)
|
||||
Me.LbCameraID.TabIndex = 29
|
||||
Me.LbCameraID.Text = "Unknown"
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.AutoSize = True
|
||||
Me.Label6.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Label6.Location = New System.Drawing.Point(13, 73)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(60, 13)
|
||||
Me.Label6.TabIndex = 28
|
||||
Me.Label6.Text = "Camera ID:"
|
||||
'
|
||||
'BtnSetID
|
||||
'
|
||||
Me.BtnSetID.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.BtnSetID.Location = New System.Drawing.Point(287, 52)
|
||||
Me.BtnSetID.Name = "BtnSetID"
|
||||
Me.BtnSetID.Size = New System.Drawing.Size(131, 21)
|
||||
Me.BtnSetID.TabIndex = 27
|
||||
Me.BtnSetID.Text = "Set This ID As Default"
|
||||
Me.BtnSetID.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
Me.Label3.AutoSize = True
|
||||
Me.Label3.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Label3.Location = New System.Drawing.Point(13, 25)
|
||||
Me.Label3.Name = "Label3"
|
||||
Me.Label3.Size = New System.Drawing.Size(39, 13)
|
||||
Me.Label3.TabIndex = 6
|
||||
Me.Label3.Text = "Model:"
|
||||
Me.Label3.Visible = False
|
||||
'
|
||||
'BtnDisConnect
|
||||
'
|
||||
Me.BtnDisConnect.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.BtnDisConnect.Location = New System.Drawing.Point(287, 25)
|
||||
Me.BtnDisConnect.Name = "BtnDisConnect"
|
||||
Me.BtnDisConnect.Size = New System.Drawing.Size(131, 21)
|
||||
Me.BtnDisConnect.TabIndex = 26
|
||||
Me.BtnDisConnect.Text = "DisConnect"
|
||||
Me.BtnDisConnect.UseVisualStyleBackColor = True
|
||||
'
|
||||
'LbDeviceDescription
|
||||
'
|
||||
Me.LbDeviceDescription.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.LbDeviceDescription.Location = New System.Drawing.Point(111, 25)
|
||||
Me.LbDeviceDescription.Name = "LbDeviceDescription"
|
||||
Me.LbDeviceDescription.Size = New System.Drawing.Size(129, 13)
|
||||
Me.LbDeviceDescription.TabIndex = 15
|
||||
Me.LbDeviceDescription.Text = "Unknown"
|
||||
Me.LbDeviceDescription.Visible = False
|
||||
'
|
||||
'LbDeviceStatus
|
||||
'
|
||||
Me.LbDeviceStatus.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.LbDeviceStatus.Location = New System.Drawing.Point(111, 49)
|
||||
Me.LbDeviceStatus.Name = "LbDeviceStatus"
|
||||
Me.LbDeviceStatus.Size = New System.Drawing.Size(129, 19)
|
||||
Me.LbDeviceStatus.TabIndex = 14
|
||||
Me.LbDeviceStatus.Text = "Unknown"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Label2.Location = New System.Drawing.Point(13, 49)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(40, 13)
|
||||
Me.Label2.TabIndex = 5
|
||||
Me.Label2.Text = "Status:"
|
||||
'
|
||||
'GroupBox1
|
||||
'
|
||||
Me.GroupBox1.Controls.Add(Me.LbTempDir)
|
||||
Me.GroupBox1.Controls.Add(Me.Label7)
|
||||
Me.GroupBox1.Controls.Add(Me.LbImageDir)
|
||||
Me.GroupBox1.Controls.Add(Me.Label5)
|
||||
Me.GroupBox1.Controls.Add(Me.LbFileCali)
|
||||
Me.GroupBox1.Controls.Add(Me.Label1)
|
||||
Me.GroupBox1.Location = New System.Drawing.Point(22, 173)
|
||||
Me.GroupBox1.Name = "GroupBox1"
|
||||
Me.GroupBox1.Size = New System.Drawing.Size(463, 99)
|
||||
Me.GroupBox1.TabIndex = 27
|
||||
Me.GroupBox1.TabStop = False
|
||||
Me.GroupBox1.Text = "File Cfg"
|
||||
'
|
||||
'LbTempDir
|
||||
'
|
||||
Me.LbTempDir.AutoSize = True
|
||||
Me.LbTempDir.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.LbTempDir.Location = New System.Drawing.Point(111, 74)
|
||||
Me.LbTempDir.Name = "LbTempDir"
|
||||
Me.LbTempDir.Size = New System.Drawing.Size(55, 13)
|
||||
Me.LbTempDir.TabIndex = 12
|
||||
Me.LbTempDir.Text = "UnkNown"
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Label7.Location = New System.Drawing.Point(6, 74)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(53, 13)
|
||||
Me.Label7.TabIndex = 11
|
||||
Me.Label7.Text = "Temp Dir:"
|
||||
'
|
||||
'LbImageDir
|
||||
'
|
||||
Me.LbImageDir.AutoSize = True
|
||||
Me.LbImageDir.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.LbImageDir.Location = New System.Drawing.Point(111, 51)
|
||||
Me.LbImageDir.Name = "LbImageDir"
|
||||
Me.LbImageDir.Size = New System.Drawing.Size(55, 13)
|
||||
Me.LbImageDir.TabIndex = 10
|
||||
Me.LbImageDir.Text = "UnkNown"
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Label5.Location = New System.Drawing.Point(6, 51)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(83, 13)
|
||||
Me.Label5.TabIndex = 9
|
||||
Me.Label5.Text = "Save Image Dir:"
|
||||
'
|
||||
'LbFileCali
|
||||
'
|
||||
Me.LbFileCali.AutoSize = True
|
||||
Me.LbFileCali.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.LbFileCali.Location = New System.Drawing.Point(111, 29)
|
||||
Me.LbFileCali.Name = "LbFileCali"
|
||||
Me.LbFileCali.Size = New System.Drawing.Size(55, 13)
|
||||
Me.LbFileCali.TabIndex = 8
|
||||
Me.LbFileCali.Text = "UnkNown"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.ImeMode = System.Windows.Forms.ImeMode.NoControl
|
||||
Me.Label1.Location = New System.Drawing.Point(6, 29)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(78, 13)
|
||||
Me.Label1.TabIndex = 7
|
||||
Me.Label1.Text = "Calibration File:"
|
||||
'
|
||||
'CfgForm
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(624, 295)
|
||||
Me.ControlBox = False
|
||||
Me.Controls.Add(Me.GroupBox1)
|
||||
Me.Controls.Add(Me.PanelDeviceStatus)
|
||||
Me.Controls.Add(Me.BtnOk)
|
||||
Me.Name = "CfgForm"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "CfgForm"
|
||||
Me.PanelDeviceStatus.ResumeLayout(False)
|
||||
Me.PanelDeviceStatus.PerformLayout()
|
||||
Me.GroupBox1.ResumeLayout(False)
|
||||
Me.GroupBox1.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents BtnOk As System.Windows.Forms.Button
|
||||
Friend WithEvents PanelDeviceStatus As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents LbDeviceDescription As System.Windows.Forms.Label
|
||||
Friend WithEvents LbDeviceStatus As System.Windows.Forms.Label
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents BtnDisConnect As System.Windows.Forms.Button
|
||||
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents LbTempDir As System.Windows.Forms.Label
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents LbImageDir As System.Windows.Forms.Label
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents LbFileCali As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents LbCameraID As System.Windows.Forms.Label
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents BtnSetID As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnResetID As System.Windows.Forms.Button
|
||||
Friend WithEvents LbCfgCameraID As System.Windows.Forms.Label
|
||||
Friend WithEvents Label8 As System.Windows.Forms.Label
|
||||
End Class
|
||||
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -0,0 +1,25 @@
|
||||
Public Class CfgForm
|
||||
|
||||
Private Sub BtnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnOk.Click
|
||||
Me.Hide()
|
||||
End Sub
|
||||
|
||||
Private Sub BtnDisConnect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnDisConnect.Click
|
||||
'Camera.Disconnect()
|
||||
'SetFormStatus()
|
||||
End Sub
|
||||
|
||||
Private Sub BtnSetID_Click(sender As System.Object, e As System.EventArgs) Handles BtnSetID.Click
|
||||
FrmMain.SetDefaultCamera()
|
||||
End Sub
|
||||
|
||||
Private Sub CfgForm_Activated(sender As Object, e As System.EventArgs) Handles Me.Activated
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub BtnResetID_Click(sender As System.Object, e As System.EventArgs) Handles BtnResetID.Click
|
||||
FrmMain.SetDefaultCamera(True)
|
||||
FrmMain.Camera.Connect()
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,52 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : CloseSessionCommand.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
|
||||
|
||||
Public Class CloseSessionCommand
|
||||
Inherits Command
|
||||
|
||||
Public Sub New(ByVal inModel As CameraModel)
|
||||
MyBase.new(inModel)
|
||||
End Sub
|
||||
|
||||
|
||||
'// Execute a command.
|
||||
Overrides Function execute() As Boolean
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
|
||||
'// Open session with remote camera.
|
||||
err = EdsCloseSession(MyBase.model.getCameraObject())
|
||||
|
||||
|
||||
'// Notify Error.
|
||||
If err <> EDS_ERR_OK Then
|
||||
MyBase.model.notifyObservers(errr, err)
|
||||
End If
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,54 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : Command.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Module commandName
|
||||
' Command IDs
|
||||
Public Const errr As Integer = 1 'errr
|
||||
Public Const prog As Integer = 2 'prog
|
||||
Public Const strt As Integer = 3 'strt
|
||||
Public Const cplt As Integer = 4 'cplt
|
||||
Public Const warn As Integer = 5 'warn
|
||||
Public Const updt As Integer = 6 'updt
|
||||
Public Const upls As Integer = 7 'upls
|
||||
Public Const clse As Integer = 1 'close
|
||||
End Module
|
||||
|
||||
|
||||
|
||||
' Abstract command class.
|
||||
' All command classes extends this one.
|
||||
Public Class Command
|
||||
|
||||
Protected model As CameraModel
|
||||
|
||||
Public Sub New(ByVal model As CameraModel)
|
||||
Me.model = model
|
||||
End Sub
|
||||
|
||||
'// Execute a command.
|
||||
Public Overridable Function execute() As Boolean
|
||||
Return True
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,177 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : GetPropertyCommand.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
|
||||
Public Class GetPropertyCommand
|
||||
Inherits Command
|
||||
|
||||
Private propertyID As Integer
|
||||
|
||||
|
||||
Public Sub New(ByVal model As CameraModel, ByVal propertyID As Integer)
|
||||
MyBase.new(model)
|
||||
Me.propertyID = propertyID
|
||||
End Sub
|
||||
|
||||
'// Execute a command.
|
||||
Public Overrides Function execute() As Boolean
|
||||
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
|
||||
'//Get a property.
|
||||
|
||||
err = getProperty(Me.propertyID)
|
||||
|
||||
'// Notify Error.
|
||||
If err <> EDS_ERR_OK Then
|
||||
|
||||
'// Retry when the camera replys deviceBusy.
|
||||
If (err & EDS_ERRORID_MASK) = EDS_ERR_DEVICE_BUSY Then
|
||||
|
||||
MyBase.model.notifyObservers(warn, err)
|
||||
|
||||
Return False
|
||||
|
||||
End If
|
||||
|
||||
MyBase.model.notifyObservers(errr, err)
|
||||
|
||||
End If
|
||||
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
Private Function getProperty(ByVal id As Integer) As Integer
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
Dim dataType As EdsDataType = EdsDataType.kEdsDataType_Unknown
|
||||
Dim dataSize As Integer = 0
|
||||
|
||||
|
||||
If id = kEdsPropID_Unknown Then
|
||||
'// If the propertyID is invalidID,
|
||||
'// you should retry to get properties.
|
||||
'// InvalidID is able to be published for the models elder than EOS30D.
|
||||
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getProperty(kEdsPropID_AEMode)
|
||||
End If
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getProperty(kEdsPropID_Tv)
|
||||
End If
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getProperty(kEdsPropID_Av)
|
||||
End If
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getProperty(kEdsPropID_ISOSpeed)
|
||||
End If
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getProperty(kEdsPropID_ImageQuality)
|
||||
End If
|
||||
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getProperty(kEdsPropID_BodyIDEx)
|
||||
End If
|
||||
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getProperty(kEdsPropID_OwnerName)
|
||||
End If
|
||||
|
||||
Return err
|
||||
End If
|
||||
|
||||
'// Get propertysize.
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
err = EdsGetPropertySize( _
|
||||
MyBase.model.getCameraObject(), _
|
||||
id, _
|
||||
0, _
|
||||
dataType, _
|
||||
dataSize)
|
||||
|
||||
End If
|
||||
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
Dim data As Integer
|
||||
If dataType = EdsDataType.kEdsDataType_UInt32 Then
|
||||
'// Get a property.
|
||||
Dim ptr As IntPtr = Marshal.AllocHGlobal(dataSize)
|
||||
|
||||
err = EdsGetPropertyData(MyBase.model.getCameraObject(), _
|
||||
id, _
|
||||
0, _
|
||||
dataSize, _
|
||||
ptr)
|
||||
|
||||
data = Marshal.PtrToStructure(ptr, GetType(Integer))
|
||||
Marshal.FreeHGlobal(ptr)
|
||||
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
MyBase.model.setPropertyUInt32(id, data)
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
If dataType = EdsDataType.kEdsDataType_String Then
|
||||
|
||||
Dim str As String 'char[EDS_MAX_NAME]
|
||||
Dim ptr As IntPtr = Marshal.AllocHGlobal(EDS_MAX_NAME)
|
||||
|
||||
'// Get a property.
|
||||
err = EdsGetPropertyData(MyBase.model.getCameraObject(), _
|
||||
id, _
|
||||
0, _
|
||||
dataSize, _
|
||||
ptr)
|
||||
|
||||
str = Marshal.PtrToStringAnsi(ptr)
|
||||
Marshal.FreeHGlobal(ptr)
|
||||
|
||||
'// Stock the property .
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
MyBase.model.setPropertyString(id, str)
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
|
||||
'// Notify updating.
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
MyBase.model.notifyObservers(updt, id)
|
||||
|
||||
End If
|
||||
|
||||
Return err
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,119 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : GetPropertyDescCommand.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Class GetPropertyDescCommand
|
||||
Inherits Command
|
||||
|
||||
Private propertyID As Integer
|
||||
|
||||
|
||||
Public Sub New(ByVal model As CameraModel, ByVal propertyID As Integer)
|
||||
MyBase.new(model)
|
||||
Me.propertyID = propertyID
|
||||
End Sub
|
||||
|
||||
|
||||
'// Execute a command.
|
||||
Overrides Function execute() As Boolean
|
||||
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
|
||||
'//Get an available property list.
|
||||
err = getPropertyDesc(Me.propertyID)
|
||||
|
||||
|
||||
'// Notify Error.
|
||||
If err <> EDS_ERR_OK Then
|
||||
|
||||
'// Retry when the camera replys deviceBusy.
|
||||
If (err & EDS_ERRORID_MASK) = EDS_ERR_DEVICE_BUSY Then
|
||||
|
||||
MyBase.model.notifyObservers(warn, err)
|
||||
|
||||
Return False
|
||||
|
||||
End If
|
||||
|
||||
MyBase.model.notifyObservers(errr, err)
|
||||
|
||||
End If
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
Private Function getPropertyDesc(ByVal id As Integer) As Integer
|
||||
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
Dim propertyDesc As New EdsPropertyDesc
|
||||
|
||||
If id = kEdsPropID_Unknown Then
|
||||
|
||||
'// If the propertyID is invalidID,
|
||||
'// you should retry to get available property lists.
|
||||
'// InvalidID is able to be published for the models elder than EOS30D.
|
||||
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getPropertyDesc(kEdsPropID_AEMode)
|
||||
End If
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getPropertyDesc(kEdsPropID_Tv)
|
||||
End If
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getPropertyDesc(kEdsPropID_Av)
|
||||
End If
|
||||
If err = EDS_ERR_OK Then
|
||||
err = getPropertyDesc(kEdsPropID_ISOSpeed)
|
||||
End If
|
||||
|
||||
Return err
|
||||
End If
|
||||
|
||||
'// Get available property lists.
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
err = EdsGetPropertyDesc(MyBase.model.getCameraObject(), _
|
||||
id, _
|
||||
propertyDesc)
|
||||
End If
|
||||
|
||||
'// Stock the available property list.
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
MyBase.model.setPropertyDesc(id, propertyDesc)
|
||||
|
||||
End If
|
||||
|
||||
'// Notify updating.
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
MyBase.model.notifyObservers(upls, id)
|
||||
|
||||
End If
|
||||
|
||||
Return err
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,78 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : OpenSessionCommand.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Class OpenSessionCommand
|
||||
Inherits Command
|
||||
|
||||
Public Sub New(ByVal model As CameraModel)
|
||||
MyBase.new(model)
|
||||
End Sub
|
||||
|
||||
'// Execute a command.
|
||||
Public Overrides Function execute() As Boolean
|
||||
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
Dim locked As Boolean = False
|
||||
|
||||
'// Open session with remote camera.
|
||||
err = EdsOpenSession(MyBase.model.getCameraObject())
|
||||
|
||||
|
||||
'Preservation ahead is set to PC
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
Dim saveTo As Integer = EdsSaveTo.kEdsSaveTo_Host
|
||||
err = EdsSetPropertyData(MyBase.model.getCameraObject(), kEdsPropID_SaveTo, 0, Marshal.SizeOf(saveTo), saveTo)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
If err = EDS_ERR_OK Then
|
||||
|
||||
Dim capacity As EdsCapacity
|
||||
capacity.numberOfFreeClusters = &H7FFFFFFF
|
||||
capacity.bytesPerSector = &H1000
|
||||
capacity.reset = 1
|
||||
|
||||
err = EdsSetCapacity(MyBase.model.getCameraObject(), capacity)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
'Notification of error
|
||||
If err < EDS_ERR_OK Then
|
||||
|
||||
'CameraEvent e("error", &err);
|
||||
MyBase.model.notifyObservers(errr, err)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
Return True
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,74 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : SaveSettingCommand.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Class SaveSettingCommand
|
||||
Inherits Command
|
||||
|
||||
Private saveTo As EdsSaveTo
|
||||
|
||||
Public Sub New(ByVal model As CameraModel, ByVal saveTo As EdsSaveTo)
|
||||
MyBase.new(model)
|
||||
saveTo = saveTo
|
||||
End Sub
|
||||
|
||||
|
||||
'// Execute a command.
|
||||
Public Overrides Function execute() As Boolean
|
||||
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
|
||||
|
||||
'//Set destination of file save.
|
||||
|
||||
Dim ptr As IntPtr = Marshal.AllocHGlobal(Marshal.SizeOf(Me.saveTo))
|
||||
Marshal.StructureToPtr(Me.saveTo, ptr, False)
|
||||
|
||||
err = EdsSetPropertyData(MyBase.model.getCameraObject(), _
|
||||
kEdsPropID_SaveTo, 0, Marshal.SizeOf(Me.saveTo), Me.saveTo)
|
||||
|
||||
Marshal.FreeHGlobal(ptr)
|
||||
|
||||
|
||||
|
||||
|
||||
'// Notify Error.
|
||||
If err <> EDS_ERR_OK Then
|
||||
|
||||
'// Retry when the camera replys deviceBusy.
|
||||
If err = EDS_ERR_DEVICE_BUSY Then
|
||||
MyBase.model.notifyObservers(warn, err)
|
||||
Threading.Thread.Sleep(500)
|
||||
Return False
|
||||
|
||||
End If
|
||||
|
||||
MyBase.model.notifyObservers(errr, err)
|
||||
|
||||
End If
|
||||
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,69 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : SetPropertyCommand.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Strict Off
|
||||
Option Explicit On
|
||||
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
|
||||
Public Class SetPropertyCommand
|
||||
Inherits Command
|
||||
|
||||
Private propertyID As Integer
|
||||
Private data As Integer
|
||||
|
||||
|
||||
Public Sub New(ByVal model As CameraModel, ByVal propertyID As Integer, ByVal data As Integer)
|
||||
MyBase.new(model)
|
||||
Me.propertyID = propertyID
|
||||
Me.data = data
|
||||
End Sub
|
||||
|
||||
'// Execute a command.
|
||||
Public Overrides Function execute() As Boolean
|
||||
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
|
||||
'// Stock the property.
|
||||
|
||||
err = EdsSetPropertyData(MyBase.model.getCameraObject(), Me.propertyID, 0, Marshal.SizeOf(Me.data), Me.data)
|
||||
|
||||
|
||||
'// Notify Error.
|
||||
If err <> EDS_ERR_OK Then
|
||||
'// Retry when the camera replys deviceBusy.
|
||||
If err = EDS_ERR_DEVICE_BUSY Then
|
||||
|
||||
MyBase.model.notifyObservers(warn, err)
|
||||
|
||||
Return False
|
||||
End If
|
||||
|
||||
MyBase.model.notifyObservers(errr, err)
|
||||
|
||||
End If
|
||||
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,62 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : TakePictureCommand.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Public Class TakePictureCommand
|
||||
Inherits Command
|
||||
|
||||
Public Sub New(ByVal model As CameraModel)
|
||||
MyBase.new(model)
|
||||
End Sub
|
||||
|
||||
'// Execute a command.
|
||||
Public Overrides Function execute() As Boolean
|
||||
|
||||
Dim err As Integer = EDS_ERR_OK
|
||||
|
||||
'// Take a picture.
|
||||
err = EdsSendCommand(MyBase.model.getCameraObject(), EdsCameraCommand.kEdsCameraCommand_PressShutterButton, EdsShutterButton.kEdsCameraCommand_ShutterButton_Completely)
|
||||
EdsSendCommand(MyBase.model.getCameraObject(), EdsCameraCommand.kEdsCameraCommand_PressShutterButton, EdsShutterButton.kEdsCameraCommand_ShutterButton_OFF)
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
'// Notify Error.
|
||||
If err <> EDS_ERR_OK Then
|
||||
|
||||
'// Do not retry when the camera replys deviceBusy.
|
||||
If err = EDS_ERR_DEVICE_BUSY Then
|
||||
|
||||
MyBase.model.notifyObservers(warn, err)
|
||||
|
||||
Return True
|
||||
|
||||
End If
|
||||
|
||||
'MyBase.model.notifyObservers(errr, err)
|
||||
|
||||
End If
|
||||
|
||||
Return True
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,163 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : EDSDKErros.h *
|
||||
'* *
|
||||
'* Description: ERROR DEFINITION FOR EDSDK *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-08 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
'Option Strict Off
|
||||
Option Explicit On
|
||||
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Module EDSDKErrors
|
||||
|
||||
Public Const EDS_ERRORID_MASK As Integer = &HFFFFL
|
||||
|
||||
Public Const EDS_ERR_OK As Integer = 0
|
||||
'/* Miscellaneous errors */
|
||||
Public Const EDS_ERR_UNIMPLEMENTED As Integer = &H1L
|
||||
Public Const EDS_ERR_INTERNAL_ERROR As Integer = &H2L
|
||||
Public Const EDS_ERR_MEM_ALLOC_FAILED As Integer = &H3L
|
||||
Public Const EDS_ERR_MEM_FREE_FAILED As Integer = &H4L
|
||||
Public Const EDS_ERR_OPERATION_CANCELLED As Integer = &H5L
|
||||
Public Const EDS_ERR_INCOMPATIBLE_VERSION As Integer = &H6L
|
||||
Public Const EDS_ERR_NOT_SUPPORTED As Integer = &H7L
|
||||
Public Const EDS_ERR_UNEXPECTED_EXCEPTION As Integer = &H8L
|
||||
Public Const EDS_ERR_PROTECTION_VIOLATION As Integer = &H9L
|
||||
Public Const EDS_ERR_MISSING_SUBCOMPONENT As Integer = &HAL
|
||||
Public Const EDS_ERR_SELECTION_UNAVAILABLE As Integer = &HBL
|
||||
|
||||
'/* File errors */
|
||||
Public Const EDS_ERR_FILE_IO_ERROR As Integer = &H20L
|
||||
Public Const EDS_ERR_FILE_TOO_MANY_OPEN As Integer = &H21L
|
||||
Public Const EDS_ERR_FILE_NOT_FOUND As Integer = &H22L
|
||||
Public Const EDS_ERR_FILE_OPEN_ERROR As Integer = &H23L
|
||||
Public Const EDS_ERR_FILE_CLOSE_ERROR As Integer = &H24L
|
||||
Public Const EDS_ERR_FILE_SEEK_ERROR As Integer = &H25L
|
||||
Public Const EDS_ERR_FILE_TELL_ERROR As Integer = &H26L
|
||||
Public Const EDS_ERR_FILE_READ_ERROR As Integer = &H27L
|
||||
Public Const EDS_ERR_FILE_WRITE_ERROR As Integer = &H28L
|
||||
Public Const EDS_ERR_FILE_PERMISSION_ERROR As Integer = &H29L
|
||||
Public Const EDS_ERR_FILE_DISK_FULL_ERROR As Integer = &H2AL
|
||||
Public Const EDS_ERR_FILE_ALREADY_EXISTS As Integer = &H2BL
|
||||
Public Const EDS_ERR_FILE_FORMAT_UNRECOGNIZED As Integer = &H2CL
|
||||
Public Const EDS_ERR_FILE_DATA_CORRUPT As Integer = &H2DL
|
||||
Public Const EDS_ERR_FILE_NAMING_NA As Integer = &H2EL
|
||||
|
||||
'/* Directory errors */
|
||||
Public Const EDS_ERR_DIR_NOT_FOUND As Integer = &H40L
|
||||
Public Const EDS_ERR_DIR_IO_ERROR As Integer = &H41L
|
||||
Public Const EDS_ERR_DIR_ENTRY_NOT_FOUND As Integer = &H42L
|
||||
Public Const EDS_ERR_DIR_ENTRY_EXISTS As Integer = &H43L
|
||||
Public Const EDS_ERR_DIR_NOT_EMPTY As Integer = &H44L
|
||||
|
||||
'/* Property errors */
|
||||
Public Const EDS_ERR_PROPERTIES_UNAVAILABLE As Integer = &H50L
|
||||
Public Const EDS_ERR_PROPERTIES_MISMATCH As Integer = &H51L
|
||||
Public Const EDS_ERR_PROPERTIES_NOT_LOADED As Integer = &H53L
|
||||
|
||||
'/* Function Parameter errors */
|
||||
Public Const EDS_ERR_INVALID_PARAMETER As Integer = &H60L
|
||||
Public Const EDS_ERR_INVALID_HANDLE As Integer = &H61L
|
||||
Public Const EDS_ERR_INVALID_POINTER As Integer = &H62L
|
||||
Public Const EDS_ERR_INVALID_INDEX As Integer = &H63L
|
||||
Public Const EDS_ERR_INVALID_LENGTH As Integer = &H64L
|
||||
Public Const EDS_ERR_INVALID_FN_POINTER As Integer = &H65L
|
||||
Public Const EDS_ERR_INVALID_SORT_FN As Integer = &H66L
|
||||
|
||||
'/* Device errors */
|
||||
Public Const EDS_ERR_DEVICE_NOT_FOUND As Integer = &H80L
|
||||
Public Const EDS_ERR_DEVICE_BUSY As Integer = &H81L
|
||||
Public Const EDS_ERR_DEVICE_INVALID As Integer = &H82L
|
||||
Public Const EDS_ERR_DEVICE_EMERGENCY As Integer = &H83L
|
||||
Public Const EDS_ERR_DEVICE_MEMORY_FULL As Integer = &H84L
|
||||
Public Const EDS_ERR_DEVICE_INTERNAL_ERROR As Integer = &H85L
|
||||
Public Const EDS_ERR_DEVICE_INVALID_PARAMETER As Integer = &H86L
|
||||
Public Const EDS_ERR_DEVICE_NO_DISK As Integer = &H87L
|
||||
Public Const EDS_ERR_DEVICE_DISK_ERROR As Integer = &H88L
|
||||
Public Const EDS_ERR_DEVICE_CF_GATE_CHANGED As Integer = &H89L
|
||||
Public Const EDS_ERR_DEVICE_DIAL_CHANGED As Integer = &H8AL
|
||||
Public Const EDS_ERR_DEVICE_NOT_INSTALLED As Integer = &H8BL
|
||||
Public Const EDS_ERR_DEVICE_STAY_AWAKE As Integer = &H8CL
|
||||
Public Const EDS_ERR_DEVICE_NOT_RELEASED As Integer = &H8DL
|
||||
|
||||
'/* Stream errors */
|
||||
Public Const EDS_ERR_STREAM_IO_ERROR As Integer = &HA0L
|
||||
Public Const EDS_ERR_STREAM_NOT_OPEN As Integer = &HA1L
|
||||
Public Const EDS_ERR_STREAM_ALREADY_OPEN As Integer = &HA2L
|
||||
Public Const EDS_ERR_STREAM_OPEN_ERROR As Integer = &HA3L
|
||||
Public Const EDS_ERR_STREAM_CLOSE_ERROR As Integer = &HA4L
|
||||
Public Const EDS_ERR_STREAM_SEEK_ERROR As Integer = &HA5L
|
||||
Public Const EDS_ERR_STREAM_TELL_ERROR As Integer = &HA6L
|
||||
Public Const EDS_ERR_STREAM_READ_ERROR As Integer = &HA7L
|
||||
Public Const EDS_ERR_STREAM_WRITE_ERROR As Integer = &HA8L
|
||||
Public Const EDS_ERR_STREAM_PERMISSION_ERROR As Integer = &HA9L
|
||||
Public Const EDS_ERR_STREAM_COULDNT_BEGIN_THREAD As Integer = &HAAL
|
||||
Public Const EDS_ERR_STREAM_BAD_OPTIONS As Integer = &HABL
|
||||
Public Const EDS_ERR_STREAM_END_OF_STREAM As Integer = &HACL
|
||||
|
||||
'/* Communications errors */
|
||||
Public Const EDS_ERR_COMM_PORT_IS_IN_USE As Integer = &HC0L
|
||||
Public Const EDS_ERR_COMM_DISCONNECTED As Integer = &HC1L
|
||||
Public Const EDS_ERR_COMM_DEVICE_INCOMPATIBLE As Integer = &HC2L
|
||||
Public Const EDS_ERR_COMM_BUFFER_FULL As Integer = &HC3L
|
||||
Public Const EDS_ERR_COMM_USB_BUS_ERR As Integer = &HC4L
|
||||
|
||||
'/* Lock/Unlock */
|
||||
Public Const EDS_ERR_USB_DEVICE_LOCK_ERROR As Integer = &HD0L
|
||||
Public Const EDS_ERR_USB_DEVICE_UNLOCK_ERROR As Integer = &HD1L
|
||||
|
||||
'/* STI/WIA */
|
||||
Public Const EDS_ERR_STI_UNKNOWN_ERROR As Integer = &HE0L
|
||||
Public Const EDS_ERR_STI_INTERNAL_ERROR As Integer = &HE1L
|
||||
Public Const EDS_ERR_STI_DEVICE_CREATE_ERROR As Integer = &HE2L
|
||||
Public Const EDS_ERR_STI_DEVICE_RELEASE_ERROR As Integer = &HE3L
|
||||
Public Const EDS_ERR_DEVICE_NOT_LAUNCHED As Integer = &HE4L
|
||||
|
||||
Public Const EDS_ERR_ENUM_NA As Integer = &HF0L
|
||||
Public Const EDS_ERR_INVALID_FN_CALL As Integer = &HF1L
|
||||
Public Const EDS_ERR_HANDLE_NOT_FOUND As Integer = &HF2L
|
||||
Public Const EDS_ERR_INVALID_ID As Integer = &HF3L
|
||||
Public Const EDS_ERR_WAIT_TIMEOUT_ERROR As Integer = &HF4L
|
||||
|
||||
'/* PTP */
|
||||
Public Const EDS_ERR_SESSION_NOT_OPEN As Integer = &H2003
|
||||
Public Const EDS_ERR_INVALID_TRANSACTIONID As Integer = &H2004
|
||||
Public Const EDS_ERR_INCOMPLETE_TRANSFER As Integer = &H2007
|
||||
Public Const EDS_ERR_INVALID_STRAGEID As Integer = &H2008
|
||||
Public Const EDS_ERR_DEVICEPROP_NOT_SUPPORTED As Integer = &H200A
|
||||
Public Const EDS_ERR_INVALID_OBJECTFORMATCODE As Integer = &H200B
|
||||
Public Const EDS_ERR_SELF_TEST_FAILED As Integer = &H2011
|
||||
Public Const EDS_ERR_PARTIAL_DELETION As Integer = &H2012
|
||||
Public Const EDS_ERR_SPECIFICATION_BY_FORMAT_UNSUPPORTED As Integer = &H2014
|
||||
Public Const EDS_ERR_NO_VALID_OBJECTINFO As Integer = &H2015
|
||||
Public Const EDS_ERR_INVALID_CODE_FORMAT As Integer = &H2016
|
||||
Public Const EDS_ERR_UNKNOWN_VENDER_CODE As Integer = &H2017
|
||||
Public Const EDS_ERR_CAPTURE_ALREADY_TERMINATED As Integer = &H2018
|
||||
Public Const EDS_ERR_INVALID_PARENTOBJECT As Integer = &H201A
|
||||
Public Const EDS_ERR_INVALID_DEVICEPROP_FORMAT As Integer = &H201B
|
||||
Public Const EDS_ERR_INVALID_DEVICEPROP_VALUE As Integer = &H201C
|
||||
Public Const EDS_ERR_SESSION_ALREADY_OPEN As Integer = &H201E
|
||||
Public Const EDS_ERR_TRANSACTION_CANCELLED As Integer = &H201F
|
||||
Public Const EDS_ERR_SPECIFICATION_OF_DESTINATION_UNSUPPORTED As Integer = &H2020
|
||||
Public Const EDS_ERR_UNKNOWN_COMMAND As Integer = &HA001
|
||||
Public Const EDS_ERR_OPERATION_REFUSED As Integer = &HA005
|
||||
Public Const EDS_ERR_LENS_COVER_CLOSE As Integer = &HA006
|
||||
Public Const EDS_ERR_LOW_BATTERY As Integer = &HA101
|
||||
Public Const EDS_ERR_OBJECT_NOTREADY As Integer = &HA102
|
||||
|
||||
Public Const EDS_ERR_LAST_GENERIC_ERROR_PLUS_ONE As Integer = &HF5L
|
||||
End Module
|
||||
File diff suppressed because it is too large
Load Diff
@@ -0,0 +1,979 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : EdsTypes.h *
|
||||
'* *
|
||||
'* Description: COMMON DEFINITION FOR EDSDK *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-08 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
'Option Strict Off
|
||||
' versione valida per Windows XP coerente con cartella DepCanonXP
|
||||
#If WinXP Then
|
||||
|
||||
Option Explicit On
|
||||
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
Public Module EDSDKTypes
|
||||
|
||||
'/******************************************************************************
|
||||
' Definition of Data Types
|
||||
'******************************************************************************/
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Data Type
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsDataType
|
||||
kEdsDataType_Unknown = 0
|
||||
kEdsDataType_Bool = 1
|
||||
kEdsDataType_String = 2
|
||||
kEdsDataType_Int8 = 3
|
||||
kEdsDataType_UInt8 = 6
|
||||
kEdsDataType_Int16 = 4
|
||||
kEdsDataType_UInt16 = 7
|
||||
kEdsDataType_Int32 = 8
|
||||
kEdsDataType_UInt32 = 9
|
||||
kEdsDataType_Int64 = 10
|
||||
kEdsDataType_UInt64 = 11
|
||||
kEdsDataType_Float = 12
|
||||
kEdsDataType_Double = 13
|
||||
kEdsDataType_ByteBlock = 14
|
||||
kEdsDataType_Rational = 20
|
||||
kEdsDataType_Point = 21
|
||||
kEdsDataType_Rect = 22
|
||||
kEdsDataType_Time
|
||||
|
||||
kEdsDataType_Bool_Array = 30
|
||||
kEdsDataType_Int8_Array = 31
|
||||
kEdsDataType_Int16_Array = 32
|
||||
kEdsDataType_Int32_Array = 33
|
||||
kEdsDataType_UInt8_Array = 34
|
||||
kEdsDataType_UInt16_Array = 35
|
||||
kEdsDataType_UInt32_Array = 36
|
||||
kEdsDataType_Rational_Array = 37
|
||||
|
||||
kEdsDataType_FocusInfo = 101
|
||||
kEdsDataType_PictureStyleDesc
|
||||
End Enum
|
||||
|
||||
#Region "Property IDs"
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Property IDs()
|
||||
'-----------------------------------------------------------------------------*/
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// Camera Setting Properties
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsPropID_Unknown As Integer = &HFFFF '//
|
||||
|
||||
Public Const kEdsPropID_ProductName As Integer = &H2 '// Product name
|
||||
Public Const kEdsPropID_BodyIDEx As Integer = &H15 '// Body ID
|
||||
Public Const kEdsPropID_OwnerName As Integer = &H4 '// Owner
|
||||
Public Const kEdsPropID_MakerName As Integer = &H5 '// Manufacturer
|
||||
Public Const kEdsPropID_DateTime As Integer = &H6 '// For cameras, the system time; for images, the shooting time
|
||||
Public Const kEdsPropID_FirmwareVersion As Integer = &H7 '// Firmware Version
|
||||
Public Const kEdsPropID_BatteryLevel As Integer = &H8 '// Battery state: 0-100% or "AC"
|
||||
|
||||
'// CFn=&h00000002 PFn
|
||||
Public Const kEdsPropID_CFn As Integer = &H9 '// Custom Function settings
|
||||
Public Const kEdsPropID_PFn As Integer = &HA '// Personal Function settings
|
||||
|
||||
Public Const kEdsPropID_SaveTo As Integer = &HB '// Destination where image was saved
|
||||
|
||||
Public Const kEdsPropID_UserWhiteBalanceData As Integer = &H201 '// Set user-defined data in Set1, 2, or 3, or read it out
|
||||
Public Const kEdsPropID_UserToneCurveData As Integer = &H202 '// // Set user-defined data in Set1, 2, or 3, or read it out
|
||||
Public Const kEdsPropID_UserPictureStyleData As Integer = &H203 '// User picture style data
|
||||
|
||||
Public Const kEdsPropID_UserManualWhiteBalanceData As Integer = &H204
|
||||
|
||||
Public Const kEdsPropID_BatteryQuality As Integer = &H10
|
||||
Public Const kEdsPropID_BatteryShutterCount As Integer = &H11
|
||||
Public Const kEdsPropID_BatteryCalibration As Integer = &H12
|
||||
Public Const kEdsPropID_BatteryName As Integer = &H13
|
||||
|
||||
Public Const kEdsPropID_HDDirectoryStructure As Integer = &H20
|
||||
Public Const kEdsPropID_WFTStatus As Integer = &H21
|
||||
|
||||
Public Const kEdsPropID_QuickReviewTime As Integer = &HF
|
||||
Public Const kEdsPropID_ShutterCounter As Integer = &H22
|
||||
Public Const kEdsPropID_PhotoStudioMode As Integer = &H30
|
||||
Public Const kEdsPropID_SpecialOption As Integer = &H31
|
||||
|
||||
|
||||
Public Const kEdsPropID_DataInputTransmission As Integer = &H50
|
||||
Public Const kEdsPropID_Wft_ProfileLockConfig As Integer = &H52
|
||||
Public Const kEdsPropID_Wft_TransmissionConfig As Integer = &H53
|
||||
Public Const kEdsPropID_Wft_TCPIPConfig As Integer = &H54
|
||||
Public Const kEdsPropID_Wft_FTPConfig As Integer = &H55
|
||||
Public Const kEdsPropID_Wft_WirelessConfig As Integer = &H56
|
||||
Public Const kEdsPropID_Wft_WiredConfig As Integer = &H57
|
||||
Public Const kEdsPropID_Wft_SettingsName As Integer = &H58
|
||||
Public Const kEdsPropID_Wft_Info As Integer = &H59
|
||||
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// Image Properties
|
||||
'////////////////////////////////////////////
|
||||
|
||||
Public Const kEdsPropID_ImageQuality As Integer = &H100 '// Image quality
|
||||
Public Const kEdsPropID_JpegQuality As Integer = &H101 '// Value representing compression when saved as a JPEG; 1 to 10 (cap)
|
||||
Public Const kEdsPropID_Orientation As Integer = &H102 '// The image orientation
|
||||
Public Const kEdsPropID_ICCProfile As Integer = &H103 '// ICC Profile data
|
||||
Public Const kEdsPropID_FocusInfo As Integer = &H104 '// focus Info
|
||||
|
||||
Public Const kEdsPropID_DigitalExposure As Integer = &H105 '// Digital exposure compensation
|
||||
Public Const kEdsPropID_WhiteBalance As Integer = &H106 '// White balance (light source)
|
||||
Public Const kEdsPropID_ColorTemperature As Integer = &H107 '// Color temperature setting value
|
||||
Public Const kEdsPropID_WhiteBalanceShift As Integer = &H108 '// White balance shift compensation
|
||||
|
||||
Public Const kEdsPropID_Contrast As Integer = &H109 '// Contrast setting
|
||||
Public Const kEdsPropID_ColorSaturation As Integer = &H10A '// Saturation setting
|
||||
Public Const kEdsPropID_ColorTone As Integer = &H10B '// Color tone setting
|
||||
Public Const kEdsPropID_Sharpness As Integer = &H10C '// Sharpness setting value
|
||||
Public Const kEdsPropID_ColorSpace As Integer = &H10D '// Color space setting
|
||||
Public Const kEdsPropID_ToneCurve As Integer = &H10E '// Tone curve (standard or custom)
|
||||
|
||||
Public Const kEdsPropID_PhotoEffect As Integer = &H10F '// Color effect setting
|
||||
Public Const kEdsPropID_FilterEffect As Integer = &H110 '// Filter effect setting
|
||||
Public Const kEdsPropID_ToningEffect As Integer = &H111 '// Gradation effect setting
|
||||
|
||||
Public Const kEdsPropID_ParameterSet As Integer = &H112 '// Processing parameter setting
|
||||
Public Const kEdsPropID_ColorMatrix As Integer = &H113 '// Color matrix setting
|
||||
|
||||
Public Const kEdsPropID_PictureStyle As Integer = &H114 '// Picture style
|
||||
Public Const kEdsPropID_PictureStyleDesc As Integer = &H115 '// Picture style setting details
|
||||
|
||||
Public Const kEdsPropID_PictureStyleCaption As Integer = &H200 '// Computer settings caption for the picture style at the time of shooting
|
||||
Public Const kEdsPropID_CustomWBCaption As Integer = &H204
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// Develop Properties
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsPropID_Linear As Integer = &H300 '// Linear processing ON/OFF
|
||||
Public Const kEdsPropID_ClickWBPoint As Integer = &H301 '// Click WB coordinates
|
||||
Public Const kEdsPropID_WBCoeffs As Integer = &H302 '// WB control value
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// Property Masks
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsPropID_AtCapture_Flag As Integer = &H80000000
|
||||
'// A supporting property for getting the properties at the time of shooting.
|
||||
'// This property ID cannot be used by itself.
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// Capture Properties
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsPropID_AEMode As Integer = &H400 '// Shooting mode
|
||||
Public Const kEdsPropID_AEModeSelect As Integer = &H436 '// Shooting mode
|
||||
Public Const kEdsPropID_DriveMode As Integer = &H401 '// Drive mode (cap)
|
||||
Public Const kEdsPropID_ISOSpeed As Integer = &H402 '// ISO sensitivity setting value
|
||||
Public Const kEdsPropID_MeteringMode As Integer = &H403 '// Metering mode
|
||||
Public Const kEdsPropID_AFMode As Integer = &H404 '// AF mode (cap)
|
||||
Public Const kEdsPropID_Av As Integer = &H405 '// Aperture value (cap) at the time of shooting
|
||||
Public Const kEdsPropID_Tv As Integer = &H406 '// Shutter speed setting value (cap)
|
||||
Public Const kEdsPropID_ExposureCompensation As Integer = &H407 '// Exposure compensation (cap)
|
||||
Public Const kEdsPropID_FlashCompensation As Integer = &H408 '// Flash compensation setting
|
||||
Public Const kEdsPropID_FocalLength As Integer = &H409 '// Lens focal length information at the time of shooting
|
||||
|
||||
Public Const kEdsPropID_AvailableShots As Integer = &H40A '// Number of available shots
|
||||
|
||||
Public Const kEdsPropID_Bracket As Integer = &H40B '// ISO, auto exposure or flash exposure bracket
|
||||
Public Const kEdsPropID_WhiteBalanceBracket As Integer = &H40C '// White balance bracket
|
||||
|
||||
Public Const kEdsPropID_LensName As Integer = &H40D '// String representing the lens name
|
||||
Public Const kEdsPropID_AEBracket As Integer = &H40E '// Auto exposure bracket value
|
||||
Public Const kEdsPropID_FEBracket As Integer = &H40F '// Flash exposure bracket value
|
||||
Public Const kEdsPropID_ISOBracket As Integer = &H410 '// ISO bracket value
|
||||
|
||||
Public Const kEdsPropID_NoiseReduction As Integer = &H411 '// Noise reduction
|
||||
|
||||
Public Const kEdsPropID_FlashOn As Integer = &H412 '// Use of the flash (activated or not)
|
||||
Public Const kEdsPropID_RedEye As Integer = &H413 '// Red-eye reduction
|
||||
Public Const kEdsPropID_FlashMode As Integer = &H414 '// Flash type
|
||||
|
||||
Public Const kEdsPropID_TempStatus As Integer = &H415
|
||||
Public Const kEdsPropID_LensStatus As Integer = &H416
|
||||
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// EVF Properties
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsPropID_Evf_OutputDevice As Integer = &H500
|
||||
Public Const kEdsPropID_Evf_Mode As Integer = &H501
|
||||
Public Const kEdsPropID_Evf_WhiteBalance As Integer = &H502
|
||||
Public Const kEdsPropID_Evf_ColorTemperature As Integer = &H503
|
||||
Public Const kEdsPropID_Evf_DepthOfFieldPreview As Integer = &H504
|
||||
Public Const kEdsPropID_Evf_Sharpness As Integer = &H505
|
||||
Public Const kEdsPropID_Evf_ClickWBCoeffs As Integer = &H506
|
||||
|
||||
'// EVF IMAGE DATA Properties
|
||||
Public Const kEdsPropID_Evf_Zoom As Integer = &H507
|
||||
Public Const kEdsPropID_Evf_ZoomPosition As Integer = &H508
|
||||
Public Const kEdsPropID_Evf_FocusAid As Integer = &H509
|
||||
Public Const kEdsPropID_Evf_Histogram As Integer = &H50A
|
||||
Public Const kEdsPropID_Evf_ImagePosition As Integer = &H50B
|
||||
Public Const kEdsPropID_Evf_HistogramStatus As Integer = &H50C
|
||||
|
||||
#End Region
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Send Commands
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsCameraCommand
|
||||
kEdsCameraCommand_TakePicture 'The camera is requested to take a picture.
|
||||
kEdsCameraCommand_ExtendShutDownTimer ' KeepDeviceOn
|
||||
kEdsCameraCommand_BulbStart
|
||||
kEdsCameraCommand_BulbEnd
|
||||
kEdsCameraCommand_PressShutterButton
|
||||
|
||||
kEdsCameraCommand_DoAfEvf = &H102
|
||||
kEdsCameraCommand_DriveLensEvf = &H103
|
||||
kEdsCameraCommand_DoClickWBEvf = &H104
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Camera State
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsCameraStatusCommand
|
||||
kEdsCameraStatusCommand_UILock '//
|
||||
kEdsCameraStatusCommand_UIUnLock '//
|
||||
kEdsCameraStatusCommand_EnterDirectTransfer '// The camera is changed to direct transmission mode.
|
||||
kEdsCameraStatusCommand_ExitDirectTransfer '// The camera is exited from direct transmission mode.
|
||||
End Enum
|
||||
|
||||
Public Enum EdsShutterButton
|
||||
kEdsCameraCommand_ShutterButton_OFF = &H0
|
||||
kEdsCameraCommand_ShutterButton_Halfway = &H1
|
||||
kEdsCameraCommand_ShutterButton_Completely = &H3
|
||||
kEdsCameraCommand_ShutterButton_Halfway_NonAF = &H10001
|
||||
kEdsCameraCommand_ShutterButton_Completely_NonAF = &H10003
|
||||
End Enum
|
||||
|
||||
#Region "CAMERE EVENTS"
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Camera Events
|
||||
'-----------------------------------------------------------------------------*/
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// Property Event
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsPropertyEvent_All As Integer = &H100
|
||||
|
||||
Public Const kEdsPropertyEvent_PropertyChanged As Integer = &H101
|
||||
' The value of the property specified
|
||||
'// by the parameter has changed.
|
||||
'// If it is necessary, it should be
|
||||
'// re-acquired.
|
||||
'// When property is not specified,
|
||||
'// it is necessary to acquire all parameters.
|
||||
|
||||
Public Const kEdsPropertyEvent_PropertyDescChanged As Integer = &H102
|
||||
'// The value of the property specified
|
||||
'// by the parameter has changed.
|
||||
'// If it is necessary, it should be
|
||||
'// re-acquired.
|
||||
'// When property is not specified,
|
||||
'// it is necessary to acquire all parameters.
|
||||
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// Object Event
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsObjectEvent_All As Integer = &H200 '// Indicates that the VolumeInfo dataset
|
||||
|
||||
Public Const kEdsObjectEvent_VolumeInfoChanged As Integer = &H201
|
||||
'// Indicates that the VolumeInfo dataset
|
||||
'// for a particular object has changed,
|
||||
'// and that it should be re-requested.
|
||||
|
||||
Public Const kEdsObjectEvent_VolumeUpdateItems As Integer = &H202
|
||||
'//
|
||||
Public Const kEdsObjectEvent_FolderUpdateItems As Integer = &H203
|
||||
|
||||
|
||||
Public Const kEdsObjectEvent_DirItemCreated As Integer = &H204
|
||||
'// The file or the folder was created.
|
||||
|
||||
|
||||
Public Const kEdsObjectEvent_DirItemRemoved As Integer = &H205
|
||||
'// The file or the folder was removed.
|
||||
|
||||
|
||||
Public Const kEdsObjectEvent_DirItemInfoChanged As Integer = &H206
|
||||
'// Indicates that the DirectoryItemInfo dataset
|
||||
'// for a particular object has changed,
|
||||
'// and that it should be re-requested.
|
||||
|
||||
Public Const kEdsObjectEvent_DirItemContentChanged As Integer = &H207
|
||||
'// DS_Event_ObjectContentChanged
|
||||
|
||||
|
||||
Public Const kEdsObjectEvent_DirItemRequestTransfer As Integer = &H208
|
||||
'// Indicates that there is an object that
|
||||
'// should be transferred.
|
||||
'// Please download the object specified
|
||||
'// by the parameter when you receive
|
||||
'// this event.
|
||||
|
||||
|
||||
Public Const kEdsObjectEvent_DirItemRequestTransferDT As Integer = &H209
|
||||
'// Indicates that the direct forwarding
|
||||
'// button of the camera was pushed.
|
||||
'// Please download the object specified
|
||||
'// by the parameter when you receive
|
||||
'// this event.
|
||||
|
||||
Public Const kEdsObjectEvent_DirItemCancelTransferDT As Integer = &H20A
|
||||
'// Indicates that the cancellation button
|
||||
'// of the camera was pushed while transfering
|
||||
'// Please discontinue transfering the object
|
||||
'// specified by the parameter.
|
||||
'//
|
||||
Public Const kEdsObjectEvent_VolumeAdded As Integer = &H20C
|
||||
Public Const kEdsObjectEvent_VolumeRemoved As Integer = &H20D
|
||||
|
||||
'////////////////////////////////////////////
|
||||
'// State Event
|
||||
'////////////////////////////////////////////
|
||||
Public Const kEdsStateEvent_All As Integer = &H300
|
||||
|
||||
Public Const kEdsStateEvent_Shutdown As Integer = &H301 '// The camera shut down.
|
||||
|
||||
|
||||
Public Const kEdsStateEvent_JobStatusChanged As Integer = &H302
|
||||
'// the state of the presence of the object
|
||||
'// that should be transferred has changed.
|
||||
|
||||
|
||||
Public Const kEdsStateEvent_WillSoonShutDown As Integer = &H303
|
||||
'// After the time passage of the time-out,
|
||||
'// the connection with the camera is cut.
|
||||
'// It depends on the setting of the camera
|
||||
'// about the time-out time.
|
||||
|
||||
|
||||
|
||||
Public Const kEdsStateEvent_ShutDownTimerUpdate As Integer = &H304
|
||||
'// After the WillSoonShutDown event,
|
||||
'// the shutdown timer has updated.
|
||||
|
||||
|
||||
Public Const kEdsStateEvent_CaptureError As Integer = &H305
|
||||
'// It failed in capture because
|
||||
'// hardware error occurred by the camera.
|
||||
|
||||
|
||||
Public Const kEdsStateEvent_InternalError As Integer = &H306 '// The error occurred in SDK.
|
||||
|
||||
|
||||
Public Const kEdsStateEvent_AfResult As Integer = &H309
|
||||
|
||||
|
||||
Public Const kEdsStateEvent_BulbExposureTime As Integer = &H310
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Drive Lens
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsEvfDriveLens
|
||||
kEdsEvfDriveLens_Near1 = 1
|
||||
kEdsEvfDriveLens_Near2 = 2
|
||||
kEdsEvfDriveLens_Near3 = 3
|
||||
kEdsEvfDriveLens_Far1 = &H8001
|
||||
kEdsEvfDriveLens_Far2 = &H8002
|
||||
kEdsEvfDriveLens_Far3 = &H8003
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Drive Lens
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsEvfDepthOfFieldPreview
|
||||
kEdsEvfDepthOfFieldPreview_OFF = 0
|
||||
kEdsEvfDepthOfFieldPreview_ON = 1
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Stream Seek Origins
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsSeekOrigin
|
||||
kEdsSeek_Cur = 0 '// Seek from Current Point
|
||||
kEdsSeek_Begin '// Seek from Start Point
|
||||
kEdsSeek_End '// Seek from End Point
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' File and Propaties Access
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsAccess
|
||||
kEdsAccess_Read = 0 ' // Enables subsequent open operations on the object to
|
||||
'// request read access.
|
||||
kEdsAccess_Write ', // Enables subsequent open operations on the object to
|
||||
' // request write access.
|
||||
kEdsAccess_ReadWrite ', // Enables subsequent open operations on the object to
|
||||
'// request read and write access.
|
||||
kEdsAccess_Error = &HFFFFFFFF
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' File Create Disposition
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsFileCreateDisposition
|
||||
kEdsFileCreateDisposition_CreateNew = 0
|
||||
'// Creates a new file. The function fails
|
||||
'// if the specified file already exists.
|
||||
kEdsFileCreateDisposition_CreateAlways
|
||||
'// Creates a new file. If the file exists,
|
||||
'// the function overwrites the file and clears
|
||||
'// the existing attributes.
|
||||
kEdsFileCreateDisposition_OpenExisting
|
||||
'// Opens the file. The function fails
|
||||
'// if the file does not exist.
|
||||
kEdsFileCreateDisposition_OpenAlways
|
||||
'// Opens the file, if it exists.
|
||||
'// If the file does not exist,
|
||||
'// the function creates the file.
|
||||
kEdsFileCreateDisposition_TruncateExsisting
|
||||
'// Opens the file. Once opened, the file is
|
||||
'// truncated so that its size is zero bytes.
|
||||
'// The function fails if the file does not exist.
|
||||
End Enum
|
||||
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Image Type
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsImageType
|
||||
kEdsImageType_Unknown = &H0
|
||||
kEdsImageType_Jpeg = &H1
|
||||
kEdsImageType_CRW = &H2
|
||||
kEdsImageType_RAW = &H4
|
||||
kEdsImageType_CR2 = &H6
|
||||
End Enum
|
||||
|
||||
|
||||
Public Enum EdsTargetImageType
|
||||
kEdsTargetImageType_Unknown = &H0
|
||||
kEdsTargetImageType_Jpeg = &H1
|
||||
kEdsTargetImageType_TIFF = &H7 '// 8bitTIFF
|
||||
kEdsTargetImageType_TIFF16 = &H8 '// 16bitTIFF
|
||||
kEdsTargetImageType_RGB = &H9 '// 8bitRGB
|
||||
kEdsTargetImageType_RGB16 = &HA '// 16bitRGB
|
||||
End Enum
|
||||
|
||||
|
||||
Public Enum EdsImageSize
|
||||
kEdsImageSize_Large = 0
|
||||
kEdsImageSize_Middle = 1
|
||||
kEdsImageSize_Small = 2
|
||||
kEdsImageSize_Middle1 = 5
|
||||
kEdsImageSize_Middle2 = 6
|
||||
kEdsImageSize_Unknown = &HFFFFFFFF
|
||||
End Enum
|
||||
|
||||
|
||||
Public Enum EdsImageQuality
|
||||
kEdsImageQuality_Normal = 2
|
||||
kEdsImageQuality_Fine = 3
|
||||
kEdsImageQuality_Lossless = 4
|
||||
kEdsImageQuality_SuperFine = 5
|
||||
kEdsImageQuality_Unknown = &HFFFFFFFF
|
||||
End Enum
|
||||
|
||||
|
||||
Public Enum EdsImageSource
|
||||
kEdsImageSrc_FullView
|
||||
kEdsImageSrc_Thumbnail
|
||||
kEdsImageSrc_Preview
|
||||
kEdsImageSrc_RAWThumbnail
|
||||
kEdsImageSrc_RAWFullView
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Progress Option
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsProgressOption
|
||||
kEdsProgressOption_NoReport = 0 '// no callback.
|
||||
kEdsProgressOption_Done '// performs callback only at once
|
||||
'// at the time of an end.
|
||||
kEdsProgressOption_Periodically '// performs callback periodically.
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' file attribute
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsFileAttributes
|
||||
kEdsFileAttribute_Normal = &H0
|
||||
kEdsFileAttribute_ReadOnly = &H1
|
||||
kEdsFileAttribute_Hidden = &H2
|
||||
kEdsFileAttribute_System = &H4
|
||||
kEdsFileAttribute_Archive = &H20
|
||||
End Enum
|
||||
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Battery level
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsBatteryLevel
|
||||
kEdsBatteryLevel_Empty = 1
|
||||
kEdsBatteryLevel_Low = 30
|
||||
kEdsBatteryLevel_Half = 50
|
||||
kEdsBatteryLevel_Normal = 80
|
||||
kEdsBatteryLevel_AC = &HFFFFFFFF
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Save To
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsSaveTo
|
||||
kEdsSaveTo_Camera = 1
|
||||
kEdsSaveTo_Host = 2
|
||||
kEdsSaveTo_Both = kEdsSaveTo_Camera + kEdsSaveTo_Host
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' StorageType
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsStorageType
|
||||
kEdsStorageType_Non = 0
|
||||
kEdsStorageType_CF = 1
|
||||
kEdsStorageType_SD = 2
|
||||
End Enum
|
||||
|
||||
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' White Balance
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsWhiteBalance
|
||||
kEdsWhiteBalance_Auto = 0
|
||||
kEdsWhiteBalance_Daylight = 1
|
||||
kEdsWhiteBalance_Cloudy = 2
|
||||
kEdsWhiteBalance_Tangsten = 3
|
||||
kEdsWhiteBalance_Fluorescent = 4
|
||||
kEdsWhiteBalance_Strobe = 5
|
||||
kEdsWhiteBalance_WhitePaper = 6
|
||||
kEdsWhiteBalance_Shade = 8
|
||||
kEdsWhiteBalance_ColorTemp = 9
|
||||
kEdsWhiteBalance_PCSet1 = 10
|
||||
kEdsWhiteBalance_PCSet2 = 11
|
||||
kEdsWhiteBalance_PCSet3 = 12
|
||||
|
||||
kEdsWhiteBalance_Click = -1
|
||||
kEdsWhiteBalance_Pasted = -2
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Photo Effect
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsPhotoEffect
|
||||
kEdsPhotoEffect_Off = 0
|
||||
kEdsPhotoEffect_Monochrome = 5
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Color Matrix
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsColorMatrix
|
||||
kEdsColorMatrix_Custom = 0
|
||||
kEdsColorMatrix_1 = 1
|
||||
kEdsColorMatrix_2 = 2
|
||||
kEdsColorMatrix_3 = 3
|
||||
kEdsColorMatrix_4 = 4
|
||||
kEdsColorMatrix_5 = 5
|
||||
kEdsColorMatrix_6 = 6
|
||||
kEdsColorMatrix_7 = 7
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Filter Effect
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsFilterEffect
|
||||
kEdsFilterEffect_None = 0
|
||||
kEdsFilterEffect_Yellow = 1
|
||||
kEdsFilterEffect_Orange = 2
|
||||
kEdsFilterEffect_Red = 3
|
||||
kEdsFilterEffect_Green = 4
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Toning Effect
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsTonigEffect
|
||||
kEdsTonigEffect_None = 0
|
||||
kEdsTonigEffect_Sepia = 1
|
||||
kEdsTonigEffect_Blue = 2
|
||||
kEdsTonigEffect_Purple = 3
|
||||
kEdsTonigEffect_Green = 4
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Color Space
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsColorSpace
|
||||
kEdsColorSpace_sRGB = 1
|
||||
kEdsColorSpace_AdobeRGB = 2
|
||||
kEdsColorSpace_Unknown = &HFFFFFFFF
|
||||
End Enum
|
||||
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' PictureStyle
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsPictureStyle
|
||||
kEdsPictureStyle_Standard = &H81
|
||||
kEdsPictureStyle_Portrait = &H82
|
||||
kEdsPictureStyle_Landscape = &H83
|
||||
kEdsPictureStyle_Neutral = &H84
|
||||
kEdsPictureStyle_Faithful = &H85
|
||||
kEdsPictureStyle_Monochrome = &H86
|
||||
kEdsPictureStyle_User1 = &H21
|
||||
kEdsPictureStyle_User2 = &H22
|
||||
kEdsPictureStyle_User3 = &H23
|
||||
kEdsPictureStyle_PC1 = &H41
|
||||
kEdsPictureStyle_PC2 = &H42
|
||||
kEdsPictureStyle_PC3 = &H43
|
||||
End Enum
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Transfer Option
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Enum EdsTransferOption
|
||||
kEdsTransferOption_ByDirectTransfer = 1
|
||||
kEdsTransferOption_ByRelease = 2
|
||||
kEdsTransferOption_ToDesktop = &H100
|
||||
End Enum
|
||||
|
||||
|
||||
|
||||
Public Enum EdsAEMode
|
||||
kEdsAEMode_Program = 0
|
||||
kEdsAEMode_Tv = 1
|
||||
kEdsAEMode_Av = 2
|
||||
kEdsAEMode_Manual = 3
|
||||
kEdsAEMode_Bulb = 4
|
||||
kEdsAEMode_A_DEP = 5
|
||||
kEdsAEMode_DEP = 6
|
||||
kEdsAEMode_Custom = 7
|
||||
kEdsAEMode_Lock = 8
|
||||
kEdsAEMode_Green = 9
|
||||
kEdsAEMode_NightPortrait = 10
|
||||
kEdsAEMode_Sports = 11
|
||||
kEdsAEMode_Portrait = 12
|
||||
kEdsAEMode_Landscape = 13
|
||||
kEdsAEMode_Closeup = 14
|
||||
kEdsAEMode_FlashOff = 15
|
||||
kEdsAEMode_CreativeAuto = 19
|
||||
kEdsAEMode_Movie = 20
|
||||
kEdsAEMode_PhotoInMovie = 21
|
||||
kEdsAEMode_SceneIntelligentAuto = 22
|
||||
kEdsAEMode_SCN = 25
|
||||
kEdsAEMode_Unknown = &HFFFFFFFF
|
||||
End Enum
|
||||
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Bracket
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsBracket
|
||||
kEdsBracket_AEB = &H1
|
||||
kEdsBracket_ISOB = &H2
|
||||
kEdsBracket_WBB = &H4
|
||||
kEdsBracket_FEB = &H8
|
||||
kEdsBracket_Unknown = &HFFFFFFFF
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Temp status
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsTempStatus
|
||||
kEdsTempStatus_Normal = 0
|
||||
kEdsTempStatus_Warning = 1
|
||||
kEdsTempStatus_Disable_LV = 2
|
||||
kEdsTempStatus_Disable_Capture = 3
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' EVF Output Device [Flag]
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsEvfOutputDevice
|
||||
kEdsEvfOutputDevice_TFT = 1
|
||||
kEdsEvfOutputDevice_PC = 2
|
||||
End Enum
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' EVF Zoom
|
||||
'-----------------------------------------------------------------------------*/
|
||||
Public Enum EdsEvfZoom
|
||||
kEdsEvfZoom_Fit = 1
|
||||
kEdsEvfZoom_x5 = 5
|
||||
kEdsEvfZoom_x10 = 10
|
||||
End Enum
|
||||
|
||||
'/******************************************************************************
|
||||
' Definition of Structures
|
||||
'******************************************************************************/
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Point
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsPoint
|
||||
Public x As Integer
|
||||
Public y As Integer
|
||||
End Structure
|
||||
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsSize
|
||||
Public width As Integer
|
||||
Public height As Integer
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Rectangle
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsRect '
|
||||
Public point As EdsPoint
|
||||
Public size As EdsSize
|
||||
End Structure
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Rational
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsRational
|
||||
Public numerator As Integer
|
||||
Public denominator As Integer
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Time
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsTime
|
||||
Public year As Integer '// year
|
||||
Public month As Integer '// month 1=January, 2=February, ...
|
||||
Public day As Integer '// day
|
||||
Public hour As Integer '// hour
|
||||
Public minute As Integer '// minute
|
||||
Public second As Integer '// second
|
||||
Public milliseconds As Integer '// reserved
|
||||
End Structure
|
||||
|
||||
|
||||
'/******************************************************************************
|
||||
' Definition of Constants
|
||||
'******************************************************************************/
|
||||
Public Const EDS_MAX_NAME As Short = 256
|
||||
Public Const EDS_TRANSFER_BLOCK_SIZE As Integer = 512
|
||||
'// When the DirectoryItem is downloaded
|
||||
'// or uploaded separately for the plural
|
||||
'// block, The size of the block
|
||||
'// other than the terminal block should be
|
||||
'// assumed to be a multiple in 512 bytes.
|
||||
|
||||
|
||||
'/******************************************************************************
|
||||
' Camera Detect Evnet Handler
|
||||
'******************************************************************************/
|
||||
Public Delegate Function EdsCameraAddedHandler( _
|
||||
ByVal inContext As IntPtr) As Long
|
||||
|
||||
|
||||
'/******************************************************************************
|
||||
' Callback Functions
|
||||
'******************************************************************************/
|
||||
Public Delegate Function EdsProgressCallback( _
|
||||
ByVal inPercent As Integer, _
|
||||
ByVal inContext As IntPtr, _
|
||||
ByRef outCancel As Boolean) As Long
|
||||
|
||||
|
||||
'/******************************************************************************
|
||||
' Evnet Handler
|
||||
'******************************************************************************/
|
||||
Public Delegate Function EdsPropertyEventHandler( _
|
||||
ByVal inEvent As Integer, _
|
||||
ByVal inPropertyID As Integer, _
|
||||
ByVal inParam As Integer, _
|
||||
ByVal inContext As IntPtr) As Long
|
||||
|
||||
|
||||
Public Delegate Function EdsObjectEventHandler( _
|
||||
ByVal inEvent As Integer, _
|
||||
ByVal inRef As IntPtr, _
|
||||
ByVal inContext As IntPtr) As Long
|
||||
|
||||
|
||||
Public Delegate Function EdsStateEventHandler( _
|
||||
ByVal inEvent As Integer, _
|
||||
ByVal inEventData As Integer, _
|
||||
ByVal inContext As IntPtr) As Long
|
||||
|
||||
|
||||
|
||||
'/******************************************************************************
|
||||
' Definition of Structures
|
||||
'******************************************************************************/
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Device Info
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsDeviceInfo
|
||||
<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=EDS_MAX_NAME)> Public szPortName As String
|
||||
<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=EDS_MAX_NAME)> Public szDeviceDescription As String
|
||||
Public DeviceSubType As Integer
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Volume Info
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsVolumeInfo
|
||||
Public storageType As Integer
|
||||
Public access As Integer
|
||||
Public maxCapacity As Int64
|
||||
Public freeSpaceInBytes As Int64
|
||||
<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=EDS_MAX_NAME)> Public szVolumeLabel As String
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' DirectoryItem Info
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsDirectoryItemInfo
|
||||
Public size As Integer
|
||||
Public isFolder As Boolean
|
||||
Public groupID As Integer
|
||||
Public opt As Integer
|
||||
<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=EDS_MAX_NAME)> Public szFileName As String
|
||||
Public format As Integer
|
||||
Public dateTime As Integer
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Image Info
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsImageInfo
|
||||
Public width As Integer '// image width
|
||||
Public height As Integer '// image height
|
||||
|
||||
Public numOfComponents As Integer '// number of color components in image.
|
||||
Public componentDepth As Integer '// bits per sample. 8 or 16.
|
||||
|
||||
Public effectiveRect As EdsRect
|
||||
'// Effective rectangles except
|
||||
'// a black line of the image.
|
||||
'// A black line might be in the top and bottom
|
||||
'// of the thumbnail image.
|
||||
|
||||
Public reserved1 As Integer
|
||||
Public reserved2 As Integer
|
||||
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' SaveImageSetting
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsSaveImageSetting
|
||||
Public JPEGQuality As Integer
|
||||
Public iccProfileStream As IntPtr
|
||||
Public reserved As Integer
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Property Desc
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsPropertyDesc
|
||||
Public form As Integer
|
||||
Public access As Integer
|
||||
Public numElements As Integer
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=128)> Public propDesc() As Integer
|
||||
End Structure
|
||||
|
||||
|
||||
'////////////////////////////////////////////////////////////////////////////////
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Picture Style Desc
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsPictureStyleDesc
|
||||
Public contrast As Integer
|
||||
Public sharpness As Integer
|
||||
Public saturation As Integer
|
||||
Public colorTone As Integer
|
||||
Public filterEffect As Integer
|
||||
Public toningEffect As Integer
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Focus Info
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsFocusPoint
|
||||
Public valid As Integer '// if the frame is valid.
|
||||
Public justFocus As Integer '// if the frame is just focus.
|
||||
Public rect As EdsRect '// rectangle of focus point.
|
||||
Public reserved As Integer '// reserved
|
||||
End Structure
|
||||
|
||||
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsFocusInfo
|
||||
Public imageRect As EdsRect '// rectangle of the image.
|
||||
Public pointNumber As Integer '// number of point.
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=128)> Public focusPoint() As EdsFocusPoint '// each frame's description.
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' User WhiteBalance (PC set1,2,3)/ User ToneCurve / User PictureStyle dataset
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsUsersetData
|
||||
Public valid As Integer
|
||||
Public dataSize As Integer
|
||||
<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=32)> Public szCaption As String
|
||||
<MarshalAs(UnmanagedType.ByValArray, SizeConst:=1)> Public data() As Byte
|
||||
End Structure
|
||||
|
||||
|
||||
'/*-----------------------------------------------------------------------------
|
||||
' Capacity
|
||||
'-----------------------------------------------------------------------------*/
|
||||
<StructLayout(LayoutKind.Sequential)> Public Structure EdsCapacity
|
||||
Public numberOfFreeClusters As Integer '// free clusters
|
||||
Public bytesPerSector As Integer '// sectors per cluster
|
||||
Public reset As Boolean
|
||||
End Structure
|
||||
|
||||
|
||||
|
||||
End Module
|
||||
#End If
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
Generated
+76
@@ -0,0 +1,76 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class FrmScelta
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.BtnOk = New System.Windows.Forms.Button()
|
||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
|
||||
Me.LbSpessLastra = New System.Windows.Forms.Label()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'BtnOk
|
||||
'
|
||||
Me.BtnOk.Location = New System.Drawing.Point(171, 124)
|
||||
Me.BtnOk.Name = "BtnOk"
|
||||
Me.BtnOk.Size = New System.Drawing.Size(73, 34)
|
||||
Me.BtnOk.TabIndex = 0
|
||||
Me.BtnOk.Text = "OK"
|
||||
Me.BtnOk.UseVisualStyleBackColor = True
|
||||
'
|
||||
'PictureBox1
|
||||
'
|
||||
Me.PictureBox1.Image = Global.My.Resources.Resources.Spessore
|
||||
Me.PictureBox1.Location = New System.Drawing.Point(96, 73)
|
||||
Me.PictureBox1.Name = "PictureBox1"
|
||||
Me.PictureBox1.Size = New System.Drawing.Size(59, 27)
|
||||
Me.PictureBox1.TabIndex = 3
|
||||
Me.PictureBox1.TabStop = False
|
||||
'
|
||||
'LbSpessLastra
|
||||
'
|
||||
Me.LbSpessLastra.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
Me.LbSpessLastra.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.LbSpessLastra.Location = New System.Drawing.Point(161, 73)
|
||||
Me.LbSpessLastra.Name = "LbSpessLastra"
|
||||
Me.LbSpessLastra.Size = New System.Drawing.Size(70, 21)
|
||||
Me.LbSpessLastra.TabIndex = 4
|
||||
'
|
||||
'FrmScelta
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(333, 234)
|
||||
Me.Controls.Add(Me.LbSpessLastra)
|
||||
Me.Controls.Add(Me.PictureBox1)
|
||||
Me.Controls.Add(Me.BtnOk)
|
||||
Me.Name = "FrmScelta"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Choose Output Image Type"
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents BtnOk As System.Windows.Forms.Button
|
||||
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents LbSpessLastra As System.Windows.Forms.Label
|
||||
End Class
|
||||
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -0,0 +1,15 @@
|
||||
Public Class FrmScelta
|
||||
|
||||
Private Sub BtnOk_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnOk.Click
|
||||
Me.Hide()
|
||||
End Sub
|
||||
Private Sub FrmScelta_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
LbSpessLastra.Text = Format(SpessLastra, "0") & " mm"
|
||||
End Sub
|
||||
Private Sub LbSpessLastra_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LbSpessLastra.Click
|
||||
NumPad.Text = Format(SpessLastra, "0") ' la stringa di uscita
|
||||
NumPad.ShowDialog()
|
||||
SpessLastra = Convert.ToDouble(NumPad.Text)
|
||||
LbSpessLastra.Text = Format(SpessLastra, "0.0") & " mm"
|
||||
End Sub
|
||||
End Class
|
||||
Generated
+37
@@ -0,0 +1,37 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class FrmCfgGeo
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'FrmCfgGeo
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(480, 314)
|
||||
Me.Name = "FrmCfgGeo"
|
||||
Me.Text = "Geometric Configuration"
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -0,0 +1,3 @@
|
||||
Public Class FrmCfgGeo
|
||||
|
||||
End Class
|
||||
Generated
+554
@@ -0,0 +1,554 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class FrmMain
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmMain))
|
||||
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
|
||||
Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.LbImageStatus = New System.Windows.Forms.Label()
|
||||
Me.LbFocalLenght = New System.Windows.Forms.Label()
|
||||
Me.TimerZoom = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.GBImgFromCam = New System.Windows.Forms.GroupBox()
|
||||
Me.BtnDefAree = New System.Windows.Forms.Button()
|
||||
Me.BtnCorrLens = New System.Windows.Forms.Button()
|
||||
Me.BtnCorrCompleta = New System.Windows.Forms.Button()
|
||||
Me.GBCorrected = New System.Windows.Forms.GroupBox()
|
||||
Me.BtnSave = New System.Windows.Forms.Button()
|
||||
Me.GBCalibration = New System.Windows.Forms.GroupBox()
|
||||
Me.Label3 = New System.Windows.Forms.Label()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.lbYmm = New System.Windows.Forms.Label()
|
||||
Me.lbXmm = New System.Windows.Forms.Label()
|
||||
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
|
||||
Me.LbAltRif = New System.Windows.Forms.Label()
|
||||
Me.LbAltCali = New System.Windows.Forms.Label()
|
||||
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
|
||||
Me.BtnAbortCal = New System.Windows.Forms.Button()
|
||||
Me.BtnSaveCal = New System.Windows.Forms.Button()
|
||||
Me.ToolStrip1 = New System.Windows.Forms.ToolStrip()
|
||||
Me.BtnLoad = New System.Windows.Forms.ToolStripButton()
|
||||
Me.cmdZoomAll = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnZoom11 = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnZoomPan = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnCorrProsp = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnCfg = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnBackG = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnEdgeFinder = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnChangeThreshold = New System.Windows.Forms.ToolStripButton()
|
||||
Me.BtnIncrTh = New System.Windows.Forms.ToolStripButton()
|
||||
Me.lbThreshold = New System.Windows.Forms.ToolStripLabel()
|
||||
Me.btnSearch = New System.Windows.Forms.ToolStripButton()
|
||||
Me.RefreshCameras = New System.Windows.Forms.ToolStripButton()
|
||||
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
|
||||
Me.TStatus = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.ProgressBar = New System.Windows.Forms.ToolStripProgressBar()
|
||||
Me.lbMousePosmm = New System.Windows.Forms.ToolStripStatusLabel()
|
||||
Me.TimerMain = New System.Windows.Forms.Timer(Me.components)
|
||||
Me.GBDefAree = New System.Windows.Forms.GroupBox()
|
||||
Me.BtnVentosa = New System.Windows.Forms.Button()
|
||||
Me.BtnExpT = New System.Windows.Forms.Button()
|
||||
Me.BtnStone = New System.Windows.Forms.Button()
|
||||
Me.BtnAbortDefAree = New System.Windows.Forms.Button()
|
||||
Me.BtnSaveAree = New System.Windows.Forms.Button()
|
||||
Me.ComboBoxCameras = New System.Windows.Forms.ComboBox()
|
||||
Me.ComboBoxCameraCfg = New System.Windows.Forms.ComboBox()
|
||||
Me.BtnEnd = New System.Windows.Forms.Button()
|
||||
Me.BtnTakeFoto = New System.Windows.Forms.Button()
|
||||
Me.BtnShowMsg = New System.Windows.Forms.Button()
|
||||
Me.ImageList2 = New System.Windows.Forms.ImageList(Me.components)
|
||||
Me.ImageControl1 = New ImageControl()
|
||||
Me.GBImgFromCam.SuspendLayout()
|
||||
Me.GBCorrected.SuspendLayout()
|
||||
Me.GBCalibration.SuspendLayout()
|
||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.ToolStrip1.SuspendLayout()
|
||||
Me.StatusStrip1.SuspendLayout()
|
||||
Me.GBDefAree.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'OpenFileDialog1
|
||||
'
|
||||
Me.OpenFileDialog1.FileName = "OpenFileDialog1"
|
||||
'
|
||||
'ImageList1
|
||||
'
|
||||
Me.ImageList1.ImageStream = CType(resources.GetObject("ImageList1.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.ImageList1.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.ImageList1.Images.SetKeyName(0, "400D.bmp")
|
||||
Me.ImageList1.Images.SetKeyName(1, "400DDis.bmp")
|
||||
Me.ImageList1.Images.SetKeyName(2, "Correction.bmp")
|
||||
Me.ImageList1.Images.SetKeyName(3, "CorrectionCC.bmp")
|
||||
Me.ImageList1.Images.SetKeyName(4, "Spessore.bmp")
|
||||
Me.ImageList1.Images.SetKeyName(5, "Lente2.bmp")
|
||||
Me.ImageList1.Images.SetKeyName(6, "Lente.bmp")
|
||||
Me.ImageList1.Images.SetKeyName(7, "calibro.jpg")
|
||||
Me.ImageList1.Images.SetKeyName(8, "25_tape.png")
|
||||
'
|
||||
'LbImageStatus
|
||||
'
|
||||
resources.ApplyResources(Me.LbImageStatus, "LbImageStatus")
|
||||
Me.LbImageStatus.Name = "LbImageStatus"
|
||||
'
|
||||
'LbFocalLenght
|
||||
'
|
||||
resources.ApplyResources(Me.LbFocalLenght, "LbFocalLenght")
|
||||
Me.LbFocalLenght.Name = "LbFocalLenght"
|
||||
'
|
||||
'TimerZoom
|
||||
'
|
||||
Me.TimerZoom.Interval = 125
|
||||
'
|
||||
'GBImgFromCam
|
||||
'
|
||||
Me.GBImgFromCam.Controls.Add(Me.BtnDefAree)
|
||||
Me.GBImgFromCam.Controls.Add(Me.BtnCorrLens)
|
||||
Me.GBImgFromCam.Controls.Add(Me.BtnCorrCompleta)
|
||||
resources.ApplyResources(Me.GBImgFromCam, "GBImgFromCam")
|
||||
Me.GBImgFromCam.Name = "GBImgFromCam"
|
||||
Me.GBImgFromCam.TabStop = False
|
||||
'
|
||||
'BtnDefAree
|
||||
'
|
||||
Me.BtnDefAree.Image = Global.My.Resources.Resources.DefAree
|
||||
resources.ApplyResources(Me.BtnDefAree, "BtnDefAree")
|
||||
Me.BtnDefAree.Name = "BtnDefAree"
|
||||
Me.BtnDefAree.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnCorrLens
|
||||
'
|
||||
Me.BtnCorrLens.Image = Global.My.Resources.Resources.Calibrazione
|
||||
resources.ApplyResources(Me.BtnCorrLens, "BtnCorrLens")
|
||||
Me.BtnCorrLens.Name = "BtnCorrLens"
|
||||
Me.BtnCorrLens.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnCorrCompleta
|
||||
'
|
||||
Me.BtnCorrCompleta.Image = Global.My.Resources.Resources.Correction
|
||||
resources.ApplyResources(Me.BtnCorrCompleta, "BtnCorrCompleta")
|
||||
Me.BtnCorrCompleta.Name = "BtnCorrCompleta"
|
||||
Me.BtnCorrCompleta.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GBCorrected
|
||||
'
|
||||
Me.GBCorrected.Controls.Add(Me.BtnSave)
|
||||
resources.ApplyResources(Me.GBCorrected, "GBCorrected")
|
||||
Me.GBCorrected.Name = "GBCorrected"
|
||||
Me.GBCorrected.TabStop = False
|
||||
'
|
||||
'BtnSave
|
||||
'
|
||||
resources.ApplyResources(Me.BtnSave, "BtnSave")
|
||||
Me.BtnSave.Name = "BtnSave"
|
||||
Me.BtnSave.UseVisualStyleBackColor = True
|
||||
'
|
||||
'GBCalibration
|
||||
'
|
||||
Me.GBCalibration.Controls.Add(Me.Label3)
|
||||
Me.GBCalibration.Controls.Add(Me.Label2)
|
||||
Me.GBCalibration.Controls.Add(Me.Label1)
|
||||
Me.GBCalibration.Controls.Add(Me.lbYmm)
|
||||
Me.GBCalibration.Controls.Add(Me.lbXmm)
|
||||
Me.GBCalibration.Controls.Add(Me.PictureBox2)
|
||||
Me.GBCalibration.Controls.Add(Me.LbAltRif)
|
||||
Me.GBCalibration.Controls.Add(Me.LbAltCali)
|
||||
Me.GBCalibration.Controls.Add(Me.PictureBox1)
|
||||
Me.GBCalibration.Controls.Add(Me.BtnAbortCal)
|
||||
Me.GBCalibration.Controls.Add(Me.BtnSaveCal)
|
||||
resources.ApplyResources(Me.GBCalibration, "GBCalibration")
|
||||
Me.GBCalibration.Name = "GBCalibration"
|
||||
Me.GBCalibration.TabStop = False
|
||||
'
|
||||
'Label3
|
||||
'
|
||||
resources.ApplyResources(Me.Label3, "Label3")
|
||||
Me.Label3.Name = "Label3"
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
resources.ApplyResources(Me.Label2, "Label2")
|
||||
Me.Label2.Name = "Label2"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
resources.ApplyResources(Me.Label1, "Label1")
|
||||
Me.Label1.Name = "Label1"
|
||||
'
|
||||
'lbYmm
|
||||
'
|
||||
Me.lbYmm.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
resources.ApplyResources(Me.lbYmm, "lbYmm")
|
||||
Me.lbYmm.Name = "lbYmm"
|
||||
'
|
||||
'lbXmm
|
||||
'
|
||||
Me.lbXmm.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
resources.ApplyResources(Me.lbXmm, "lbXmm")
|
||||
Me.lbXmm.Name = "lbXmm"
|
||||
'
|
||||
'PictureBox2
|
||||
'
|
||||
Me.PictureBox2.Image = Global.My.Resources.Resources.Blocchetti
|
||||
resources.ApplyResources(Me.PictureBox2, "PictureBox2")
|
||||
Me.PictureBox2.Name = "PictureBox2"
|
||||
Me.PictureBox2.TabStop = False
|
||||
'
|
||||
'LbAltRif
|
||||
'
|
||||
Me.LbAltRif.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
resources.ApplyResources(Me.LbAltRif, "LbAltRif")
|
||||
Me.LbAltRif.Name = "LbAltRif"
|
||||
'
|
||||
'LbAltCali
|
||||
'
|
||||
Me.LbAltCali.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
resources.ApplyResources(Me.LbAltCali, "LbAltCali")
|
||||
Me.LbAltCali.Name = "LbAltCali"
|
||||
'
|
||||
'PictureBox1
|
||||
'
|
||||
Me.PictureBox1.Image = Global.My.Resources.Resources.Spessore
|
||||
resources.ApplyResources(Me.PictureBox1, "PictureBox1")
|
||||
Me.PictureBox1.Name = "PictureBox1"
|
||||
Me.PictureBox1.TabStop = False
|
||||
'
|
||||
'BtnAbortCal
|
||||
'
|
||||
resources.ApplyResources(Me.BtnAbortCal, "BtnAbortCal")
|
||||
Me.BtnAbortCal.Name = "BtnAbortCal"
|
||||
Me.BtnAbortCal.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnSaveCal
|
||||
'
|
||||
resources.ApplyResources(Me.BtnSaveCal, "BtnSaveCal")
|
||||
Me.BtnSaveCal.Name = "BtnSaveCal"
|
||||
Me.BtnSaveCal.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ToolStrip1
|
||||
'
|
||||
Me.ToolStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
|
||||
Me.ToolStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BtnLoad, Me.cmdZoomAll, Me.BtnZoom11, Me.BtnZoomPan, Me.BtnCorrProsp, Me.BtnCfg, Me.BtnBackG, Me.BtnEdgeFinder, Me.BtnChangeThreshold, Me.BtnIncrTh, Me.lbThreshold, Me.btnSearch, Me.RefreshCameras})
|
||||
resources.ApplyResources(Me.ToolStrip1, "ToolStrip1")
|
||||
Me.ToolStrip1.Name = "ToolStrip1"
|
||||
Me.ToolStrip1.Stretch = True
|
||||
'
|
||||
'BtnLoad
|
||||
'
|
||||
Me.BtnLoad.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
resources.ApplyResources(Me.BtnLoad, "BtnLoad")
|
||||
Me.BtnLoad.Name = "BtnLoad"
|
||||
'
|
||||
'cmdZoomAll
|
||||
'
|
||||
Me.cmdZoomAll.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
resources.ApplyResources(Me.cmdZoomAll, "cmdZoomAll")
|
||||
Me.cmdZoomAll.Name = "cmdZoomAll"
|
||||
'
|
||||
'BtnZoom11
|
||||
'
|
||||
Me.BtnZoom11.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
|
||||
resources.ApplyResources(Me.BtnZoom11, "BtnZoom11")
|
||||
Me.BtnZoom11.Name = "BtnZoom11"
|
||||
'
|
||||
'BtnZoomPan
|
||||
'
|
||||
Me.BtnZoomPan.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BtnZoomPan.Image = Global.My.Resources.Resources.zoom_window_img
|
||||
resources.ApplyResources(Me.BtnZoomPan, "BtnZoomPan")
|
||||
Me.BtnZoomPan.Name = "BtnZoomPan"
|
||||
'
|
||||
'BtnCorrProsp
|
||||
'
|
||||
Me.BtnCorrProsp.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
|
||||
resources.ApplyResources(Me.BtnCorrProsp, "BtnCorrProsp")
|
||||
Me.BtnCorrProsp.Name = "BtnCorrProsp"
|
||||
'
|
||||
'BtnCfg
|
||||
'
|
||||
Me.BtnCfg.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BtnCfg.Image = Global.My.Resources.Resources.Cfg
|
||||
resources.ApplyResources(Me.BtnCfg, "BtnCfg")
|
||||
Me.BtnCfg.Name = "BtnCfg"
|
||||
'
|
||||
'BtnBackG
|
||||
'
|
||||
Me.BtnBackG.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
|
||||
resources.ApplyResources(Me.BtnBackG, "BtnBackG")
|
||||
Me.BtnBackG.Name = "BtnBackG"
|
||||
'
|
||||
'BtnEdgeFinder
|
||||
'
|
||||
resources.ApplyResources(Me.BtnEdgeFinder, "BtnEdgeFinder")
|
||||
Me.BtnEdgeFinder.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.BtnEdgeFinder.Image = Global.My.Resources.Resources.bordo2
|
||||
Me.BtnEdgeFinder.Name = "BtnEdgeFinder"
|
||||
'
|
||||
'BtnChangeThreshold
|
||||
'
|
||||
Me.BtnChangeThreshold.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
|
||||
resources.ApplyResources(Me.BtnChangeThreshold, "BtnChangeThreshold")
|
||||
Me.BtnChangeThreshold.Name = "BtnChangeThreshold"
|
||||
'
|
||||
'BtnIncrTh
|
||||
'
|
||||
Me.BtnIncrTh.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
|
||||
resources.ApplyResources(Me.BtnIncrTh, "BtnIncrTh")
|
||||
Me.BtnIncrTh.Name = "BtnIncrTh"
|
||||
'
|
||||
'lbThreshold
|
||||
'
|
||||
Me.lbThreshold.Name = "lbThreshold"
|
||||
resources.ApplyResources(Me.lbThreshold, "lbThreshold")
|
||||
'
|
||||
'btnSearch
|
||||
'
|
||||
resources.ApplyResources(Me.btnSearch, "btnSearch")
|
||||
Me.btnSearch.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.btnSearch.Image = Global.My.Resources.Resources.ventosa2
|
||||
Me.btnSearch.Name = "btnSearch"
|
||||
'
|
||||
'RefreshCameras
|
||||
'
|
||||
Me.RefreshCameras.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
|
||||
Me.RefreshCameras.Image = Global.My.Resources.Resources.refresh_1110751
|
||||
resources.ApplyResources(Me.RefreshCameras, "RefreshCameras")
|
||||
Me.RefreshCameras.Name = "RefreshCameras"
|
||||
'
|
||||
'StatusStrip1
|
||||
'
|
||||
Me.StatusStrip1.ImageScalingSize = New System.Drawing.Size(20, 20)
|
||||
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TStatus, Me.ProgressBar, Me.lbMousePosmm})
|
||||
resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
|
||||
Me.StatusStrip1.Name = "StatusStrip1"
|
||||
'
|
||||
'TStatus
|
||||
'
|
||||
Me.TStatus.Name = "TStatus"
|
||||
resources.ApplyResources(Me.TStatus, "TStatus")
|
||||
'
|
||||
'ProgressBar
|
||||
'
|
||||
Me.ProgressBar.Name = "ProgressBar"
|
||||
resources.ApplyResources(Me.ProgressBar, "ProgressBar")
|
||||
'
|
||||
'lbMousePosmm
|
||||
'
|
||||
Me.lbMousePosmm.Name = "lbMousePosmm"
|
||||
resources.ApplyResources(Me.lbMousePosmm, "lbMousePosmm")
|
||||
'
|
||||
'TimerMain
|
||||
'
|
||||
Me.TimerMain.Interval = 500
|
||||
'
|
||||
'GBDefAree
|
||||
'
|
||||
Me.GBDefAree.Controls.Add(Me.BtnVentosa)
|
||||
Me.GBDefAree.Controls.Add(Me.BtnExpT)
|
||||
Me.GBDefAree.Controls.Add(Me.BtnStone)
|
||||
Me.GBDefAree.Controls.Add(Me.BtnAbortDefAree)
|
||||
Me.GBDefAree.Controls.Add(Me.BtnSaveAree)
|
||||
resources.ApplyResources(Me.GBDefAree, "GBDefAree")
|
||||
Me.GBDefAree.Name = "GBDefAree"
|
||||
Me.GBDefAree.TabStop = False
|
||||
'
|
||||
'BtnVentosa
|
||||
'
|
||||
resources.ApplyResources(Me.BtnVentosa, "BtnVentosa")
|
||||
Me.BtnVentosa.Name = "BtnVentosa"
|
||||
Me.BtnVentosa.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnExpT
|
||||
'
|
||||
resources.ApplyResources(Me.BtnExpT, "BtnExpT")
|
||||
Me.BtnExpT.Name = "BtnExpT"
|
||||
Me.BtnExpT.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnStone
|
||||
'
|
||||
resources.ApplyResources(Me.BtnStone, "BtnStone")
|
||||
Me.BtnStone.Name = "BtnStone"
|
||||
Me.BtnStone.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnAbortDefAree
|
||||
'
|
||||
resources.ApplyResources(Me.BtnAbortDefAree, "BtnAbortDefAree")
|
||||
Me.BtnAbortDefAree.Name = "BtnAbortDefAree"
|
||||
Me.BtnAbortDefAree.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnSaveAree
|
||||
'
|
||||
resources.ApplyResources(Me.BtnSaveAree, "BtnSaveAree")
|
||||
Me.BtnSaveAree.Name = "BtnSaveAree"
|
||||
Me.BtnSaveAree.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ComboBoxCameras
|
||||
'
|
||||
Me.ComboBoxCameras.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
resources.ApplyResources(Me.ComboBoxCameras, "ComboBoxCameras")
|
||||
Me.ComboBoxCameras.Name = "ComboBoxCameras"
|
||||
'
|
||||
'ComboBoxCameraCfg
|
||||
'
|
||||
Me.ComboBoxCameraCfg.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
|
||||
resources.ApplyResources(Me.ComboBoxCameraCfg, "ComboBoxCameraCfg")
|
||||
Me.ComboBoxCameraCfg.Name = "ComboBoxCameraCfg"
|
||||
'
|
||||
'BtnEnd
|
||||
'
|
||||
Me.BtnEnd.Image = Global.My.Resources.Resources._exit
|
||||
resources.ApplyResources(Me.BtnEnd, "BtnEnd")
|
||||
Me.BtnEnd.Name = "BtnEnd"
|
||||
Me.BtnEnd.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnTakeFoto
|
||||
'
|
||||
resources.ApplyResources(Me.BtnTakeFoto, "BtnTakeFoto")
|
||||
Me.BtnTakeFoto.ImageList = Me.ImageList1
|
||||
Me.BtnTakeFoto.Name = "BtnTakeFoto"
|
||||
Me.BtnTakeFoto.UseVisualStyleBackColor = True
|
||||
'
|
||||
'BtnShowMsg
|
||||
'
|
||||
resources.ApplyResources(Me.BtnShowMsg, "BtnShowMsg")
|
||||
Me.BtnShowMsg.ImageList = Me.ImageList2
|
||||
Me.BtnShowMsg.Name = "BtnShowMsg"
|
||||
Me.BtnShowMsg.UseVisualStyleBackColor = True
|
||||
'
|
||||
'ImageList2
|
||||
'
|
||||
Me.ImageList2.ImageStream = CType(resources.GetObject("ImageList2.ImageStream"), System.Windows.Forms.ImageListStreamer)
|
||||
Me.ImageList2.TransparentColor = System.Drawing.Color.Transparent
|
||||
Me.ImageList2.Images.SetKeyName(0, "accept.png")
|
||||
Me.ImageList2.Images.SetKeyName(1, "cross.png")
|
||||
Me.ImageList2.Images.SetKeyName(2, "warning.png")
|
||||
'
|
||||
'ImageControl1
|
||||
'
|
||||
resources.ApplyResources(Me.ImageControl1, "ImageControl1")
|
||||
Me.ImageControl1.BackColor = System.Drawing.SystemColors.GrayText
|
||||
Me.ImageControl1.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
Me.ImageControl1.Image = Nothing
|
||||
Me.ImageControl1.initialimage = Nothing
|
||||
Me.ImageControl1.MouseEnabled = True
|
||||
Me.ImageControl1.Name = "ImageControl1"
|
||||
Me.ImageControl1.Origin = New System.Drawing.Point(0, 0)
|
||||
Me.ImageControl1.PanButton = System.Windows.Forms.MouseButtons.Middle
|
||||
Me.ImageControl1.PanMode = True
|
||||
Me.ImageControl1.ScrollbarsVisible = False
|
||||
Me.ImageControl1.StretchImageToFit = False
|
||||
Me.ImageControl1.ZoomFactor = 1.0R
|
||||
Me.ImageControl1.ZoomOnMouseWheel = True
|
||||
'
|
||||
'FrmMain
|
||||
'
|
||||
resources.ApplyResources(Me, "$this")
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.BackColor = System.Drawing.SystemColors.Control
|
||||
Me.Controls.Add(Me.BtnShowMsg)
|
||||
Me.Controls.Add(Me.ComboBoxCameraCfg)
|
||||
Me.Controls.Add(Me.ComboBoxCameras)
|
||||
Me.Controls.Add(Me.GBDefAree)
|
||||
Me.Controls.Add(Me.StatusStrip1)
|
||||
Me.Controls.Add(Me.ToolStrip1)
|
||||
Me.Controls.Add(Me.BtnEnd)
|
||||
Me.Controls.Add(Me.GBCalibration)
|
||||
Me.Controls.Add(Me.GBCorrected)
|
||||
Me.Controls.Add(Me.GBImgFromCam)
|
||||
Me.Controls.Add(Me.ImageControl1)
|
||||
Me.Controls.Add(Me.LbFocalLenght)
|
||||
Me.Controls.Add(Me.LbImageStatus)
|
||||
Me.Controls.Add(Me.BtnTakeFoto)
|
||||
Me.Name = "FrmMain"
|
||||
Me.GBImgFromCam.ResumeLayout(False)
|
||||
Me.GBCorrected.ResumeLayout(False)
|
||||
Me.GBCalibration.ResumeLayout(False)
|
||||
Me.GBCalibration.PerformLayout()
|
||||
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ToolStrip1.ResumeLayout(False)
|
||||
Me.ToolStrip1.PerformLayout()
|
||||
Me.StatusStrip1.ResumeLayout(False)
|
||||
Me.StatusStrip1.PerformLayout()
|
||||
Me.GBDefAree.ResumeLayout(False)
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents BtnTakeFoto As System.Windows.Forms.Button
|
||||
Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
|
||||
Friend WithEvents BtnEnd As System.Windows.Forms.Button
|
||||
Friend WithEvents LbImageStatus As System.Windows.Forms.Label
|
||||
Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
|
||||
Friend WithEvents LbFocalLenght As System.Windows.Forms.Label
|
||||
Private WithEvents TimerZoom As System.Windows.Forms.Timer
|
||||
Friend WithEvents ImageControl1 As ImageControl
|
||||
Friend WithEvents GBImgFromCam As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents BtnCorrLens As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnCorrCompleta As System.Windows.Forms.Button
|
||||
Friend WithEvents GBCorrected As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents BtnSave As System.Windows.Forms.Button
|
||||
Friend WithEvents GBCalibration As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents BtnAbortCal As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnSaveCal As System.Windows.Forms.Button
|
||||
Friend WithEvents PictureBox2 As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents LbAltRif As System.Windows.Forms.Label
|
||||
Friend WithEvents LbAltCali As System.Windows.Forms.Label
|
||||
Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
|
||||
Friend WithEvents ToolStrip1 As System.Windows.Forms.ToolStrip
|
||||
Private WithEvents BtnLoad As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents cmdZoomAll As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BtnZoom11 As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BtnCorrProsp As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BtnCfg As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BtnZoomPan As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
|
||||
Friend WithEvents TStatus As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents ProgressBar As System.Windows.Forms.ToolStripProgressBar
|
||||
Friend WithEvents BtnBackG As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BtnEdgeFinder As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BtnChangeThreshold As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents BtnIncrTh As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents lbYmm As System.Windows.Forms.Label
|
||||
Friend WithEvents lbXmm As System.Windows.Forms.Label
|
||||
Friend WithEvents Label3 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents lbThreshold As System.Windows.Forms.ToolStripLabel
|
||||
Friend WithEvents btnSearch As System.Windows.Forms.ToolStripButton
|
||||
Friend WithEvents lbMousePosmm As System.Windows.Forms.ToolStripStatusLabel
|
||||
Friend WithEvents TimerMain As System.Windows.Forms.Timer
|
||||
Friend WithEvents BtnDefAree As System.Windows.Forms.Button
|
||||
Friend WithEvents GBDefAree As System.Windows.Forms.GroupBox
|
||||
Friend WithEvents BtnAbortDefAree As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnSaveAree As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnVentosa As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnExpT As System.Windows.Forms.Button
|
||||
Friend WithEvents BtnStone As System.Windows.Forms.Button
|
||||
Friend WithEvents ComboBoxCameras As ComboBox
|
||||
Friend WithEvents ComboBoxCameraCfg As ComboBox
|
||||
Friend WithEvents RefreshCameras As ToolStripButton
|
||||
Friend WithEvents BtnShowMsg As Button
|
||||
Friend WithEvents ImageList2 As ImageList
|
||||
End Class
|
||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
Generated
+51
@@ -0,0 +1,51 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class FrmStart
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Form overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
Try
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
Finally
|
||||
MyBase.Dispose(disposing)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
Me.Label1.Location = New System.Drawing.Point(61, 111)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(61, 13)
|
||||
Me.Label1.TabIndex = 0
|
||||
Me.Label1.Text = "Initializing..."
|
||||
'
|
||||
'clsFormSplash
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(292, 266)
|
||||
Me.Controls.Add(Me.Label1)
|
||||
Me.Name = "clsFormSplash"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "Camera Manager"
|
||||
Me.ResumeLayout(False)
|
||||
Me.PerformLayout()
|
||||
|
||||
End Sub
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
End Class
|
||||
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -0,0 +1,8 @@
|
||||
Imports System.IO
|
||||
Imports System.IO.Path
|
||||
Imports System.Drawing
|
||||
Imports System.Windows.Forms
|
||||
|
||||
Public Class FrmStart
|
||||
|
||||
End Class
|
||||
+34
@@ -0,0 +1,34 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class DrawingBoard
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl1 overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'DrawingBoard
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.Name = "DrawingBoard"
|
||||
Me.Size = New System.Drawing.Size(235, 207)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
</root>
|
||||
@@ -0,0 +1,858 @@
|
||||
Imports System.Drawing.Imaging
|
||||
Imports System.Drawing.Font
|
||||
|
||||
<System.Runtime.InteropServices.ComVisible(False)> _
|
||||
Public Class DrawingBoard
|
||||
|
||||
'Public Events
|
||||
Public Event SetScrollPositions()
|
||||
Public Event PointSelected(n As Integer)
|
||||
Public Event PointUnselected()
|
||||
|
||||
'Member Variables
|
||||
Private m_PanButton As System.Windows.Forms.MouseButtons = Windows.Forms.MouseButtons.Middle
|
||||
Private m_EditButton As System.Windows.Forms.MouseButtons = Windows.Forms.MouseButtons.Left
|
||||
Private m_OriginalImage As System.Drawing.Bitmap
|
||||
|
||||
Private m_StartPoint As System.Drawing.Point
|
||||
|
||||
Private m_Origin As New System.Drawing.Point(0, 0)
|
||||
|
||||
Private SrcRect As System.Drawing.Rectangle
|
||||
Private DestRect As System.Drawing.Rectangle
|
||||
|
||||
Private m_ZoomOnMouseWheel As Boolean = True
|
||||
Private m_ZoomFactor As Double = 1.0
|
||||
|
||||
Private m_ApparentImageSize As New Size(0, 0)
|
||||
|
||||
Private m_DrawWidth As Integer
|
||||
Private m_DrawHeight As Integer
|
||||
|
||||
Private m_centerpoint As Point
|
||||
|
||||
Private m_PanMode As Boolean = True
|
||||
Private m_StretchImageToFit As Boolean = True
|
||||
|
||||
Private m_Select_Rect As Rectangle
|
||||
Private m_Select_Pen As New Pen(Color.Blue, 2) ' Pen used to indicate a selection on the image (zoom window)
|
||||
|
||||
Private EndPoint As Point ' for pan and box-zoom
|
||||
|
||||
' 4 punti di precalibrazione
|
||||
Private m_pCaliCorner() As System.Drawing.Point
|
||||
Private m_pCaliCornerH() As System.Drawing.Point
|
||||
|
||||
' per la calibrazione delle altezze
|
||||
' per ora lo tengo
|
||||
Private m_nPuntiCaliH As Integer
|
||||
Private m_pCaliH() As System.Drawing.Point
|
||||
|
||||
Private m_bVisPuntiCaliH As Boolean
|
||||
Private m_bVisPuntiCorner As Boolean
|
||||
|
||||
Private m_bPointSelected As Integer
|
||||
Private m_isel As Integer, m_jsel As Integer
|
||||
Private m_bCkRow As Boolean, m_bCkCol As Boolean
|
||||
Private m_MouseEnabled As Boolean
|
||||
|
||||
Private Const std_radius As Integer = 40
|
||||
Private Const small_radius As Integer = 30
|
||||
Private Const dA_radius As Integer = 20
|
||||
'Private m_MousePosImg As PointF
|
||||
Private Enum ptype
|
||||
PuntoCorner
|
||||
PuntoCaliH
|
||||
PuntoArea ' area generica
|
||||
End Enum
|
||||
Private m_ptypesel As ptype
|
||||
|
||||
Event NewMousePosImage(pm As PointF)
|
||||
|
||||
' gestione aree lastra (checkEsposizione, CheckStone, Def Ventosa)
|
||||
' uso un'area generica rettangolare
|
||||
Private m_bVisAreaGen As Boolean
|
||||
Private m_pArea(3) As System.Drawing.Point
|
||||
|
||||
#Region "Public/Private Shadows"
|
||||
Public Shadows Property Image() As System.Drawing.Image
|
||||
Get
|
||||
Return m_OriginalImage
|
||||
End Get
|
||||
Set(ByVal Value As System.Drawing.Image)
|
||||
If Not m_OriginalImage Is Nothing Then
|
||||
m_Select_Rect = Nothing
|
||||
m_Origin = New Point(0, 0)
|
||||
m_ApparentImageSize = New Size(0, 0)
|
||||
m_ZoomFactor = 1
|
||||
GC.Collect()
|
||||
'GC.GetTotalMemory(True)
|
||||
End If
|
||||
|
||||
If Value Is Nothing Then
|
||||
m_OriginalImage = Nothing
|
||||
Me.Invalidate()
|
||||
Exit Property
|
||||
End If
|
||||
|
||||
GC.Collect()
|
||||
|
||||
'Dim totalmem As Long = GC.GetTotalMemory(False)
|
||||
|
||||
'Dim r As New Rectangle(0, 0, Value.Width, Value.Height)
|
||||
m_OriginalImage = Value
|
||||
Me.Invalidate()
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Shadows Property initialimage() As System.Drawing.Image
|
||||
Get
|
||||
Return m_OriginalImage
|
||||
End Get
|
||||
Set(ByVal value As System.Drawing.Image)
|
||||
Me.Image = value
|
||||
Me.ZoomFactor = 1
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Shadows Property BackgroundImage() As System.Drawing.Image
|
||||
Get
|
||||
Return Nothing
|
||||
End Get
|
||||
Set(ByVal Value As System.Drawing.Image)
|
||||
Me.Image = Value
|
||||
Me.ZoomFactor = 1
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
Public Property VisPuntiCorner() As Boolean
|
||||
Get
|
||||
Return m_bVisPuntiCorner
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_bVisPuntiCorner = value
|
||||
End Set
|
||||
End Property
|
||||
Public Property VisPuntiCaliH() As Boolean
|
||||
Get
|
||||
Return m_bVisPuntiCaliH
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_bVisPuntiCaliH = value
|
||||
End Set
|
||||
End Property
|
||||
Public WriteOnly Property CkRow() As Boolean
|
||||
Set(ByVal value As Boolean)
|
||||
m_bCkRow = value
|
||||
End Set
|
||||
End Property
|
||||
Public WriteOnly Property CkCol() As Boolean
|
||||
Set(ByVal value As Boolean)
|
||||
m_bCkCol = value
|
||||
End Set
|
||||
End Property
|
||||
Public Property MouseEnaBled() As Boolean
|
||||
Get
|
||||
Return m_MouseEnabled
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_MouseEnabled = value
|
||||
If Not value Then
|
||||
m_bPointSelected = 0
|
||||
End If
|
||||
End Set
|
||||
End Property
|
||||
Public Property VisAreaGen() As Boolean
|
||||
Get
|
||||
Return m_bVisAreaGen
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_bVisAreaGen = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
|
||||
#Region "Protected Overrides"
|
||||
|
||||
Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs)
|
||||
e.Graphics.Clear(Me.BackColor)
|
||||
DrawImage(e.Graphics)
|
||||
MyBase.OnPaint(e)
|
||||
End Sub
|
||||
|
||||
Protected Overrides Sub OnSizeChanged(ByVal e As EventArgs)
|
||||
DestRect = New System.Drawing.Rectangle(0, 0, ClientSize.Width, ClientSize.Height)
|
||||
ComputeDrawingArea()
|
||||
MyBase.OnSizeChanged(e)
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "Public Properties"
|
||||
|
||||
Public Sub ZoomIn()
|
||||
ZoomImage(True)
|
||||
End Sub
|
||||
|
||||
Public Sub ZoomOut()
|
||||
ZoomImage(False)
|
||||
End Sub
|
||||
|
||||
Private Sub ZoomImage(ByVal ZoomIn As Boolean)
|
||||
' Get center point
|
||||
m_centerpoint.X = m_Origin.X + SrcRect.Width / 2
|
||||
m_centerpoint.Y = m_Origin.Y + SrcRect.Height / 2
|
||||
|
||||
'set new zoomfactor
|
||||
If ZoomIn Then
|
||||
ZoomFactor = Math.Round(ZoomFactor * 1.1, 2)
|
||||
Else
|
||||
ZoomFactor = Math.Round(ZoomFactor * 0.9, 2)
|
||||
End If
|
||||
|
||||
'Reset the origin to maintain center point
|
||||
m_Origin.X = CDbl(m_centerpoint.X) - (CDbl(ClientSize.Width) / m_ZoomFactor) / 2.0
|
||||
m_Origin.Y = CDbl(m_centerpoint.Y) - (CDbl(ClientSize.Height) / m_ZoomFactor) / 2.0
|
||||
|
||||
CheckBounds()
|
||||
End Sub
|
||||
Private Sub ZoomImage(ByVal ZoomIn As Boolean, origin As Point)
|
||||
|
||||
' ZoomImage(ZoomIn)
|
||||
' Return
|
||||
|
||||
' Coordinate origine scalate
|
||||
Dim X_ As Integer = m_Origin.X * m_ZoomFactor
|
||||
Dim Y_ As Integer = m_Origin.Y * m_ZoomFactor
|
||||
' Coordinate cursore riferite all'origine immagine
|
||||
Dim W_ As Integer = X_ + origin.X
|
||||
Dim H_ As Integer = Y_ + origin.Y
|
||||
' Dimensione attuale immagine
|
||||
Dim pre_W As Integer = m_ApparentImageSize.Width
|
||||
Dim pre_H As Integer = m_ApparentImageSize.Height
|
||||
|
||||
If pre_W < 0.001 And pre_H < 0.001 Then Return
|
||||
|
||||
'set new zoomfactor
|
||||
If ZoomIn Then
|
||||
ZoomFactor = Math.Round(ZoomFactor * 1.1, 2)
|
||||
Else
|
||||
ZoomFactor = Math.Round(ZoomFactor * 0.9, 2)
|
||||
End If
|
||||
|
||||
' Nuove coordinate origine scalate
|
||||
Dim X_n As Integer = m_Origin.X * m_ZoomFactor
|
||||
Dim Y_n As Integer = m_Origin.Y * m_ZoomFactor
|
||||
' Nuova dimensione attuale immagine
|
||||
Dim post_W As Integer = m_ApparentImageSize.Width
|
||||
Dim post_H As Integer = m_ApparentImageSize.Height
|
||||
' Fattore di scalatura dell'immagine
|
||||
Dim W_fac As Double = pre_W / post_W
|
||||
Dim H_fac As Double = pre_H / post_H
|
||||
' Nuove coordinate cursore riferite all'origine immagine
|
||||
Dim W_n As Integer = W_ / W_fac
|
||||
Dim H_n As Integer = H_ / H_fac
|
||||
' Calcolo posizione origine per manatenre l'immagine fissa sulla posizione cursore
|
||||
m_Origin.X += (-W_ + W_n + X_ - X_n) / m_ZoomFactor
|
||||
m_Origin.Y += (-H_ + H_n + Y_ - Y_n) / m_ZoomFactor
|
||||
|
||||
End Sub
|
||||
|
||||
Public Sub InvertColors()
|
||||
Try
|
||||
Cursor = Cursors.WaitCursor
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
' This is the color matrix to invert the image colors.
|
||||
Dim cm As ColorMatrix = New ColorMatrix(New Single()() _
|
||||
{New Single() {-1, 0, 0, 0, 0}, _
|
||||
New Single() {0, -1, 0, 0, 0}, _
|
||||
New Single() {0, 0, -1, 0, 0}, _
|
||||
New Single() {0, 0, 0, 1, 0}, _
|
||||
New Single() {1, 1, 1, 1, 1}})
|
||||
|
||||
Dim ImageAttributes As New ImageAttributes()
|
||||
ImageAttributes.SetColorMatrix(cm)
|
||||
|
||||
Dim g As Graphics
|
||||
g = Graphics.FromImage(m_OriginalImage)
|
||||
|
||||
Dim rc As New Rectangle(0, 0, m_OriginalImage.Width, m_OriginalImage.Height)
|
||||
g.DrawImage(m_OriginalImage, rc, 0, 0, m_OriginalImage.Width, m_OriginalImage.Height, GraphicsUnit.Pixel, ImageAttributes)
|
||||
|
||||
Me.Invalidate()
|
||||
Catch ex As Exception
|
||||
Throw ex
|
||||
Finally
|
||||
Cursor = Cursors.Default
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
Public Property PanButton() As System.Windows.Forms.MouseButtons
|
||||
Get
|
||||
Return m_PanButton
|
||||
End Get
|
||||
Set(ByVal value As System.Windows.Forms.MouseButtons)
|
||||
m_PanButton = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property ZoomOnMouseWheel() As Boolean
|
||||
Get
|
||||
Return m_ZoomOnMouseWheel
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_ZoomOnMouseWheel = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property ZoomFactor() As Double
|
||||
Get
|
||||
Return m_ZoomFactor
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
m_ZoomFactor = value
|
||||
If m_ZoomFactor > 15 Then m_ZoomFactor = 15
|
||||
If m_ZoomFactor < 0.05 Then m_ZoomFactor = 0.05
|
||||
If Not m_OriginalImage Is Nothing Then
|
||||
m_ApparentImageSize.Height = m_OriginalImage.Height * m_ZoomFactor
|
||||
m_ApparentImageSize.Width = m_OriginalImage.Width * m_ZoomFactor
|
||||
ComputeDrawingArea()
|
||||
CheckBounds()
|
||||
End If
|
||||
Me.Invalidate()
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property Origin() As System.Drawing.Point
|
||||
Get
|
||||
Return m_Origin
|
||||
End Get
|
||||
Set(ByVal value As System.Drawing.Point)
|
||||
m_Origin = value
|
||||
Me.Invalidate()
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public ReadOnly Property ApparentImageSize() As System.Drawing.Size
|
||||
Get
|
||||
Return m_ApparentImageSize
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Property PanMode() As Boolean
|
||||
Get
|
||||
Return m_PanMode
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_PanMode = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property StretchImageToFit() As Boolean
|
||||
Get
|
||||
Return m_StretchImageToFit
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_StretchImageToFit = value
|
||||
Me.Invalidate()
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Sub fittoscreen()
|
||||
Me.StretchImageToFit = False
|
||||
Me.Origin = New Point(0, 0)
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
ZoomFactor = Math.Min(ClientSize.Width / m_OriginalImage.Width, ClientSize.Height / m_OriginalImage.Height)
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
Private Property Selected_Rectangle() As Rectangle
|
||||
Get
|
||||
Return m_Select_Rect
|
||||
End Get
|
||||
Set(ByVal Value As Rectangle)
|
||||
m_Select_Rect = Value
|
||||
Me.Invalidate()
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private Sub Draw_Rectangle(ByVal e As System.Windows.Forms.MouseEventArgs)
|
||||
If (New Rectangle(0, 0, ClientSize.Width, ClientSize.Height)).Contains(PointToClient(Windows.Forms.Cursor.Position)) Then
|
||||
Dim Width As Integer = System.Math.Abs(m_StartPoint.X - e.X)
|
||||
Dim Height As Integer = System.Math.Abs(m_StartPoint.Y - e.Y)
|
||||
Dim UpperLeft As Point
|
||||
'need to determine the upper left corner of the rectangel regardless of whether it's
|
||||
'the start point or the end point, or other.
|
||||
UpperLeft = New Point(System.Math.Min(m_StartPoint.X, e.X), System.Math.Min(m_StartPoint.Y, e.Y))
|
||||
Selected_Rectangle = New Rectangle(UpperLeft.X, UpperLeft.Y, Width, Height)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub DrawImage(ByRef g As Graphics)
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
|
||||
Dim Font1 As New Font("Arial", 10)
|
||||
|
||||
g.PixelOffsetMode = Drawing2D.PixelOffsetMode.Half
|
||||
g.SmoothingMode = Drawing2D.SmoothingMode.None
|
||||
g.InterpolationMode = Drawing2D.InterpolationMode.NearestNeighbor
|
||||
|
||||
If m_StretchImageToFit Then
|
||||
SrcRect = New System.Drawing.Rectangle(0, 0, m_OriginalImage.Width, m_OriginalImage.Height)
|
||||
Else
|
||||
SrcRect = New System.Drawing.Rectangle(m_Origin.X, m_Origin.Y, m_DrawWidth, m_DrawHeight)
|
||||
End If
|
||||
|
||||
Try
|
||||
g.DrawImage(m_OriginalImage, DestRect, SrcRect, GraphicsUnit.Pixel)
|
||||
Catch
|
||||
End Try
|
||||
|
||||
If Not PanMode Then
|
||||
g.DrawRectangle(m_Select_Pen, Selected_Rectangle)
|
||||
End If
|
||||
|
||||
Dim i As Integer, j As Integer
|
||||
Dim ix As Integer, iy As Integer
|
||||
Dim ix2 As Integer, iy2 As Integer
|
||||
|
||||
|
||||
If m_bVisPuntiCorner Then
|
||||
For i = 0 To 3
|
||||
ix = -m_Origin.X * m_ZoomFactor + m_pCaliCorner(i).X * m_ZoomFactor - std_radius
|
||||
iy = -m_Origin.Y * m_ZoomFactor + m_pCaliCorner(i).Y * m_ZoomFactor - std_radius
|
||||
If m_ptypesel = ptype.PuntoCorner AndAlso i = m_isel Then
|
||||
g.DrawArc(Pens.GreenYellow, ix, iy, std_radius * 2, std_radius * 2, 0, 360)
|
||||
Else
|
||||
g.DrawArc(Pens.Beige, ix, iy, std_radius * 2, std_radius * 2, 0, 360)
|
||||
End If
|
||||
g.DrawString(i + 1, Font1, Brushes.Yellow, ix + 5, iy + 5)
|
||||
Next
|
||||
For i = 0 To 3
|
||||
ix = -m_Origin.X * m_ZoomFactor + m_pCaliCorner(i).X * m_ZoomFactor
|
||||
iy = -m_Origin.Y * m_ZoomFactor + m_pCaliCorner(i).Y * m_ZoomFactor
|
||||
j = i + 1
|
||||
If j = 4 Then j = 0
|
||||
ix2 = -m_Origin.X * m_ZoomFactor + m_pCaliCorner(j).X * m_ZoomFactor
|
||||
iy2 = -m_Origin.Y * m_ZoomFactor + m_pCaliCorner(j).Y * m_ZoomFactor
|
||||
g.DrawLine(Pens.Beige, ix, iy, ix2, iy2)
|
||||
Next
|
||||
End If
|
||||
|
||||
|
||||
If m_bVisPuntiCaliH Then
|
||||
Dim raggio As Integer
|
||||
For i = 0 To 3
|
||||
If i = 0 Or i = 2 Then raggio = std_radius Else raggio = small_radius
|
||||
ix = -m_Origin.X * m_ZoomFactor + m_pCaliH(i).X * m_ZoomFactor - raggio
|
||||
iy = -m_Origin.Y * m_ZoomFactor + m_pCaliH(i).Y * m_ZoomFactor - raggio
|
||||
g.DrawArc(Pens.Beige, ix, iy, raggio * 2, raggio * 2, 0, 360)
|
||||
|
||||
Next
|
||||
For i = 0 To 2 Step 2
|
||||
ix = -m_Origin.X * m_ZoomFactor + m_pCaliH(i).X * m_ZoomFactor
|
||||
iy = -m_Origin.Y * m_ZoomFactor + m_pCaliH(i).Y * m_ZoomFactor
|
||||
ix2 = -m_Origin.X * m_ZoomFactor + m_pCaliH(i + 1).X * m_ZoomFactor
|
||||
iy2 = -m_Origin.Y * m_ZoomFactor + m_pCaliH(i + 1).Y * m_ZoomFactor
|
||||
g.DrawLine(Pens.Beige, ix, iy, ix2, iy2)
|
||||
Next
|
||||
|
||||
End If
|
||||
|
||||
|
||||
If m_bVisAreaGen Then
|
||||
' 4 cerchi
|
||||
For i = 0 To 3 Step 2
|
||||
ix = -m_Origin.X * m_ZoomFactor + m_pArea(i).X * m_ZoomFactor - dA_radius
|
||||
iy = -m_Origin.Y * m_ZoomFactor + m_pArea(i).Y * m_ZoomFactor - dA_radius
|
||||
g.DrawArc(Pens.GreenYellow, ix, iy, dA_radius * 2, dA_radius * 2, 0, 360)
|
||||
Next
|
||||
' 4 linee
|
||||
For i = 0 To 3
|
||||
ix = -m_Origin.X * m_ZoomFactor + m_pArea(i).X * m_ZoomFactor
|
||||
iy = -m_Origin.Y * m_ZoomFactor + m_pArea(i).Y * m_ZoomFactor
|
||||
j = i + 1
|
||||
If j = 4 Then j = 0
|
||||
ix2 = -m_Origin.X * m_ZoomFactor + m_pArea(j).X * m_ZoomFactor
|
||||
iy2 = -m_Origin.Y * m_ZoomFactor + m_pArea(j).Y * m_ZoomFactor
|
||||
g.DrawLine(Pens.Beige, ix, iy, ix2, iy2)
|
||||
Next
|
||||
End If
|
||||
|
||||
RaiseEvent SetScrollPositions()
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ComputeDrawingArea()
|
||||
'm_DrawHeight = Me.Height / m_ZoomFactor
|
||||
'm_DrawWidth = Me.Width / m_ZoomFactor
|
||||
m_DrawHeight = ClientSize.Height / m_ZoomFactor
|
||||
m_DrawWidth = ClientSize.Width / m_ZoomFactor
|
||||
End Sub
|
||||
|
||||
Private Sub ImageViewer_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
If Not m_MouseEnabled Then Exit Sub
|
||||
EndPoint = Nothing
|
||||
Selected_Rectangle = Nothing
|
||||
Dim i As Integer, previusSelection As Integer
|
||||
Dim previusPtypeSel As ptype
|
||||
Dim px As Double, py As Double
|
||||
'Set the start point. This is used for panning and zooming so we always set it.
|
||||
m_StartPoint = New Point(e.X, e.Y)
|
||||
previusSelection = m_bPointSelected
|
||||
m_bPointSelected = 0
|
||||
previusPtypeSel = m_ptypesel
|
||||
|
||||
If m_bVisPuntiCorner Then
|
||||
For i = 0 To 3
|
||||
px = -m_Origin.X * m_ZoomFactor + m_pCaliCorner(i).X * m_ZoomFactor
|
||||
py = -m_Origin.Y * m_ZoomFactor + m_pCaliCorner(i).Y * m_ZoomFactor
|
||||
If System.Math.Abs(px - e.X) < std_radius And System.Math.Abs(py - e.Y) < std_radius Then
|
||||
m_bPointSelected = 1
|
||||
m_isel = i
|
||||
m_jsel = 0
|
||||
i = 3
|
||||
m_ptypesel = ptype.PuntoCorner
|
||||
RaiseEvent PointSelected(m_isel)
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
If m_bVisPuntiCaliH Then
|
||||
For i = 0 To 3
|
||||
px = -m_Origin.X * m_ZoomFactor + m_pCaliH(i).X * m_ZoomFactor
|
||||
py = -m_Origin.Y * m_ZoomFactor + m_pCaliH(i).Y * m_ZoomFactor
|
||||
If System.Math.Abs(px - e.X) < std_radius And System.Math.Abs(py - e.Y) < std_radius Then
|
||||
m_bPointSelected = 1
|
||||
m_isel = i
|
||||
m_jsel = 0
|
||||
i = 3
|
||||
m_ptypesel = ptype.PuntoCaliH
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
If m_bVisAreaGen Then
|
||||
For i = 0 To 3 Step 2
|
||||
px = -m_Origin.X * m_ZoomFactor + m_pArea(i).X * m_ZoomFactor
|
||||
py = -m_Origin.Y * m_ZoomFactor + m_pArea(i).Y * m_ZoomFactor
|
||||
If System.Math.Abs(px - e.X) < dA_radius And System.Math.Abs(py - e.Y) < dA_radius Then
|
||||
m_bPointSelected = 1
|
||||
m_isel = i
|
||||
m_jsel = 0
|
||||
i = 3
|
||||
m_ptypesel = ptype.PuntoArea
|
||||
End If
|
||||
Next
|
||||
|
||||
|
||||
End If
|
||||
|
||||
|
||||
' l'evento interessa solo per i punto corner
|
||||
If (previusSelection <> 0 AndAlso m_bPointSelected = 0) OrElse
|
||||
(previusPtypeSel = ptype.PuntoCorner AndAlso m_ptypesel <> ptype.PuntoCorner) Then
|
||||
RaiseEvent PointUnselected()
|
||||
End If
|
||||
|
||||
|
||||
Me.Focus()
|
||||
End Sub
|
||||
|
||||
Private Sub ImageViewer_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
|
||||
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
|
||||
Dim Px As Single, Py As Single
|
||||
Px = e.X
|
||||
Py = e.Y
|
||||
If Px > ClientSize.Width Then
|
||||
Px = ClientSize.Width
|
||||
End If
|
||||
If Py > ClientSize.Height Then
|
||||
Py = ClientSize.Height
|
||||
End If
|
||||
If e.X < 0 Then Px = 0
|
||||
If e.Y < 0 Then Py = 0
|
||||
|
||||
If e.Button = m_PanButton OrElse e.Button = m_EditButton Then
|
||||
|
||||
Dim DeltaX As Integer, DeltaY As Integer
|
||||
If PanMode Then
|
||||
DeltaX = (m_StartPoint.X - Px) / m_ZoomFactor
|
||||
DeltaY = (m_StartPoint.Y - Py) / m_ZoomFactor
|
||||
'reset the startpoints
|
||||
If (DeltaX <> 0) Then
|
||||
m_StartPoint.X = m_StartPoint.X - DeltaX * m_ZoomFactor 'e.X
|
||||
End If
|
||||
If (DeltaY <> 0) Then
|
||||
m_StartPoint.Y = m_StartPoint.Y - DeltaY * m_ZoomFactor 'e.Y
|
||||
End If
|
||||
Else
|
||||
DeltaX = (m_StartPoint.X - Px)
|
||||
DeltaY = (m_StartPoint.Y - Py)
|
||||
End If
|
||||
|
||||
|
||||
If m_bPointSelected And PanMode AndAlso e.Button = m_EditButton Then
|
||||
If m_ptypesel = ptype.PuntoCorner Then
|
||||
If m_bPointSelected = 2 Then
|
||||
m_pCaliCornerH(m_isel).X = m_pCaliCornerH(m_isel).X - DeltaX
|
||||
m_pCaliCornerH(m_isel).Y = m_pCaliCornerH(m_isel).Y - DeltaY
|
||||
Else
|
||||
m_pCaliCorner(m_isel).X = m_pCaliCorner(m_isel).X - DeltaX
|
||||
m_pCaliCorner(m_isel).Y = m_pCaliCorner(m_isel).Y - DeltaY
|
||||
' muovo entrambi
|
||||
m_pCaliCornerH(m_isel).X = m_pCaliCornerH(m_isel).X - DeltaX
|
||||
m_pCaliCornerH(m_isel).Y = m_pCaliCornerH(m_isel).Y - DeltaY
|
||||
End If
|
||||
'CheckPointBounds() ' Da sistemare!!!
|
||||
ElseIf m_ptypesel = ptype.PuntoCaliH Then
|
||||
m_pCaliH(m_isel).X = m_pCaliH(m_isel).X - DeltaX
|
||||
m_pCaliH(m_isel).Y = m_pCaliH(m_isel).Y - DeltaY
|
||||
ElseIf m_ptypesel = ptype.PuntoArea Then
|
||||
|
||||
If m_isel = 0 Then
|
||||
|
||||
For i As Integer = 0 To 3
|
||||
m_pArea(i).X = m_pArea(i).X - DeltaX
|
||||
m_pArea(i).Y = m_pArea(i).Y - DeltaY
|
||||
Next
|
||||
|
||||
ElseIf m_isel = 2 Then
|
||||
m_pArea(1).X = m_pArea(1).X - DeltaX
|
||||
m_pArea(2).X = m_pArea(1).X
|
||||
m_pArea(2).Y = m_pArea(2).Y - DeltaY
|
||||
m_pArea(3).Y = m_pArea(2).Y
|
||||
End If
|
||||
|
||||
End If
|
||||
Me.Invalidate()
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
If PanMode And e.Button = m_PanButton Then
|
||||
'Set the origin of the new image
|
||||
m_Origin.X = m_Origin.X + DeltaX
|
||||
m_Origin.Y = m_Origin.Y + DeltaY
|
||||
CheckBounds()
|
||||
'Force a paint
|
||||
Me.Invalidate()
|
||||
Else
|
||||
Draw_Rectangle(e)
|
||||
End If
|
||||
End If
|
||||
|
||||
If (e.Button = MouseButtons.None) Then
|
||||
' calcolo la posizione del mouse sull'immagine
|
||||
Dim pimg As PointF
|
||||
|
||||
' inverso di:
|
||||
'ix = -m_Origin.X * m_ZoomFactor + pimg.X * m_ZoomFactor
|
||||
'iy = -m_Origin.Y * m_ZoomFactor + pimg.Y * m_ZoomFactor
|
||||
'ix = (pimg.x-m_Origin.X)*m_ZoomFactor
|
||||
'(pimg.x-m_Origin.X) = ix/m_ZoomFactor
|
||||
|
||||
|
||||
pimg.X = m_Origin.X + e.X / m_ZoomFactor
|
||||
pimg.Y = m_Origin.Y + e.Y / m_ZoomFactor
|
||||
|
||||
RaiseEvent NewMousePosImage(pimg)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
' Metodo che dovrebbe verificare di che lo spostamento dell'immagine è dentro i contorni
|
||||
Private Sub CheckBounds()
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
|
||||
' Il controllo che segue non mi soddisfa...!!!! NASCONDE SEMPRE IL LATO BASSO DELL'IMMAGINE !!!!
|
||||
Return
|
||||
|
||||
'Make sure we don't go out of bounds
|
||||
If m_Origin.X < 0 Then m_Origin.X = 0
|
||||
If m_Origin.Y < 0 Then m_Origin.Y = 0
|
||||
|
||||
If m_Origin.X > m_OriginalImage.Width - (ClientSize.Width / m_ZoomFactor) Then
|
||||
m_Origin.X = m_OriginalImage.Width - (ClientSize.Width / m_ZoomFactor)
|
||||
End If
|
||||
If m_Origin.Y > m_OriginalImage.Height - (ClientSize.Height / m_ZoomFactor) Then
|
||||
m_Origin.Y = m_OriginalImage.Height - (ClientSize.Height / m_ZoomFactor)
|
||||
End If
|
||||
|
||||
If m_Origin.X < 0 Then m_Origin.X = 0
|
||||
If m_Origin.Y < 0 Then m_Origin.Y = 0
|
||||
End Sub
|
||||
|
||||
' Metodo NON utilizzato
|
||||
Private Sub CheckPointBounds()
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
|
||||
'Make sure we don't go out of bounds
|
||||
If m_pCaliCorner(m_isel).X < 0 Then m_pCaliCorner(m_isel).X = 0
|
||||
If m_pCaliCorner(m_isel).Y < 0 Then m_pCaliCorner(m_isel).Y = 0
|
||||
If m_pCaliCorner(m_isel).X > m_OriginalImage.Width - (ClientSize.Width / m_ZoomFactor) Then
|
||||
m_pCaliCorner(m_isel).X = m_OriginalImage.Width - (ClientSize.Width / m_ZoomFactor)
|
||||
End If
|
||||
If m_pCaliCorner(m_isel).Y > m_OriginalImage.Height Then ' - (ClientSize.Height / m_ZoomFactor) Then
|
||||
m_pCaliCorner(m_isel).Y = m_OriginalImage.Height '- (ClientSize.Height / m_ZoomFactor)
|
||||
End If
|
||||
|
||||
' anche per i punti area
|
||||
If m_pArea(m_isel).X < 0 Then m_pArea(m_isel).X = 0
|
||||
If m_pArea(m_isel).Y < 0 Then m_pArea(m_isel).Y = 0
|
||||
If m_pArea(m_isel).X > m_OriginalImage.Width - (ClientSize.Width / m_ZoomFactor) Then
|
||||
m_pArea(m_isel).X = m_OriginalImage.Width - (ClientSize.Width / m_ZoomFactor)
|
||||
End If
|
||||
If m_pArea(m_isel).Y > m_OriginalImage.Height Then ' - (ClientSize.Height / m_ZoomFactor) Then
|
||||
m_pArea(m_isel).Y = m_OriginalImage.Height '- (ClientSize.Height / m_ZoomFactor)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub DrawingBoard_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
If Not PanMode Then
|
||||
EndPoint = New Point(e.X, e.Y)
|
||||
If Selected_Rectangle = Nothing Then Exit Sub
|
||||
ZoomSelection()
|
||||
PanMode = True
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ZoomSelection()
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
Try
|
||||
|
||||
Dim NewOrigin As New Point(CInt(Me.Origin.X + (Selected_Rectangle.X / ZoomFactor)), _
|
||||
Me.Origin.Y + (Selected_Rectangle.Y / ZoomFactor))
|
||||
|
||||
Dim NewFactor As Double
|
||||
If Selected_Rectangle.Width > Selected_Rectangle.Height Then
|
||||
NewFactor = (ClientSize.Width / (Selected_Rectangle.Width / ZoomFactor))
|
||||
Else
|
||||
NewFactor = (ClientSize.Height / (Selected_Rectangle.Height / ZoomFactor))
|
||||
End If
|
||||
|
||||
Me.Origin = NewOrigin
|
||||
Me.ZoomFactor = NewFactor
|
||||
|
||||
Catch ex As Exception
|
||||
Throw ex
|
||||
End Try
|
||||
Selected_Rectangle = Nothing
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub ImageViewer_MouseWheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel
|
||||
If Not ZoomOnMouseWheel Then Exit Sub
|
||||
'set new zoomfactor
|
||||
If e.Delta > 0 Then
|
||||
ZoomImage(True, e.Location)
|
||||
ElseIf e.Delta < 0 Then
|
||||
ZoomImage(False, e.Location)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub RotateFlip(ByVal RotateFlipType As System.Drawing.RotateFlipType)
|
||||
If m_OriginalImage Is Nothing Then Exit Sub
|
||||
m_OriginalImage.RotateFlip(RotateFlipType)
|
||||
Me.Invalidate()
|
||||
End Sub
|
||||
|
||||
Public Sub New()
|
||||
' This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
' Add any initialization after the InitializeComponent() call.
|
||||
Me.SetStyle(ControlStyles.AllPaintingInWmPaint, True)
|
||||
Me.SetStyle(ControlStyles.DoubleBuffer, True)
|
||||
ReDim m_pCaliH(4)
|
||||
ReDim m_pCaliCorner(4)
|
||||
ReDim m_pCaliCornerH(4)
|
||||
End Sub
|
||||
|
||||
Private Sub DrawingBoard_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
|
||||
Me.ComputeDrawingArea()
|
||||
If Me.StretchImageToFit Then Me.Invalidate()
|
||||
End Sub
|
||||
|
||||
Private Sub DrawingBoard_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
|
||||
|
||||
End Sub
|
||||
Public Sub SetPuntoCorner(ByVal i As Integer, ByVal x As Double, ByVal y As Double)
|
||||
If i >= 0 And i < 4 Then
|
||||
m_pCaliCorner(i).X = x
|
||||
m_pCaliCorner(i).Y = y
|
||||
End If
|
||||
End Sub
|
||||
Public Sub SetPuntoCornerH(ByVal i As Integer, ByVal x As Double, ByVal y As Double)
|
||||
If i >= 0 And i < 4 Then
|
||||
m_pCaliCornerH(i).X = x
|
||||
m_pCaliCornerH(i).Y = y
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Public Sub SetPuntoH(ByVal i As Integer, ByVal x As Double, ByVal y As Double)
|
||||
If i >= 0 And i < 4 Then
|
||||
m_pCaliH(i).X = x
|
||||
m_pCaliH(i).Y = y
|
||||
End If
|
||||
End Sub
|
||||
Public Function GetXCorner(ByVal i As Integer) As Integer
|
||||
GetXCorner = m_pCaliCorner(i).X
|
||||
End Function
|
||||
Public Function GetYCorner(ByVal i As Integer) As Integer
|
||||
GetYCorner = m_pCaliCorner(i).Y
|
||||
End Function
|
||||
Public Function GetXCornerH(ByVal i As Integer) As Integer
|
||||
GetXCornerH = m_pCaliCornerH(i).X
|
||||
End Function
|
||||
Public Function GetYCornerH(ByVal i As Integer) As Integer
|
||||
GetYCornerH = m_pCaliCornerH(i).Y
|
||||
End Function
|
||||
Public Function GetXHpx(ByVal i As Integer) As Integer
|
||||
GetXHpx = m_pCaliH(i).X
|
||||
End Function
|
||||
Public Function GetYHpx(ByVal i As Integer) As Integer
|
||||
GetYHpx = m_pCaliH(i).Y
|
||||
End Function
|
||||
Public Sub SetPuntoArea(ByVal i As Integer, ByVal x As Double, ByVal y As Double)
|
||||
If i >= 0 And i < 4 Then
|
||||
m_pArea(i).X = x
|
||||
m_pArea(i).Y = y
|
||||
End If
|
||||
End Sub
|
||||
Public Sub SetArea(x1 As Double, y1 As Double, x2 As Double, y2 As Double)
|
||||
m_pArea(0).X = x1
|
||||
m_pArea(0).Y = y1
|
||||
m_pArea(1).X = x2
|
||||
m_pArea(1).Y = y1
|
||||
m_pArea(2).X = x2
|
||||
m_pArea(2).Y = y2
|
||||
m_pArea(3).X = x1
|
||||
m_pArea(3).Y = y2
|
||||
End Sub
|
||||
|
||||
Public Function GetXPArea(ByVal i As Integer) As Integer
|
||||
Return m_pArea(i).X
|
||||
End Function
|
||||
|
||||
Public Function GetYPArea(ByVal i As Integer) As Integer
|
||||
Return m_pArea(i).Y
|
||||
End Function
|
||||
|
||||
Public Sub GetArea(ByRef x1 As Double, ByRef y1 As Double, ByRef x2 As Double, ByRef y2 As Double)
|
||||
x1 = m_pArea(0).X
|
||||
y1 = m_pArea(0).Y
|
||||
x2 = m_pArea(2).X
|
||||
y2 = m_pArea(2).Y
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
|
||||
+87
@@ -0,0 +1,87 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
|
||||
Partial Class ImageControl
|
||||
Inherits System.Windows.Forms.UserControl
|
||||
|
||||
'UserControl overrides dispose to clean up the component list.
|
||||
<System.Diagnostics.DebuggerNonUserCode()> _
|
||||
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
|
||||
If disposing AndAlso components IsNot Nothing Then
|
||||
components.Dispose()
|
||||
End If
|
||||
MyBase.Dispose(disposing)
|
||||
End Sub
|
||||
|
||||
'Required by the Windows Form Designer
|
||||
Private components As System.ComponentModel.IContainer
|
||||
|
||||
'NOTE: The following procedure is required by the Windows Form Designer
|
||||
'It can be modified using the Windows Form Designer.
|
||||
'Do not modify it using the code editor.
|
||||
<System.Diagnostics.DebuggerStepThrough()> _
|
||||
Private Sub InitializeComponent()
|
||||
Me.VScrollBar1 = New System.Windows.Forms.VScrollBar
|
||||
Me.HScrollBar1 = New System.Windows.Forms.HScrollBar
|
||||
Me.DrawingBoard1 = New DrawingBoard
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'VScrollBar1
|
||||
'
|
||||
Me.VScrollBar1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.VScrollBar1.Enabled = False
|
||||
Me.VScrollBar1.LargeChange = 20
|
||||
Me.VScrollBar1.Location = New System.Drawing.Point(325, 0)
|
||||
Me.VScrollBar1.Name = "VScrollBar1"
|
||||
Me.VScrollBar1.Size = New System.Drawing.Size(17, 239)
|
||||
Me.VScrollBar1.TabIndex = 1
|
||||
'
|
||||
'HScrollBar1
|
||||
'
|
||||
Me.HScrollBar1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
|
||||
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
|
||||
Me.HScrollBar1.Enabled = False
|
||||
Me.HScrollBar1.LargeChange = 20
|
||||
Me.HScrollBar1.Location = New System.Drawing.Point(0, 239)
|
||||
Me.HScrollBar1.Name = "HScrollBar1"
|
||||
Me.HScrollBar1.Size = New System.Drawing.Size(326, 17)
|
||||
Me.HScrollBar1.TabIndex = 2
|
||||
'
|
||||
'DrawingBoard1
|
||||
'
|
||||
Me.DrawingBoard1.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.DrawingBoard1.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
|
||||
Me.DrawingBoard1.Image = Nothing
|
||||
Me.DrawingBoard1.initialimage = Nothing
|
||||
Me.DrawingBoard1.Location = New System.Drawing.Point(0, 0)
|
||||
Me.DrawingBoard1.MouseEnaBled = False
|
||||
Me.DrawingBoard1.Name = "DrawingBoard1"
|
||||
Me.DrawingBoard1.Origin = New System.Drawing.Point(0, 0)
|
||||
Me.DrawingBoard1.PanButton = System.Windows.Forms.MouseButtons.Middle
|
||||
Me.DrawingBoard1.PanMode = True
|
||||
Me.DrawingBoard1.Size = New System.Drawing.Size(322, 236)
|
||||
Me.DrawingBoard1.StretchImageToFit = False
|
||||
Me.DrawingBoard1.TabIndex = 0
|
||||
Me.DrawingBoard1.VisPuntiCaliH = False
|
||||
Me.DrawingBoard1.VisPuntiCorner = False
|
||||
Me.DrawingBoard1.ZoomFactor = 1
|
||||
Me.DrawingBoard1.ZoomOnMouseWheel = True
|
||||
'
|
||||
'ImageControl
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.Controls.Add(Me.HScrollBar1)
|
||||
Me.Controls.Add(Me.VScrollBar1)
|
||||
Me.Controls.Add(Me.DrawingBoard1)
|
||||
Me.Name = "ImageControl"
|
||||
Me.Size = New System.Drawing.Size(343, 257)
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents DrawingBoard1 As DrawingBoard
|
||||
Friend WithEvents VScrollBar1 As System.Windows.Forms.VScrollBar
|
||||
Friend WithEvents HScrollBar1 As System.Windows.Forms.HScrollBar
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,120 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=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>
|
||||
@@ -0,0 +1,234 @@
|
||||
<System.Runtime.InteropServices.ComVisible(False)>
|
||||
Public Class ImageControl
|
||||
|
||||
Public Event PointSelected(n As Integer)
|
||||
Public Event PointUnselected()
|
||||
Public Event NewMousePosImage(pima As PointF)
|
||||
|
||||
Private m_ScrollVisible As Boolean = True
|
||||
|
||||
Public Sub New()
|
||||
|
||||
' This call is required by the Windows Form Designer.
|
||||
InitializeComponent()
|
||||
|
||||
' Add any initialization after the InitializeComponent() call.
|
||||
End Sub
|
||||
|
||||
#Region "Public Properties"
|
||||
Public ReadOnly Property DBoard() As DrawingBoard
|
||||
Get
|
||||
Return DrawingBoard1
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Property PanMode() As Boolean
|
||||
Get
|
||||
Return DrawingBoard1.PanMode
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
DrawingBoard1.PanMode = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property PanButton() As System.Windows.Forms.MouseButtons
|
||||
Get
|
||||
Return DrawingBoard1.PanButton
|
||||
End Get
|
||||
Set(ByVal value As System.Windows.Forms.MouseButtons)
|
||||
DrawingBoard1.PanButton = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property ZoomOnMouseWheel() As Boolean
|
||||
Get
|
||||
Return DrawingBoard1.ZoomOnMouseWheel
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
DrawingBoard1.ZoomOnMouseWheel = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property ZoomFactor() As Double
|
||||
Get
|
||||
Return DrawingBoard1.ZoomFactor
|
||||
End Get
|
||||
Set(ByVal value As Double)
|
||||
DrawingBoard1.ZoomFactor = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property Origin() As System.Drawing.Point
|
||||
Get
|
||||
Return DrawingBoard1.Origin
|
||||
End Get
|
||||
Set(ByVal value As System.Drawing.Point)
|
||||
DrawingBoard1.Origin = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property StretchImageToFit() As Boolean
|
||||
Get
|
||||
Return Me.DrawingBoard1.StretchImageToFit
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
Me.DrawingBoard1.StretchImageToFit = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Property MouseEnabled() As Boolean
|
||||
Get
|
||||
Return Me.DrawingBoard1.MouseEnaBled
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
Me.DrawingBoard1.MouseEnaBled = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public ReadOnly Property ApparentImageSize() As System.Drawing.Size
|
||||
Get
|
||||
Return DrawingBoard1.ApparentImageSize
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public Sub fittoscreen()
|
||||
Me.DrawingBoard1.fittoscreen()
|
||||
End Sub
|
||||
|
||||
Public Sub InvertColors()
|
||||
Me.DrawingBoard1.InvertColors()
|
||||
End Sub
|
||||
|
||||
Public Sub ZoomIn()
|
||||
Me.DrawingBoard1.ZoomIn()
|
||||
End Sub
|
||||
|
||||
Public Sub ZoomOut()
|
||||
Me.DrawingBoard1.ZoomOut()
|
||||
End Sub
|
||||
|
||||
Public Property ScrollbarsVisible() As Boolean
|
||||
Get
|
||||
Return m_ScrollVisible
|
||||
End Get
|
||||
Set(ByVal value As Boolean)
|
||||
m_ScrollVisible = value
|
||||
Me.HScrollBar1.Visible = value
|
||||
Me.VScrollBar1.Visible = value
|
||||
If value = False Then
|
||||
Me.DrawingBoard1.Dock = DockStyle.Fill
|
||||
Else
|
||||
Me.DrawingBoard1.Dock = DockStyle.None
|
||||
Me.DrawingBoard1.Location = New Point(0, 0)
|
||||
Me.DrawingBoard1.Width = ClientSize.Width - VScrollBar1.Width
|
||||
Me.DrawingBoard1.Height = ClientSize.Height - HScrollBar1.Height
|
||||
|
||||
End If
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
#Region "Public/Private Shadows"
|
||||
Public Shadows Property Image() As System.Drawing.Image
|
||||
Get
|
||||
Return DrawingBoard1.Image
|
||||
End Get
|
||||
Set(ByVal Value As System.Drawing.Image)
|
||||
DrawingBoard1.Image = Value
|
||||
If Value Is Nothing Then
|
||||
HScrollBar1.Enabled = False
|
||||
VScrollBar1.Enabled = False
|
||||
Exit Property
|
||||
End If
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Shadows Property initialimage() As System.Drawing.Image
|
||||
Get
|
||||
Return DrawingBoard1.initialimage
|
||||
End Get
|
||||
Set(ByVal value As System.Drawing.Image)
|
||||
DrawingBoard1.initialimage = value
|
||||
If value Is Nothing Then
|
||||
HScrollBar1.Enabled = False
|
||||
VScrollBar1.Enabled = False
|
||||
Exit Property
|
||||
End If
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Public Shadows Property BackgroundImage() As System.Drawing.Image
|
||||
Get
|
||||
Return DrawingBoard1.BackgroundImage
|
||||
End Get
|
||||
Set(ByVal Value As System.Drawing.Image)
|
||||
DrawingBoard1.BackgroundImage = Value
|
||||
If Value Is Nothing Then
|
||||
HScrollBar1.Enabled = False
|
||||
VScrollBar1.Enabled = False
|
||||
Exit Property
|
||||
End If
|
||||
End Set
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
Public Sub RotateFlip(ByVal RotateFlipType As System.Drawing.RotateFlipType)
|
||||
DrawingBoard1.RotateFlip(RotateFlipType)
|
||||
End Sub
|
||||
|
||||
Private Sub DrawingBoard1_NewMousePosImage(pm As System.Drawing.PointF) Handles DrawingBoard1.NewMousePosImage
|
||||
RaiseEvent NewMousePosImage(pm)
|
||||
End Sub
|
||||
|
||||
Private Sub DrawingBoard1_PointSelected(n As Integer) Handles DrawingBoard1.PointSelected
|
||||
RaiseEvent PointSelected(n)
|
||||
End Sub
|
||||
|
||||
Private Sub DrawingBoard1_PointUnselected() Handles DrawingBoard1.PointUnselected
|
||||
RaiseEvent PointUnselected()
|
||||
End Sub
|
||||
|
||||
' DISATTIVO il richimao alla ScrollBar: Handles DrawingBoard1.SetScrollPositions
|
||||
Private Sub DrawingBoard1_SetScrollPositions()
|
||||
|
||||
Dim DrawingWidth As Integer = DrawingBoard1.Image.Width
|
||||
Dim DrawingHeight As Integer = DrawingBoard1.Image.Height
|
||||
Dim OriginX As Integer = DrawingBoard1.Origin.X
|
||||
Dim OriginY As Integer = DrawingBoard1.Origin.Y
|
||||
Dim FactoredCtrlWidth As Integer = DrawingBoard1.Width / DrawingBoard1.ZoomFactor
|
||||
Dim FactoredCtrlHeight As Integer = DrawingBoard1.Height / DrawingBoard1.ZoomFactor
|
||||
HScrollBar1.Maximum = Me.DrawingBoard1.Image.Width
|
||||
VScrollBar1.Maximum = Me.DrawingBoard1.Image.Height
|
||||
|
||||
If FactoredCtrlWidth >= DrawingBoard1.Image.Width Or StretchImageToFit Then
|
||||
HScrollBar1.Enabled = False
|
||||
HScrollBar1.Value = 0
|
||||
Else
|
||||
HScrollBar1.LargeChange = FactoredCtrlWidth
|
||||
HScrollBar1.Enabled = True
|
||||
HScrollBar1.Value = OriginX
|
||||
End If
|
||||
|
||||
If FactoredCtrlHeight >= DrawingBoard1.Image.Height Or StretchImageToFit Then
|
||||
VScrollBar1.Enabled = False
|
||||
VScrollBar1.Value = 0
|
||||
Else
|
||||
VScrollBar1.Enabled = True
|
||||
VScrollBar1.LargeChange = FactoredCtrlHeight
|
||||
VScrollBar1.Value = OriginY
|
||||
End If
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub ScrollBar_ValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles HScrollBar1.ValueChanged, VScrollBar1.ValueChanged
|
||||
Me.DrawingBoard1.Origin = New Point(HScrollBar1.Value, VScrollBar1.Value)
|
||||
End Sub
|
||||
|
||||
Private Sub DrawingBoard1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DrawingBoard1.Load
|
||||
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,57 @@
|
||||
Imports system.io
|
||||
Imports system.io.path
|
||||
Imports system.Drawing
|
||||
Imports System.Windows.Forms
|
||||
Imports IPadLibrary.FormsInterfaces
|
||||
|
||||
Public Module MainModule
|
||||
Public Enum statoGenEnum
|
||||
StatoOk = 0
|
||||
ErroreCfg = 1
|
||||
ErroreCalibrazione = 2
|
||||
ErroreSconosciuto = 3
|
||||
End Enum
|
||||
|
||||
Public bExtended As Boolean
|
||||
Public bBtnLoad As Boolean
|
||||
Public KeyBoard As KeyboradControl = New KeyboradControl()
|
||||
Public NumPad As NumericPad = New NumericPad()
|
||||
Public SaveDir As String
|
||||
Public SaveLogDir As String
|
||||
Public FileLensCalib As String
|
||||
Public FileCalibProsp As String
|
||||
Public FileCalibRes As String
|
||||
Public DirTmp As String
|
||||
Public SpessLastra As Double
|
||||
Public CorrezioneAutomatica As Boolean = False
|
||||
Public RichiestaFoto As Boolean = False
|
||||
Public ModalitaNascosta As Boolean = False
|
||||
Public StatoGenerale As statoGenEnum = statoGenEnum.StatoOk
|
||||
Public RichiestaBackGround As Boolean = False
|
||||
Public SogliaPercentuale As Double = 0.0
|
||||
Public RichiestaBordi As Boolean = False
|
||||
Public CameraID As String = ""
|
||||
Public bEnableBorder As Boolean = False
|
||||
' per gestione ventose:
|
||||
Public VacFileStart As String
|
||||
Public VacFilePos As String
|
||||
Public VacFileEnd As String
|
||||
Public VacDirModels As String
|
||||
Public VacuumCheckEnable As Boolean = False
|
||||
Public VaacumCheckReq As Boolean = False
|
||||
Public VacMinScore As Double = 0.75
|
||||
Public VacTolmm As Double = 30
|
||||
Public FocalLength As Double = 0
|
||||
Public LensCalibType As Integer
|
||||
|
||||
Public IndexProc As String = String.Empty
|
||||
|
||||
Public Function CancelDir(ByVal inPath As String) As Boolean
|
||||
Try
|
||||
Kill(inPath & "\*.*")
|
||||
Catch e As Exception
|
||||
End Try
|
||||
Return True
|
||||
End Function
|
||||
|
||||
End Module
|
||||
+44
@@ -0,0 +1,44 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Il codice è stato generato da uno strumento.
|
||||
' Versione runtime:4.0.30319.42000
|
||||
'
|
||||
' Le modifiche apportate a questo file possono provocare un comportamento non corretto e andranno perse se
|
||||
' il codice viene rigenerato.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
|
||||
Namespace My
|
||||
|
||||
'NOTA: questo file è generato automaticamente e non può essere modificato direttamente. Per apportare modifiche
|
||||
' o se vengono rilevati errori di compilazione nel file, passare a Creazione progetti
|
||||
' (aprire le proprietà del progetto o fare doppio clic sul nodo Progetti personali in
|
||||
' Esplora soluzioni) e apportare le modifiche nella scheda Applicazione.
|
||||
'
|
||||
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.FrmMain
|
||||
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
|
||||
@@ -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>FrmMain</MainForm>
|
||||
<SingleInstance>false</SingleInstance>
|
||||
<ShutdownMode>0</ShutdownMode>
|
||||
<EnableVisualStyles>true</EnableVisualStyles>
|
||||
<AuthenticationMode>0</AuthenticationMode>
|
||||
<MinimumSplashScreenDisplayTime>0</MinimumSplashScreenDisplayTime>
|
||||
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
|
||||
<HighDpiMpde>false</HighDpiMpde>
|
||||
</MyApplicationData>
|
||||
@@ -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("CameraMng")>
|
||||
<Assembly: AssemblyDescription("")>
|
||||
<Assembly: AssemblyCompany("")>
|
||||
<Assembly: AssemblyProduct("CameraMng")>
|
||||
<Assembly: AssemblyCopyright("Copyright © 2015-2025 by Egalware s.r.l.")>
|
||||
<Assembly: AssemblyTrademark("")>
|
||||
|
||||
<Assembly: ComVisible(False)>
|
||||
|
||||
'The following GUID is for the ID of the typelib if this project is exposed to COM
|
||||
<Assembly: Guid("3687c0c5-d406-4ba3-9f5b-29b857d3b251")>
|
||||
|
||||
' 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("2.7.9.1")>
|
||||
<Assembly: AssemblyFileVersion("2.7.9.1")>
|
||||
+293
@@ -0,0 +1,293 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' Il codice è stato generato da uno strumento.
|
||||
' Versione runtime:4.0.30319.42000
|
||||
'
|
||||
' Le modifiche apportate a questo file possono provocare un comportamento non corretto e andranno perse se
|
||||
' il codice viene rigenerato.
|
||||
' </auto-generated>
|
||||
'------------------------------------------------------------------------------
|
||||
|
||||
Option Strict On
|
||||
Option Explicit On
|
||||
|
||||
Imports System
|
||||
|
||||
Namespace My.Resources
|
||||
|
||||
'Questa classe è stata generata automaticamente dalla classe StronglyTypedResourceBuilder.
|
||||
'tramite uno strumento quale ResGen o Visual Studio.
|
||||
'Per aggiungere o rimuovere un membro, modificare il file con estensione ResX ed eseguire nuovamente ResGen
|
||||
'con l'opzione /str oppure ricompilare il progetto VS.
|
||||
'''<summary>
|
||||
''' Classe di risorse fortemente tipizzata per la ricerca di stringhe localizzate e così via.
|
||||
'''</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>
|
||||
''' Restituisce l'istanza di ResourceManager nella cache utilizzata da questa classe.
|
||||
'''</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("Resources", GetType(Resources).Assembly)
|
||||
resourceMan = temp
|
||||
End If
|
||||
Return resourceMan
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Esegue l'override della proprietà CurrentUICulture del thread corrente per tutte le
|
||||
''' ricerche di risorse eseguite utilizzando questa classe di risorse fortemente tipizzata.
|
||||
'''</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
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property _25_tape() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("25_tape", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property _exit() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("exit", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property accept() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("accept", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Blocchetti() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("Blocchetti", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property bordo() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("bordo", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property bordo2() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("bordo2", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Calibrazione() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("Calibrazione", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Cfg() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("Cfg", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Correction() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("Correction", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property cross() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("cross", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property DefAree() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("DefAree", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property refresh_111075() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("refresh_111075", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property refresh_1110751() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("refresh_1110751", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property RefreshDir() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("RefreshDir", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property Spessore() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("Spessore", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property ventosa2() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("ventosa2", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property warning() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("warning", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property zoom_all_img() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("zoom_all_img", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property zoom_all_img1() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("zoom_all_img1", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property zoom_in_img() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("zoom_in_img", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property zoom_out_img() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("zoom_out_img", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property zoom_window_img() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("zoom_window_img", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
|
||||
'''<summary>
|
||||
''' Cerca una risorsa localizzata di tipo System.Drawing.Bitmap.
|
||||
'''</summary>
|
||||
Friend ReadOnly Property zoom_window_img1() As System.Drawing.Bitmap
|
||||
Get
|
||||
Dim obj As Object = ResourceManager.GetObject("zoom_window_img1", resourceCulture)
|
||||
Return CType(obj,System.Drawing.Bitmap)
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -0,0 +1,190 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<assembly alias="System.Windows.Forms" name="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
|
||||
<data name="exit" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\exit.jpg;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="zoom_all_img1" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\zoom_all_img1.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Blocchetti" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Blocchetti.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Correction" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Correction.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="zoom_in_img" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\zoom_in_img.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="zoom_window_img1" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\zoom_window_img.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="ventosa2" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\ventosa2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="zoom_window_img" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\zoom_window_img.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Cfg" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Cfg.jpg;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="bordo2" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\bordo2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="25_tape" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\25_tape.png;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="refresh_111075" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\refresh_111075.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="zoom_all_img" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\zoom_all_img.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="DefAree" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\DefAree.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Spessore" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Spessore.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="Calibrazione" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\Calibrazione.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="bordo" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\bordo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="zoom_out_img" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\zoom_out_img.bmp;System.Drawing.Bitmap, System.Drawing, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="RefreshDir" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\RefreshDir.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="refresh_1110751" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\refresh_1110751.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="accept" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\accept.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="cross" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\cross.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
<data name="warning" type="System.Resources.ResXFileRef, System.Windows.Forms">
|
||||
<value>..\Resources\warning.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
|
||||
</data>
|
||||
</root>
|
||||
+73
@@ -0,0 +1,73 @@
|
||||
'------------------------------------------------------------------------------
|
||||
' <auto-generated>
|
||||
' This code was generated by a tool.
|
||||
' Runtime Version:4.0.30319.225
|
||||
'
|
||||
' 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", "10.0.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(ByVal sender As Global.System.Object, ByVal 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.My.MySettings
|
||||
Get
|
||||
Return Global.My.MySettings.Default
|
||||
End Get
|
||||
End Property
|
||||
End Module
|
||||
End Namespace
|
||||
@@ -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>
|
||||
@@ -0,0 +1,48 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<asmv1:assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1" xmlns:asmv1="urn:schemas-microsoft-com:asm.v1" xmlns:asmv2="urn:schemas-microsoft-com:asm.v2" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
|
||||
<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 node will disable file and registry virtualization.
|
||||
If you want to utilize File and Registry Virtualization for backward
|
||||
compatibility then delete the requestedExecutionLevel node.
|
||||
-->
|
||||
<requestedExecutionLevel level="asInvoker" uiAccess="false" />
|
||||
</requestedPrivileges>
|
||||
</security>
|
||||
</trustInfo>
|
||||
|
||||
<compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
|
||||
<application>
|
||||
<!-- A list of all Windows versions that this application is designed to work with. Windows will automatically select the most compatible environment.-->
|
||||
|
||||
<!-- If your application is designed to work with Windows 7, uncomment the following supportedOS node-->
|
||||
<!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}"/>-->
|
||||
|
||||
</application>
|
||||
</compatibility>
|
||||
|
||||
<!-- 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>-->
|
||||
|
||||
</asmv1:assembly>
|
||||
@@ -0,0 +1,119 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : Observer.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Option Explicit On
|
||||
Imports System
|
||||
Imports System.Runtime.InteropServices
|
||||
|
||||
|
||||
|
||||
Public Interface Observer
|
||||
Sub update(ByVal from As Observable, ByVal msg As Integer, ByVal data As Integer)
|
||||
End Interface
|
||||
|
||||
|
||||
|
||||
Public Class Observable
|
||||
Private m_numof_ob As Integer
|
||||
|
||||
Private m_observers() As Observer
|
||||
|
||||
|
||||
Public Sub New()
|
||||
m_numof_ob = -1 ' ArraySize = 0
|
||||
End Sub
|
||||
|
||||
Protected Overrides Sub Finalize()
|
||||
deleteObservers()
|
||||
End Sub
|
||||
|
||||
'// Add an observer.
|
||||
Public Sub addObserver(ByVal ob As Object)
|
||||
|
||||
m_numof_ob = m_numof_ob + 1
|
||||
ReDim Preserve m_observers(m_numof_ob)
|
||||
m_observers(m_numof_ob) = ob
|
||||
|
||||
End Sub
|
||||
|
||||
'// Delete an observer .
|
||||
Public Sub deleteObserver(ByVal ob As Observer)
|
||||
|
||||
Dim iCnt As Integer
|
||||
|
||||
If m_numof_ob <= 0 Then
|
||||
|
||||
ReDim m_observers(-1)
|
||||
m_numof_ob = -1
|
||||
|
||||
Else
|
||||
For iCnt = 0 To m_numof_ob
|
||||
If m_observers(iCnt) Is ob Then
|
||||
Do
|
||||
m_observers(iCnt) = m_observers(iCnt + 1)
|
||||
iCnt = iCnt + 1
|
||||
Loop Until iCnt = m_numof_ob
|
||||
End If
|
||||
Next
|
||||
|
||||
m_observers(m_numof_ob) = Nothing
|
||||
m_numof_ob = m_numof_ob - 1
|
||||
ReDim Preserve m_observers(m_numof_ob)
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'// Notify to observers.
|
||||
Public Sub notifyObservers(ByVal msg As Integer, Optional ByVal data As Integer = 0)
|
||||
Exit Sub
|
||||
Dim iCnt As Integer
|
||||
|
||||
For iCnt = m_numof_ob To 0 Step -1
|
||||
|
||||
m_observers(iCnt).update(Me, msg, data)
|
||||
iCnt = iCnt - 1
|
||||
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub deleteObservers()
|
||||
Dim icnt As Integer
|
||||
|
||||
For icnt = 0 To m_numof_ob
|
||||
m_observers(icnt) = Nothing
|
||||
Next
|
||||
|
||||
' Set the number of observer as 0.
|
||||
m_numof_ob = 0
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Function countObservers() As Integer
|
||||
Return m_numof_ob
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
@@ -0,0 +1,207 @@
|
||||
'/******************************************************************************
|
||||
'* *
|
||||
'* PROJECT : EOS Digital Software Development Kit EDSDK *
|
||||
'* NAME : Processor.vb *
|
||||
'* *
|
||||
'* Description: This is the Sample code to show the usage of EDSDK. *
|
||||
'* *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* *
|
||||
'* Written and developed by Camera Design Dept.53 *
|
||||
'* Copyright Canon Inc. 2006 All Rights Reserved *
|
||||
'* *
|
||||
'*******************************************************************************
|
||||
'* File Update Information: *
|
||||
'* DATE Identify Comment *
|
||||
'* ----------------------------------------------------------------------- *
|
||||
'* 06-03-22 F-001 create first version. *
|
||||
'* *
|
||||
'******************************************************************************/
|
||||
|
||||
Imports System.Object
|
||||
Imports System.Threading
|
||||
Imports System.Collections
|
||||
|
||||
|
||||
Public Class Processor
|
||||
|
||||
Protected thread As Thread
|
||||
|
||||
|
||||
'// Flag for this thread running or not
|
||||
Protected running As Boolean
|
||||
|
||||
'// queue
|
||||
Protected queue As New Queue
|
||||
|
||||
'// End application command
|
||||
Protected closeCommand As Command
|
||||
|
||||
'// Sync object
|
||||
Protected ReadOnly syncObject As New Object
|
||||
|
||||
|
||||
Public Sub New()
|
||||
Me.running = False
|
||||
Me.closeCommand = Nothing
|
||||
Me.thread = New Thread(AddressOf run)
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Overrides Sub Finalize()
|
||||
clear()
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
'// Set end application command
|
||||
Public Sub setCloseCommand(ByVal closeCommand As Command)
|
||||
Me.closeCommand = closeCommand
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub enqueue(ByVal command As Command)
|
||||
|
||||
If IsNothing(command) = True Then
|
||||
End
|
||||
End If
|
||||
|
||||
Try
|
||||
Monitor.Enter(syncObject)
|
||||
|
||||
Me.queue.Enqueue(command)
|
||||
|
||||
Monitor.PulseAll(syncObject)
|
||||
|
||||
Finally
|
||||
Monitor.Exit(syncObject)
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Sub stopTh()
|
||||
|
||||
Try
|
||||
Monitor.Enter(syncObject)
|
||||
|
||||
Me.running = False
|
||||
|
||||
Monitor.PulseAll(syncObject)
|
||||
|
||||
Finally
|
||||
|
||||
Monitor.Exit(syncObject)
|
||||
|
||||
End Try
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub join()
|
||||
thread.Join()
|
||||
thread = Nothing
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub clear()
|
||||
|
||||
Monitor.Enter(syncObject)
|
||||
|
||||
Try
|
||||
|
||||
Me.queue.Clear()
|
||||
|
||||
Finally
|
||||
|
||||
Monitor.Exit(syncObject)
|
||||
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
Public Sub start()
|
||||
|
||||
Me.thread.Start()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Sub run()
|
||||
|
||||
Me.running = True
|
||||
|
||||
While Me.running
|
||||
|
||||
System.Threading.Thread.Sleep(1)
|
||||
|
||||
Dim command As Command = take()
|
||||
|
||||
If IsNothing(command) = False Then
|
||||
|
||||
Dim complete As Boolean = command.execute()
|
||||
|
||||
If complete = False Then
|
||||
' >Retry
|
||||
' When a command execution failed with DeviceBusy or some errors,
|
||||
' and you want to set some retrying sequence, you should sleep _
|
||||
' about 500 micro seconds because it makes camera unstable.
|
||||
thread.Sleep(500)
|
||||
|
||||
enqueue(command)
|
||||
Else
|
||||
command = Nothing
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
End While
|
||||
|
||||
'// Clear the queue.
|
||||
clear()
|
||||
|
||||
'// End application
|
||||
If IsNothing(closeCommand) = False Then
|
||||
Me.closeCommand.execute()
|
||||
Me.closeCommand = Nothing
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
'//take a command from the queue
|
||||
Protected Function take() As Command
|
||||
|
||||
Dim command As Command = Nothing
|
||||
|
||||
|
||||
Try
|
||||
Monitor.Enter(syncObject)
|
||||
|
||||
'// Wait when the queue is empty.
|
||||
While queue.Count = 0 And running = True
|
||||
Monitor.Wait(syncObject)
|
||||
End While
|
||||
|
||||
|
||||
If running = True Then
|
||||
command = queue.Dequeue()
|
||||
End If
|
||||
|
||||
Monitor.PulseAll(syncObject)
|
||||
|
||||
Finally
|
||||
Monitor.Exit(syncObject)
|
||||
End Try
|
||||
|
||||
|
||||
Return command
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
End Class
|
||||
Binary file not shown.
|
After Width: | Height: | Size: 436 B |
Binary file not shown.
|
After Width: | Height: | Size: 6.3 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 6.8 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 804 B |
Binary file not shown.
|
After Width: | Height: | Size: 7.7 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 6.8 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 3.3 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 388 B |
Binary file not shown.
|
After Width: | Height: | Size: 3.4 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.6 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 3.3 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 2.7 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.7 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 843 B |
Binary file not shown.
|
After Width: | Height: | Size: 372 B |
Binary file not shown.
|
After Width: | Height: | Size: 681 B |
Binary file not shown.
|
After Width: | Height: | Size: 681 B |
Binary file not shown.
|
After Width: | Height: | Size: 4.6 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.5 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.6 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.6 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.6 KiB |
Binary file not shown.
|
After Width: | Height: | Size: 1.6 KiB |
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user