Egalware/EgtDemo1
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

EgtDemo1 :

Browse Source 
- aggiustamenti vari.
This commit is contained in:
Dario Sassi
2014-09-15 07:10:22 +00:00
parent f65cd11ec5
commit 93a1ae32d8
9 changed files with 358 additions and 291 deletions
Download Patch File Download Diff File Expand all files Collapse all files
EgtDemo1.sln
+9 -9
View File
@@ -1,7 +1,7 @@
Microsoft Visual Studio Solution File, Format Version 11.00
# Visual Studio 2010
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EgtDemo1", "EgtDemo1.vbproj", "{4981572C-8513-45F2-941D-2CBC8AFBA90C}"
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "EgtDemo1", "EgtDemo1.vbproj", "{BCF99EAE-E9DE-4678-AAD8-F52C19383930}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
@@ -11,14 +11,14 @@ Global
Release|x86 = Release|x86
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Debug|x64.ActiveCfg = Debug|x64
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Debug|x64.Build.0 = Debug|x64
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Debug|x86.ActiveCfg = Debug|x86
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Debug|x86.Build.0 = Debug|x86
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Release|x64.ActiveCfg = Release|x64
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Release|x64.Build.0 = Release|x64
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Release|x86.ActiveCfg = Release|x86
{4981572C-8513-45F2-941D-2CBC8AFBA90C}.Release|x86.Build.0 = Release|x86
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Debug|x64.ActiveCfg = Debug|x64
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Debug|x64.Build.0 = Debug|x64
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Debug|x86.ActiveCfg = Debug|x86
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Debug|x86.Build.0 = Debug|x86
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Release|x64.ActiveCfg = Release|x64
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Release|x64.Build.0 = Release|x64
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Release|x86.ActiveCfg = Release|x86
{BCF99EAE-E9DE-4678-AAD8-F52C19383930}.Release|x86.Build.0 = Release|x86
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EgtDemo1.vbproj
+5 -6
View File
@@ -6,7 +6,7 @@
<ProductVersion>
</ProductVersion>
<SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>{4981572C-8513-45F2-941D-2CBC8AFBA90C}</ProjectGuid>
<ProjectGuid>{BCF99EAE-E9DE-4678-AAD8-F52C19383930}</ProjectGuid>
<OutputType>WinExe</OutputType>
<StartupObject>EgtDemo1.My.MyApplication</StartupObject>
<RootNamespace>EgtDemo1</RootNamespace>
@@ -29,7 +29,7 @@
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
<PlatformTarget>x86</PlatformTarget>
<DebugType>None</DebugType>
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
@@ -64,11 +64,10 @@
<OutputPath>bin\x64\Release\</OutputPath>
<Optimize>true</Optimize>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<DebugType>None</DebugType>
<DebugType>pdbonly</DebugType>
<PlatformTarget>x64</PlatformTarget>
<CodeAnalysisIgnoreBuiltInRuleSets>false</CodeAnalysisIgnoreBuiltInRuleSets>
<CodeAnalysisIgnoreBuiltInRules>false</CodeAnalysisIgnoreBuiltInRules>
<CodeAnalysisFailOnMissingRules>false</CodeAnalysisFailOnMissingRules>
</PropertyGroup>
<ItemGroup>
<Reference Include="EgtUILib, Version=1.5.9.1, Culture=neutral, processorArchitecture=x86">
@@ -145,8 +144,8 @@
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<PropertyGroup>
<PostBuildEvent>copy \EgtDev\EgtDemo1\bin\Release\EgtDemo1.exe \EgtProg\EgtDemo1-32bit\EgtDemo1.exe
copy \EgtDev\EgtDemo1\bin\x64\Release\EgtDemo1.exe \EgtProg\EgtDemo1-64bit\EgtDemo1.exe</PostBuildEvent>
<PostBuildEvent>copy \EgtDev\EgtDemo1\bin\release\EgtDemo1.exe \EgtProg\EgtDemo1-32bit\EgtDemo1.exe
copy \EgtDev\EgtDemo1\bin\x64\release\EgtDemo1.exe \EgtProg\EgtDemo1-64bit\EgtDemo1.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.
Form1.Designer.vb
Generated
+134 -228
View File
@@ -1,5 +1,5 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class MainForm
Partial Class Form1
Inherits System.Windows.Forms.Form
'Form esegue l'override del metodo Dispose per pulire l'elenco dei componenti.
@@ -22,290 +22,196 @@ Partial Class MainForm
'Non modificarla nell'editor del codice.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
Me.ToolStripContainer1 = New System.Windows.Forms.ToolStripContainer()
Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.BtnZoom1 = New EgtUILib.btnZoom()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.rbView2 = New System.Windows.Forms.RadioButton()
Me.rbView1 = New System.Windows.Forms.RadioButton()
Me.CmdExec = New EgtUILib.cmdExec()
Me.BtnLookFrom1 = New EgtUILib.btnLookFrom()
Me.BtnRendering1 = New EgtUILib.btnRendering()
Me.CmdExport = New EgtUILib.cmdExport()
Me.CmdImport = New EgtUILib.cmdImport()
Me.CmdSave = New EgtUILib.cmdSave()
Me.CmdOpen = New EgtUILib.cmdOpen()
Me.CmdNew = New EgtUILib.cmdNew()
Me.Scene1 = New EgtUILib.Scene()
Me.Scene2 = New EgtUILib.Scene()
Me.Panel2 = New System.Windows.Forms.Panel()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.RadioButton2 = New System.Windows.Forms.RadioButton()
Me.RadioButton1 = New System.Windows.Forms.RadioButton()
Me.TsZoom1 = New EgtUILib.tsZoom()
Me.TslookFrom1 = New EgtUILib.tsLookFrom()
Me.TsMain1 = New EgtUILib.tsMain()
Me.TsRendering1 = New EgtUILib.tsRendering()
Me.TsLookFrom1 = New EgtUILib.tsLookFrom()
Me.ToolStripContainer1.ContentPanel.SuspendLayout()
Me.ToolStripContainer1.TopToolStripPanel.SuspendLayout()
Me.ToolStripContainer1.SuspendLayout()
Me.TableLayoutPanel1.SuspendLayout()
Me.Panel1.SuspendLayout()
Me.GroupBox1.SuspendLayout()
Me.Panel2.SuspendLayout()
Me.SuspendLayout()
'
'ToolStripContainer1
'
Me.ToolStripContainer1.BottomToolStripPanelVisible = False
'
'ToolStripContainer1.ContentPanel
'
Me.ToolStripContainer1.ContentPanel.Controls.Add(Me.TableLayoutPanel1)
Me.ToolStripContainer1.ContentPanel.Margin = New System.Windows.Forms.Padding(2)
Me.ToolStripContainer1.ContentPanel.Size = New System.Drawing.Size(656, 279)
Me.ToolStripContainer1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ToolStripContainer1.Location = New System.Drawing.Point(0, 0)
Me.ToolStripContainer1.Margin = New System.Windows.Forms.Padding(2)
Me.ToolStripContainer1.Name = "ToolStripContainer1"
Me.ToolStripContainer1.Size = New System.Drawing.Size(681, 304)
Me.ToolStripContainer1.TabIndex = 0
Me.ToolStripContainer1.Text = "ToolStripContainer1"
'
'ToolStripContainer1.TopToolStripPanel
'
Me.ToolStripContainer1.TopToolStripPanel.Controls.Add(Me.TsZoom1)
Me.ToolStripContainer1.TopToolStripPanel.Controls.Add(Me.TsMain1)
Me.ToolStripContainer1.TopToolStripPanel.Controls.Add(Me.TsRendering1)
Me.ToolStripContainer1.TopToolStripPanel.Controls.Add(Me.TsLookFrom1)
'
'TableLayoutPanel1
'
Me.TableLayoutPanel1.ColumnCount = 3
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 50.0!))
Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle())
Me.TableLayoutPanel1.Controls.Add(Me.StatusStrip1, 0, 2)
Me.TableLayoutPanel1.Controls.Add(Me.Panel1, 2, 1)
Me.TableLayoutPanel1.Controls.Add(Me.Scene1, 0, 1)
Me.TableLayoutPanel1.Controls.Add(Me.Scene2, 1, 1)
Me.TableLayoutPanel1.Controls.Add(Me.Panel2, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.Scene1, 0, 0)
Me.TableLayoutPanel1.Controls.Add(Me.Scene2, 1, 0)
Me.TableLayoutPanel1.Controls.Add(Me.GroupBox1, 2, 0)
Me.TableLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.TableLayoutPanel1.Location = New System.Drawing.Point(0, 0)
Me.TableLayoutPanel1.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.TableLayoutPanel1.Margin = New System.Windows.Forms.Padding(2)
Me.TableLayoutPanel1.Name = "TableLayoutPanel1"
Me.TableLayoutPanel1.RowCount = 3
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle())
Me.TableLayoutPanel1.RowCount = 1
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
Me.TableLayoutPanel1.RowStyles.Add(New System.Windows.Forms.RowStyle())
Me.TableLayoutPanel1.Size = New System.Drawing.Size(652, 419)
Me.TableLayoutPanel1.Size = New System.Drawing.Size(656, 279)
Me.TableLayoutPanel1.TabIndex = 0
'
'StatusStrip1
'
Me.TableLayoutPanel1.SetColumnSpan(Me.StatusStrip1, 3)
Me.StatusStrip1.Location = New System.Drawing.Point(0, 397)
Me.StatusStrip1.Name = "StatusStrip1"
Me.StatusStrip1.Padding = New System.Windows.Forms.Padding(1, 0, 9, 0)
Me.StatusStrip1.Size = New System.Drawing.Size(652, 22)
Me.StatusStrip1.TabIndex = 0
Me.StatusStrip1.Text = "StatusStrip1"
'
'Panel1
'
Me.Panel1.AutoSize = True
Me.Panel1.Controls.Add(Me.BtnZoom1)
Me.Panel1.Controls.Add(Me.GroupBox1)
Me.Panel1.Controls.Add(Me.CmdExec)
Me.Panel1.Controls.Add(Me.BtnLookFrom1)
Me.Panel1.Controls.Add(Me.BtnRendering1)
Me.Panel1.Controls.Add(Me.CmdExport)
Me.Panel1.Controls.Add(Me.CmdImport)
Me.Panel1.Controls.Add(Me.CmdSave)
Me.Panel1.Controls.Add(Me.CmdOpen)
Me.Panel1.Controls.Add(Me.CmdNew)
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel1.Location = New System.Drawing.Point(480, 36)
Me.Panel1.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(170, 359)
Me.Panel1.TabIndex = 2
'
'BtnZoom1
'
Me.BtnZoom1.Location = New System.Drawing.Point(2, 157)
Me.BtnZoom1.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.BtnZoom1.Name = "BtnZoom1"
Me.BtnZoom1.Size = New System.Drawing.Size(167, 44)
Me.BtnZoom1.TabIndex = 11
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.rbView2)
Me.GroupBox1.Controls.Add(Me.rbView1)
Me.GroupBox1.Location = New System.Drawing.Point(6, 3)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(156, 38)
Me.GroupBox1.TabIndex = 10
Me.GroupBox1.TabStop = False
'
'rbView2
'
Me.rbView2.AutoSize = True
Me.rbView2.Location = New System.Drawing.Point(88, 15)
Me.rbView2.Name = "rbView2"
Me.rbView2.Size = New System.Drawing.Size(54, 17)
Me.rbView2.TabIndex = 1
Me.rbView2.TabStop = True
Me.rbView2.Text = "View2"
Me.rbView2.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.rbView2.UseVisualStyleBackColor = False
'
'rbView1
'
Me.rbView1.AutoSize = True
Me.rbView1.Location = New System.Drawing.Point(11, 15)
Me.rbView1.Name = "rbView1"
Me.rbView1.Size = New System.Drawing.Size(54, 17)
Me.rbView1.TabIndex = 0
Me.rbView1.TabStop = True
Me.rbView1.Text = "View1"
Me.rbView1.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.rbView1.UseVisualStyleBackColor = False
'
'CmdExec
'
Me.CmdExec.Location = New System.Drawing.Point(114, 76)
Me.CmdExec.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.CmdExec.Name = "CmdExec"
Me.CmdExec.Size = New System.Drawing.Size(50, 23)
Me.CmdExec.TabIndex = 9
'
'BtnLookFrom1
'
Me.BtnLookFrom1.Location = New System.Drawing.Point(2, 207)
Me.BtnLookFrom1.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.BtnLookFrom1.Name = "BtnLookFrom1"
Me.BtnLookFrom1.Size = New System.Drawing.Size(167, 69)
Me.BtnLookFrom1.TabIndex = 8
'
'BtnRendering1
'
Me.BtnRendering1.Location = New System.Drawing.Point(2, 106)
Me.BtnRendering1.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.BtnRendering1.Name = "BtnRendering1"
Me.BtnRendering1.Size = New System.Drawing.Size(167, 44)
Me.BtnRendering1.TabIndex = 7
'
'CmdExport
'
Me.CmdExport.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.CmdExport.Location = New System.Drawing.Point(60, 76)
Me.CmdExport.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.CmdExport.Name = "CmdExport"
Me.CmdExport.Size = New System.Drawing.Size(50, 23)
Me.CmdExport.TabIndex = 4
'
'CmdImport
'
Me.CmdImport.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.CmdImport.Location = New System.Drawing.Point(6, 76)
Me.CmdImport.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.CmdImport.Name = "CmdImport"
Me.CmdImport.Size = New System.Drawing.Size(50, 23)
Me.CmdImport.TabIndex = 3
'
'CmdSave
'
Me.CmdSave.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.CmdSave.Location = New System.Drawing.Point(114, 49)
Me.CmdSave.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.CmdSave.Name = "CmdSave"
Me.CmdSave.Size = New System.Drawing.Size(50, 23)
Me.CmdSave.TabIndex = 2
'
'CmdOpen
'
Me.CmdOpen.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.CmdOpen.Location = New System.Drawing.Point(60, 49)
Me.CmdOpen.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.CmdOpen.Name = "CmdOpen"
Me.CmdOpen.Size = New System.Drawing.Size(50, 23)
Me.CmdOpen.TabIndex = 1
'
'CmdNew
'
Me.CmdNew.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.CmdNew.Location = New System.Drawing.Point(6, 49)
Me.CmdNew.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.CmdNew.Name = "CmdNew"
Me.CmdNew.Size = New System.Drawing.Size(50, 23)
Me.CmdNew.TabIndex = 0
'
'Scene1
'
Me.Scene1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.Scene1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Scene1.Location = New System.Drawing.Point(3, 37)
Me.Scene1.Location = New System.Drawing.Point(2, 2)
Me.Scene1.Margin = New System.Windows.Forms.Padding(2)
Me.Scene1.Name = "Scene1"
Me.Scene1.Size = New System.Drawing.Size(233, 357)
Me.Scene1.TabIndex = 3
Me.Scene1.Size = New System.Drawing.Size(302, 275)
Me.Scene1.TabIndex = 0
'
'Scene2
'
Me.Scene2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.Scene2.Dock = System.Windows.Forms.DockStyle.Fill
Me.Scene2.Location = New System.Drawing.Point(242, 37)
Me.Scene2.Location = New System.Drawing.Point(308, 2)
Me.Scene2.Margin = New System.Windows.Forms.Padding(2)
Me.Scene2.Name = "Scene2"
Me.Scene2.Size = New System.Drawing.Size(233, 357)
Me.Scene2.TabIndex = 4
Me.Scene2.Size = New System.Drawing.Size(302, 275)
Me.Scene2.TabIndex = 1
'
'Panel2
'GroupBox1
'
Me.Panel2.AutoSize = True
Me.TableLayoutPanel1.SetColumnSpan(Me.Panel2, 3)
Me.Panel2.Controls.Add(Me.TsZoom1)
Me.Panel2.Controls.Add(Me.TslookFrom1)
Me.Panel2.Controls.Add(Me.TsRendering1)
Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel2.Location = New System.Drawing.Point(2, 2)
Me.Panel2.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.Panel2.Name = "Panel2"
Me.Panel2.Size = New System.Drawing.Size(648, 30)
Me.Panel2.TabIndex = 5
Me.GroupBox1.AutoSize = True
Me.GroupBox1.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
Me.GroupBox1.Controls.Add(Me.RadioButton2)
Me.GroupBox1.Controls.Add(Me.RadioButton1)
Me.GroupBox1.Location = New System.Drawing.Point(614, 2)
Me.GroupBox1.Margin = New System.Windows.Forms.Padding(2)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Padding = New System.Windows.Forms.Padding(2)
Me.GroupBox1.Size = New System.Drawing.Size(39, 68)
Me.GroupBox1.TabIndex = 2
Me.GroupBox1.TabStop = False
'
'RadioButton2
'
Me.RadioButton2.AutoSize = True
Me.RadioButton2.Location = New System.Drawing.Point(4, 34)
Me.RadioButton2.Margin = New System.Windows.Forms.Padding(2)
Me.RadioButton2.Name = "RadioButton2"
Me.RadioButton2.Size = New System.Drawing.Size(31, 17)
Me.RadioButton2.TabIndex = 1
Me.RadioButton2.TabStop = True
Me.RadioButton2.Text = "2"
Me.RadioButton2.UseVisualStyleBackColor = True
'
'RadioButton1
'
Me.RadioButton1.AutoSize = True
Me.RadioButton1.Location = New System.Drawing.Point(4, 14)
Me.RadioButton1.Margin = New System.Windows.Forms.Padding(2)
Me.RadioButton1.Name = "RadioButton1"
Me.RadioButton1.Size = New System.Drawing.Size(31, 17)
Me.RadioButton1.TabIndex = 0
Me.RadioButton1.TabStop = True
Me.RadioButton1.Text = "1"
Me.RadioButton1.UseVisualStyleBackColor = True
'
'TsZoom1
'
Me.TsZoom1.Location = New System.Drawing.Point(93, 2)
Me.TsZoom1.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.TsZoom1.Anchor = System.Windows.Forms.AnchorStyles.None
Me.TsZoom1.Dock = System.Windows.Forms.DockStyle.None
Me.TsZoom1.Location = New System.Drawing.Point(384, 0)
Me.TsZoom1.Name = "TsZoom1"
Me.TsZoom1.Size = New System.Drawing.Size(100, 27)
Me.TsZoom1.TabIndex = 1
Me.TsZoom1.Size = New System.Drawing.Size(81, 25)
Me.TsZoom1.TabIndex = 2
Me.TsZoom1.Text = "TsZoom1"
'
'TslookFrom1
'TsMain1
'
Me.TslookFrom1.AutoSize = True
Me.TslookFrom1.Location = New System.Drawing.Point(196, 1)
Me.TslookFrom1.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.TslookFrom1.Name = "TslookFrom1"
Me.TslookFrom1.Size = New System.Drawing.Size(151, 27)
Me.TslookFrom1.TabIndex = 4
Me.TsMain1.Anchor = System.Windows.Forms.AnchorStyles.None
Me.TsMain1.Dock = System.Windows.Forms.DockStyle.None
Me.TsMain1.Location = New System.Drawing.Point(3, 0)
Me.TsMain1.Name = "TsMain1"
Me.TsMain1.Size = New System.Drawing.Size(150, 25)
Me.TsMain1.TabIndex = 0
Me.TsMain1.Text = "TsMain1"
'
'TsRendering1
'
Me.TsRendering1.Location = New System.Drawing.Point(1, 1)
Me.TsRendering1.Margin = New System.Windows.Forms.Padding(1, 1, 1, 1)
Me.TsRendering1.Anchor = System.Windows.Forms.AnchorStyles.None
Me.TsRendering1.Dock = System.Windows.Forms.DockStyle.None
Me.TsRendering1.Location = New System.Drawing.Point(303, 0)
Me.TsRendering1.Name = "TsRendering1"
Me.TsRendering1.Size = New System.Drawing.Size(88, 27)
Me.TsRendering1.TabIndex = 4
Me.TsRendering1.Size = New System.Drawing.Size(81, 25)
Me.TsRendering1.TabIndex = 1
Me.TsRendering1.Text = "TsRendering1"
'
'MainForm
'TsLookFrom1
'
Me.TsLookFrom1.Anchor = System.Windows.Forms.AnchorStyles.None
Me.TsLookFrom1.Dock = System.Windows.Forms.DockStyle.None
Me.TsLookFrom1.Location = New System.Drawing.Point(153, 0)
Me.TsLookFrom1.Name = "TsLookFrom1"
Me.TsLookFrom1.Size = New System.Drawing.Size(150, 25)
Me.TsLookFrom1.TabIndex = 3
'
'Form1
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(652, 419)
Me.Controls.Add(Me.TableLayoutPanel1)
Me.Margin = New System.Windows.Forms.Padding(2, 2, 2, 2)
Me.Name = "MainForm"
Me.Text = "EgalTech Interface 1"
Me.ClientSize = New System.Drawing.Size(681, 304)
Me.Controls.Add(Me.ToolStripContainer1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Margin = New System.Windows.Forms.Padding(2)
Me.Name = "Form1"
Me.Text = "Form1"
Me.ToolStripContainer1.ContentPanel.ResumeLayout(False)
Me.ToolStripContainer1.TopToolStripPanel.ResumeLayout(False)
Me.ToolStripContainer1.TopToolStripPanel.PerformLayout()
Me.ToolStripContainer1.ResumeLayout(False)
Me.ToolStripContainer1.PerformLayout()
Me.TableLayoutPanel1.ResumeLayout(False)
Me.TableLayoutPanel1.PerformLayout()
Me.Panel1.ResumeLayout(False)
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.Panel2.ResumeLayout(False)
Me.Panel2.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents ToolStripContainer1 As System.Windows.Forms.ToolStripContainer
Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents CmdOpen As EgtUILib.cmdOpen
Friend WithEvents CmdNew As EgtUILib.cmdNew
Friend WithEvents CmdSave As EgtUILib.cmdSave
Friend WithEvents CmdImport As EgtUILib.cmdImport
Friend WithEvents CmdExport As EgtUILib.cmdExport
Friend WithEvents CmdExec As EgtUILib.cmdExec
Friend WithEvents TsRendering1 As EgtUILib.tsRendering
Friend WithEvents TslookFrom1 As EgtUILib.tsLookFrom
Friend WithEvents BtnRendering1 As EgtUILib.btnRendering
Friend WithEvents BtnLookFrom1 As EgtUILib.btnLookFrom
Friend WithEvents BtnZoom1 As EgtUILib.btnZoom
Friend WithEvents Scene1 As EgtUILib.Scene
Friend WithEvents Scene2 As EgtUILib.Scene
Friend WithEvents GroupBox1 As System.Windows.Forms.GroupBox
Friend WithEvents rbView2 As System.Windows.Forms.RadioButton
Friend WithEvents rbView1 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton2 As System.Windows.Forms.RadioButton
Friend WithEvents RadioButton1 As System.Windows.Forms.RadioButton
Friend WithEvents TsMain1 As EgtUILib.tsMain
Friend WithEvents TsRendering1 As EgtUILib.tsRendering
Friend WithEvents TsZoom1 As EgtUILib.tsZoom
Friend WithEvents Panel2 As System.Windows.Forms.Panel
Friend WithEvents TsLookFrom1 As EgtUILib.tsLookFrom
End Class
Form1.resx
+167 -3
View File
@@ -117,10 +117,174 @@
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<metadata name="TsZoom1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>304, 17</value>
</metadata>
<metadata name="TsMain1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
<metadata name="TsRendering1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>139, 17</value>
</metadata>
<metadata name="TsLookFrom1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>433, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAQAMDAAAAAACACoDgAARgAAACAgAAAAAAgAqAgAAO4OAAAYGAAAAAAIAMgGAACWFwAAEBAAAAAA
CABoBQAAXh4AACgAAAAwAAAAYAAAAAEACAAAAAAAAAkAAAAAAAAAAAAAAAEAAAABAAAAAAAAfDwGAFE2
NwAYVTEAGVo1ABteOQAdYj0AbkMhAGRIPgAcGlwALCVZAD00XgAXH34AHmdBACBrRQAqaUYAIW5IACNz
TAAmelQAMnZTADN5VgA1flsAPXtbAC5teABCclYAeGNrAIVABgCERAsAiEQKAIlIDQCDRxQAjE0RAI5Q
EwCRUhUAk1UYAJZZGgCYXR0AmmAfAIhYKACQXCYAnGMiAJtlLACZaCwAn2cyAJ1tMwCbcD4AoGgmAKJs
KgCmcS0AoGwwAKVyNACpdTEAp3k2AKx6NACndDgAqXU5AKd6PACsezoAn29FAK59QgApg1sANYNeACyL
YwA2imYALpBoADKUawA2mnIAN6N5AFSHawBEmXYAZJV7AEOlfwCvgToAsoM7ALWIPwCtgUIAsIJCALaK
QQC4jUIAsoVJALWKSwC4jUwAvJFFALyUSgC/mEwAtYpSALiOVQCwg1oAvZVXAJ6IbACxhmIAvJdhALyV
bAC/mW8AsZF4AMGZSwDDnVcAxqJYAMGbZQDGomQAyaVhAMyqZQDEo20AzKpqAMakcwDLqnIAxaN5AMqs
egDUt3gAAw6DABEZggAGFJwACxqoAA4dsAAQH7AAHz2pABYmuAA2P60AJje+ACdWkgApRaUAOESwAEdy
pgBvcasAHS7BAB8wwgAlNsgALD7QACxAzwA4SMoANVXMAC5C0gA1SNYAOVDeAD5g3wA9VuAAQE/KAENR
zQBHV9cAUV/XAE9o3gBTYtsATXDcAFZ02gBhb98AZHTcAEJc4gBGZuUAVmniAExy6ABVd+gAZXjlAHF+
5wA5rIIAPbKHAEirhQBRrIgARrSMAEi8kwBWuZcAbKiNAGivkgBouJkAdbmdAFicrgB+uaEAV8KcAFvH
oQBlyaYAcMysAGrQrgBv0bAAedS1AHiH2AB7ltwAWoPrAGaJ6QB3iuoAaJHsAHWY7gBrmPAAdZ3wAHqm
8wCckZUAg7WfAIy6pQCQvqoAqKKpAMenhwDOtI4A1ruDANC4kACXxrMAg9m8AKPEtACwy70A3MOFANbE
lADhy4wA48+RAObTlQDXxKMA3c21ANrSuQDg1L8Ah5jeAIKb7gCAn/AAiaHiAJWr4ACVs+EAgqz0AIi2
9gCTufYAqbrkALW95gCJ3cIAkdvCAL7XzgCN4MUAluPKAJ3o0QCk6tQAsu7bALTx3wCVxfkAntP9AKrC
4wC2wucAvdDhAKDL+gCq1fsAs9z9ALvy4QDH184A3dXEAMba0wDT29cA4M/AAOHRwgDi3tsA4eDeAMLL
6QDG0+cA0tjpAMHa+wDd5ucAyvTnANPs/gDp6OcA8PDwAPXx7QDq7PQA9PTzAPj39wD///8ASUlJSUlJ
SUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSf//////////////////////
//////////////////////////////////////9JSf//////////////////////////////////////
//////////////////////9JSf//////////////////////////////////////////////////////
//////9JSf////////////////////////////////////////////////////////////9JSf//////
//////////////////////////////////////////////////////9JSf//////////////////////
//////////////////////////////////////9JSf//////////////////////////////////////
//////////////////////9JSf//////////////////////////////////////////////////////
//////9JSf////////////////////////////////////////////////////////////9JSf//////
//////////////////////////////////////////77+e/w/v////9JSf//////////////////////
//////////////////////v58O/Kye/+//////9JSf//////////////////////////////////////
/vnw7+7KycrJ7/////////9JSf//////////////////////////////////+/DuysrKysrKysru////
//////9JSf/////////////////////////////+8O7JycnKysrKysrKysr///////////9JSf////7/
/////////////////vv57+7JycrKysrKysrKysrKyr3+//////////9JSf///7/J7/v/////////+/nw
78rJysrKysrKysrKysrKysrJvbz+//////////9JSf///71JWGJryfD7++/v7srJysrKysrKysrKysrK
ysrKysq9vbz7//////////9JSf///8xJUVFKUVhYvMrv7srKysrKysrKysrKysrKysrKyr29vbzw////
//////9JSf////5OUVFRUVFRTkpKYr/KycrKysrKysrKysrKysrJvb29vbzv//////////9JSf////9p
TlFRUVFRUVFRUUpKUWu/v8ru7srKysrKysm9vb29vbzK//////////9JSf/////JSlFRUVFRUVFRUVFR
UU5KUWa8vMnu7srKyb29vb29vb3J//////////9JSf/////wTlFRUVFRUVFRUVFRUVFRUVFOTlhdXb3J
vb29vb29vb2///////////9JSf/////7YlFRUVFRUVFRUVFRUVFRUVFRUVFOSmtovb29vb29vb28////
//////9JSf//////vkpRUVFRUVFRUVFRUVFRUVFRUVFWa11dXby9vb29vb28//////////9JSf//////
yk5RUVFRUVFRUVFRUVFRUVFRUVhoaF1dXV1qvb29vb28/v////////9JSf//////8FhRUVFRUVFRUVFR
UVFRUVFRWGhoXV1dXV1dXby9vb28+/////////9JSf///////mdOUVFRUVFRUVFRUVFRUVFRamhdXV1d
XV1dXV1qvb28+f////////9JSf///////75OUVFRUVFRUVFRUVFRUVhoaF1dXV1dXV1dXV1dXWu97///
//////9JSf///////8xRUVFRUVFRUVFRUVFRWGhdXV1dXV1dXV1dXV1dXV1dyv////////9JSf//////
//tYUVFRUVFRUVFRUVFYaGhdXV1dXV1dXV1dXV1dXV1dXcn7//////9JSf////////9dTlFRUVFRUVFR
UVhoaF1dXV1dXV1dXV1dXV1dXV1dXWJr7/////9JSf/////////JSlFRUVFRUVFRWGhoXV1dXV1dXV1d
XV1dXWJiYmJiYmhqvfD///9JSf/////////5SVFRUVFRUU5YaF1dXV1iYmJiYlhiaLy9ycru8Pn7/v7+
/v////9JSf//////////SlFRUVFRUWJramu9v8ru8Pn7/v////////////////////////9JSf//////
////a05RUVFOYsz///////////////////////////////////////9JSf//////////7klRUUpg8P//
//////////////////////////////////////9JSf//////////+0pRTlj7////////////////////
//////////////////////9JSf///////////2ZJVvn/////////////////////////////////////
//////9JSf///////////8lg+/////////////////////////////////////////////9JSf//////
//////nw//////////////////////////////////////////////9JSf//////////////////////
//////////////////////////////////////9JSf//////////////////////////////////////
//////////////////////9JSf//////////////////////////////////////////////////////
//////9JSf////////////////////////////////////////////////////////////9JSf//////
//////////////////////////////////////////////////////9JSf//////////////////////
//////////////////////////////////////9JSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJSUlJ
SUlJSUlJSUlJSUlJSUlJSUlJAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAKAAAACAAAABAAAAAAQAIAAAA
AAAABAAAAAAAAAAAAAAAAQAAAAEAAAAAAAB+PQcARC0zABpbNgAbXjkAHWI9ACZgPgBbQTwAf1MoACki
VAA+NV0AFx59AB5mQAAfaEIAIGtFACJuSAAjc0wAJXdQACZ6UgAoflcAOHNTADt6WQApdmYAMWl4AIRE
CwCJRgsAjEwQAI5QFQCSUxUAklUZAJVZGgCZXR4AmF4iAJxjIgCcay4AnWs8AKBpJgCibCoApXEtAKFv
MwCkbzsApHQyAKl2MwCqeDIApXQ8AKh1OQCsfjoAnnNAAKl3QQCse0YAKoNbACeJXwAtjGQAMopkAC+U
awAzkmoANZtyADuddgA0pHkAN6p+AEWEZABGiWgASI1sAEqUcwBDmXQARp96AEubeQBijnUARKR8AFCh
fwCugDkAsoM9ALiMPwCvgUAArYFIALGERAC2ikEAuI1CALGFTAC0iksAuY5PALyTSgC2jFAAuI1RALSL
WwC3kVIAu5JTALuUWgC+mGkAu5RzAL2ZdQCuoGUApqBoAKmlbQCtq3IAsbJ6AMKbTADCnVcAx6JVAMCc
YwDJpmQA07RuAMWjdADIpnMAy6tyAMKjfQDMrXsAz7F2ANGzdQDRs3wA17t8ANi8egAOFoIABRKaAAwa
pwAQHq0AFia3AB0zugAlMKsAIze4ACtVmQBhZKsAHS3AACAvwQAlNscALT7RADdFxgA2R9QAOVTbAD1V
4QBATskAQ1XNAEhX1ABNYt0AVWTWAF983gBgb98AY33ZAHJ/3wBCW+IASGflAFRp4wBMcugAU3joAGd9
5wA5q4AAPbCFAEebigB2hZwASamEAFOmhABapIUAWKmIAEK2jABHu5EAVbuWAHOiigBmtpkAcr2fAH27
ogBPwZkAWsKdAGDCngBdxqIAZcqmAHPHqQBu0a8AcdCtAG/TsQB10rMAedK0AH/WuQB92boAU5rGAGqH
3AB8jtsAXKDAAGavxgBnssUAW4XsAGmL6AB2h+UAZ5PvAHiX6QBvm/EAd57wAHel8wCFsJsAtryEAMen
gwDLs4QAzbWNANS5hgDOtJoA1LqSANO8mQDVvqIAmsOxAIDXugCE274A3MKDAOHKiwDizpYA5tOVANbA
qADXzLMA3Mu0AN/UvgCAk9sAjqfcAJCj3gCEkesAhafpAJOj7gCHp/EAiLf2AJm/9wCpuOQAid3CAJXd
xAC71swAv9nOAL/M3QCO4MYAl+PLAJzo0ACj6dMAufHfAJfI+gCqzewAtcblAKfL+QCt0foAtNj8ALry
4QDD1cwAxdrRAN/d3QDh1MAA4N/eANTg2QDb4e8AzPXoAMXl/QDe4vEA6OfmAOTn7ADr6uoA8O/uAPPx
7wDr7vUA7/LwAJKSkgD+/v4AAAAAAP///wBMTExMTExMTExMTExMTExMTExMTExMTExMTExMTExMTEz/
//////////////////////////////////////9MTP//////////////////////////////////////
/0xM////////////////////////////////////////TEz/////////////////////////////////
//////9MTP///////////////////////////////////////0xM////////////////////////////
///////5////TEz////////////////////////////57e3EzvX///9MTP/////////////////////5
+fntzs/Pzs/5/////0xM//////////////////Xt+c/Pzs7Ozs7O7f//////TEz//8/t+v/////69fXP
z87Ozs7Ozs7OzsTE//////9MTP//alFov8/t7fXPzs7Ozs7Ozs7Ozs7Dvc///////0xM///1UElNTWBm
asTOzs7Ozs7Ozs7Ow8C/z///////TEz///9YUFBQUExNU1dqwMTOzs/OzsPAwMDO+P////9MTP///79N
UFBQUFBQTVBQV2O9wsTDwMDAwMT1/////0xM////zlFQUFBQUFBQUFBQTU1TZr3CwsDAxPX/////TEz/
///1YVBQUFBQUFBQUFBQV2ZYWGbAwsDD+f////9MTP////VmUFBQUFBQUFBQUFdmZlhYWGa9wsP1////
/0xM/////8RQUFBQUFBQUFBXZmZYWFhYWFhmwPX/////TEz/////z1NQUFBQUFBQV2ZYWFhYWFhYWFhm
xP////9MTP/////1Y1BQUFBQUFdmWFhYWFhYWFhYWFhYbO3//0xM//////psTVBQUE1XZmRYZmZmZmZq
vcDCxMLCz///TEz//////8RNUFBMZMPCwsTOz/XPz+319fn///////9MTP//////7VFQTGj5//n5+v//
/////////////////0xM////////U0xq+f//////////////////////////TEz///////+9aP//////
//////////////////////9MTP////////X1/////////////////////////////0xM////////////
////////////////////////////TEz///////////////////////////////////////9MTP//////
/////////////////////////////////0xM////////////////////////////////////////TExM
TExMTExMTExMTExMTExMTExMTExMTExMTExMTExMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAoAAAAGAAAADAAAAABAAgAAAAAAEAC
AAAAAAAAAAAAAAABAAAAAQAAAAAAAEo0OgAcXzoAHWI8ADArXgAeZkAAHWhDACdiQAAgbEYAIW5IACNz
TAAtc08AJXZQACV6UwApfVcAMXhWADh8XQAtYm4AfGdeAGBXfQCBQQkAgUINAINFDwCIRw0Ah0gNAIdJ
EgCNTRIAik0VAIxQFwCMVhsAkVIVAJJUFgCWWRsAmV4eAJFaIACWXyEAk14nAJBcKACXYyUAnGMiAJdl
KgCdZSgAnWwuAIxjNQCabDoAoG4nAKFqKACibywApXEuAKNyMwCrejQApXI9AKN1PACtfj0AqXdBAKx8
RgCqekwAKoNbAC2KYgA1jWgAPo5sAD+VcQAymnAANaF3AEaIZwBIjm0AU4NnAFOPcwBLlHQATZt6AGOT
eQBGoXwAr4E7ALWIPgCvgEMAroJLALGCQQCziEIAuI1EALOFTQC/lUgArINQAKiCVwCugFgAtotRALaN
UQC2jlgAu5FUAL+ZVAC3kFkAvJRbAL+YXQC9lmUAv5tjAL2ZcwCmoGgAq6hvAK+vdgCytn4AwZpNAMOd
UgDNrGYAxaNtAMajcQDIpnYAxq1yAMurcgDNrXQA0bN3ANG0fgATG4UACBGXAAgWmwAOGaQADRupABEd
qQAQH7AAESCvABMitAAXJ7oAGSa4ABoqvAAgObAAKVOVADtIvgBbWpIAHSvAACEyxAArO8oAP03IADJF
1QA7S9MAOU3dADhoygA8VOAAPljiAERSzQBEU9EAS1zUAEdpzABAdswAUXHNAFl1zwBEY9gASmbeAFJk
0ABNe9AAXn7cAGl23QBCX+MARGTkAEdp5gBLbucATHLoAFRw5gBfcOUAUXXoAFR96gBldeQAbXriAHF+
4gBFk4cAT62HAFCjgABbpYcAVaiGAE2xjABloYYAZqSKAGimiwBhqIoAc6eQAHKrkgB7qZQAc7qeAF7H
ogBqwqIAZsypAG3PrgB3zK4AbtKwAHbVtQBPgMUAW4PIAFmS0ABij8wAf4/ZAHuW2QBXgesAXYftAGmC
6QBijusAdYLiAHCF6QBmlO8AepvjAHOT7QB8le0AbJnwAHWg8gB+rPQAlY+fAJ+rjgC2vYUA172IANW/
nwCE1roAidW7ANrCjgDfyIkA3siTAOPPmgDZyKoA3NG7AOjWogCQm+0Ahp/wAIii4ACUpOQAkqLuAIu4
5ACds+AAkrj2AIvdwgCR3sUAnt3HAKXeygCd588ApOXPAKDn0AC26tkAksD4ALXE5QC4w+cAocb4ALLO
+QCt0/oAttv8ALzy4QC74v4AxtvSAOLTwgDg394A2t/tANne8QDb6OEA3+LoAMby5ADi4OAA6ubgAOrp
6ADw6+UA8O3oAPLz8QD4+PgA////AE5OTk5OTk5OTk5OTk5OTk5OTk5OTk5OTk7/////////////////
////////////Tk7/////////////////////////////Tk7/////////////////////////////Tk7/
///////////////////////9/v//Tk7///////////////////728fHx+v//Tk7///////////////3w
8fHx1dXx/f//Tk7//f////////rxzfHT1c3Nzc3y////Tk7/bFzN8fHxzfHx8c3Nzc3Nzcz6////Tk7/
1VBQUF1nzM3NzfHVzc3NbMzx////Tk7//VZUVE5OVFZcZ8zNzc3MbMzx/v//Tk7//15QVFRUVFRUTk5U
Z2zMzMzN/f//Tk7//81QVFRUVFRUVFRmZ2ZnzMzN/f//Tk7///FWVFRUVFRUVGZnXmZmZ2zN/f//Tk7/
//pmVFRUVFRWZmdeZmZmZmds8v//Tk7///1sTlRUVFZmZ2ZmZ2dlZ2dnavH/Tk7////TUFRUTlxnZWdq
Z15rzc3V1fH/Tk7////xXE5W1fLy9v7/////////////Tk7////6Zk7x////////////////////Tk7/
////zdX/////////////////////Tk7/////////////////////////////Tk7/////////////////
////////////Tk7/////////////////////////////Tk5OTk5OTk5OTk5OTk5OTk5OTk5OTk5OTgAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACgAAAAQAAAAIAAAAAEACAAAAAAAAAEAAAAA
AAAAAAAAAAEAAAABAAAAAAAAVDkoABNfOgASYDkAG2I/ABtlQQAeZkEAGWlEAB11TwAafFAAJH5WADN1
VABtc0YAi0sQAJFSEwCSVBYAmV4aAJhdHgCeZiUAm2grAJxqPAChaiQAo28oAKdyJgCicC0AqnUqAKJt
OAClczUApXA4AKN0PACseTsAqng/AJppQgCjckQArn5EAKl6SAAjg1oAJo1gAHqMWQBDhWUAQ4toAEiK
awBXh20AT5BpAFmNcQBWlXYAXZx/ALOEOwCvgU4AtopPALqQSgCwhFMAtIhYALqQXwCAmWUAvZphAL6Y
ZQCKqXAAwplJAMSfVwDSq1kAxZ9gAMincgDKq3sA3rx6APHQfwAKF44AAxSpAAkatgARILIAFSa9ABgn
ugAaJb8ALjm3AFJvkABrbZ4AS06rABUnxwAdLcEAIjPGADI+xgAkO+IAL0DPADVCwAA1RMsAOUTIAD1J
0gA5WeAAPlriAE9cwwBGWtwAUF7VAE9txQBXZNMAUmXfAFxp2ABicN0ARlvhAEFi5QBHaOYAT3bpAFd9
6gBLkIEASKqEAFyhhABbtZMAXL2YAGGliABczZ0AbsamAHLOrwB51rYAe9uyAF6V8QBije0AeoXmAHmL
6wB+jOoAd430AG6Y8ABwk/sAgYCcAMOhgQDCoYUAxaqDAMmrhgDOsIQAz7WMANK2jACCwagAgs6rAITM
swDaw5cA4MaXAN3HqQDdyakAhZDmAIWf7wCLoe8An6XlAJWv9ACGsP8ArbXyAJfZwwC318kAvd7OAKXk
zgCw6tgAsu3bAIrC/QC9wu8Ap8f4ALvU+QC72/wAvuP+AOjayQDJ59wA8+PHANDV9QDZ3/oA0engAMXy
5ADY+O4A9e7kAOfz7gDm7fwA8vn3AP38+QD5+v8A//7/AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAD///8AMTExMTExMTExMTExMTExMTH//////////////////zEx////////////
//////8xMf////////////+mo6b/MTH/////////pJubm5um/zEx/4ajpqObhoabm4ab//8xMf8/MTg/
hIaGhoZ/m///MTH/hjIxMjExPX9/f4b//zEx//83MTExMTc4OH+G//8xMf+mejIxMTc+Pj4+faD/MTH/
/4YyMjo9Pj44fX2G/zEx//+bMn+kpf////////8xMf//o4b/////////////MTH/////////////////
/zEx//////////////////8xMTExMTExMTExMTExMTExMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=
</value>
</data>
</root>
Form1.vb
+33 -23
View File
@@ -1,43 +1,53 @@
Public Class MainForm
Imports System.Text
Imports EgtUILib.EgtInterface
Imports EgtUILib.GenInterface
Public Class Form1
Private Sub MainForm_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Dim sIniFile As String = Application.StartupPath & "\EgtDemo1.ini"
'Inizializzazione generale di EgtInterface
EgtUILib.EgtInterface.EgtInit(0, "TestEngine.log")
EgtUILib.EgtInterface.EgtSetFont("C:\EgtProg\Fonts", "ModernProp.Nfe")
EgtInit(0, "TestEngine.log")
Dim sKey As String = String.Empty
GetPrivateProfileString("General", "Key", "", sKey, sIniFile)
EgtSetKey(sKey)
Dim sNfeDir As String = String.Empty
GetPrivateProfileString("GeomDB", "NfeFontDir", "", sNfeDir, sIniFile)
Dim sDefFont As String = String.Empty
GetPrivateProfileString("GeomDB", "DefaultFont", "", sDefFont, sIniFile)
EgtSetFont(sNfeDir, sDefFont)
'Impostazioni particolari vista 2
Scene2.SetDefaultMaterial(128, 128, 0)
Scene2.SetViewAttributes(2, True, 16, 16)
Scene2.SetViewBackground(255, 255, 255, 192, 192, 192)
'Inizializzazione delle viste
Scene1.Init()
Scene2.Init()
'Attiva scena 1
rbView1.Checked = True
EnableView(Scene1.GetCtx)
RadioButton1.Checked = True
EnableView(Scene1)
End Sub
Private Sub MainForm_FormClosing(sender As System.Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
'Terminazione generale di EgtInterface
EgtUILib.EgtInterface.EgtExit()
EgtExit()
End Sub
Private Sub rbView1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbView1.CheckedChanged
If rbView1.Checked Then
EnableView(Scene1.GetCtx)
Private Sub RadioButton1_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles RadioButton1.CheckedChanged
If RadioButton1.Checked Then
EnableView(Scene1)
Else
EnableView(Scene2.GetCtx)
EnableView(Scene2)
End If
End Sub
Private Sub EnableView(ByVal nView As Integer)
CmdNew.SetCtx(nView)
CmdOpen.SetCtx(nView)
CmdSave.SetCtx(nView)
CmdImport.SetCtx(nView)
CmdExport.SetCtx(nView)
CmdExec.SetCtx(nView)
BtnRendering1.SetCtx(nView)
BtnZoom1.SetCtx(nView)
BtnLookFrom1.SetCtx(nView)
TsRendering1.SetCtx(nView)
TslookFrom1.SetCtx(nView)
TsZoom1.SetCtx(nView)
Private Sub EnableView(ByRef scene As EgtUILib.Scene)
TsMain1.SetScene(scene)
TsRendering1.SetScene(scene)
TsLookFrom1.SetScene(scene)
TsZoom1.SetScene(scene)
End Sub
End Class
My Project/Application.Designer.vb
Generated
+1 -1
View File
@@ -32,7 +32,7 @@ Namespace My
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.EgtDemo1.MainForm
Me.MainForm = Global.EgtDemo1.Form1
End Sub
End Class
End Namespace
My Project/Application.myapp
+4 -3
View File
@@ -1,10 +1,11 @@
<?xml version="1.0" encoding="utf-16"?>
<?xml version="1.0" encoding="utf-8"?>
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<MySubMain>true</MySubMain>
<MainForm>MainForm</MainForm>
<MainForm>Form1</MainForm>
<SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode>
<ApplicationType>0</ApplicationType>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
</MyApplicationData>
</MyApplicationData>
My Project/AssemblyInfo.vb
+5 -18
View File
@@ -8,22 +8,9 @@ Imports System.Runtime.InteropServices
' Controllare i valori degli attributi dell'assembly
#If PLATFORM = "x64" Then
#If DEBUG Then
<Assembly: AssemblyTitle("EgtDemo1 Debug 64 bit")>
#Else
<Assembly: AssemblyTitle("EgtDemo1 Release 64 bit")>
#End If
#Else
#If DEBUG Then
<Assembly: AssemblyTitle("EgtDemo1 Debug 32 bit")>
#Else
<Assembly: AssemblyTitle("EgtDemo1 Release 32 bit")>
#End If
#End If
<Assembly: AssemblyTitle("EgtDemo1")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")>
<Assembly: AssemblyCompany("EgalTech s.r.l.")>
<Assembly: AssemblyProduct("EgtDemo1")>
<Assembly: AssemblyCopyright("Copyright © 2014")>
<Assembly: AssemblyTrademark("")>
@@ -31,7 +18,7 @@ Imports System.Runtime.InteropServices
<Assembly: ComVisible(False)>
'Se il progetto viene esposto a COM, il GUID seguente verrà utilizzato come ID della libreria dei tipi
<Assembly: Guid("187ccf72-d0a9-47ed-880f-73d60e99c4ea")>
<Assembly: Guid("5986504a-5c9a-4b2f-bba4-01d8d1308b6b")>
' Le informazioni sulla versione di un assembly sono costituite dai seguenti quattro valori:
'
@@ -44,5 +31,5 @@ Imports System.Runtime.InteropServices
' utilizzando l'asterisco (*) come descritto di seguito:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.5.9.1")>
<Assembly: AssemblyFileVersion("1.5.9.1")>
<Assembly: AssemblyVersion("1.5.9.3")>
<Assembly: AssemblyFileVersion("1.5.9.3")>
Resources/EgtDemo1.ico
BIN
View File
Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 8.9 KiB