TestEIn 1.5i2 :

- aggiunti treeview degli oggetti e aboutbox.
2014-09-04 12:39:56 +00:00
parent 960ec01efb
commit 9d43c71eec
11 changed files with 1403 additions and 140 deletions
@@ -0,0 +1,136 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class AboutBox1
+    Inherits System.Windows.Forms.Form
+
+    'Form esegue l'override del metodo Dispose per pulire l'elenco dei componenti.
+    <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
+
+
+    'Richiesto da Progettazione Windows Form
+    Private components As System.ComponentModel.IContainer
+
+    'NOTA: la procedura che segue è richiesta da Progettazione Windows Form
+    'Può essere modificata in Progettazione Windows Form.  
+    'Non modificarla nell'editor del codice.
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+      Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(AboutBox1))
+      Me.LogoPictureBox = New System.Windows.Forms.PictureBox()
+      Me.OKButton = New System.Windows.Forms.Button()
+      Me.LabelCompanyName = New System.Windows.Forms.Label()
+      Me.LabelCopyright = New System.Windows.Forms.Label()
+      Me.LabelVersion = New System.Windows.Forms.Label()
+      Me.LabelProductName = New System.Windows.Forms.Label()
+      CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).BeginInit()
+      Me.SuspendLayout()
+      '
+      'LogoPictureBox
+      '
+      Me.LogoPictureBox.Image = CType(resources.GetObject("LogoPictureBox.Image"), System.Drawing.Image)
+      Me.LogoPictureBox.Location = New System.Drawing.Point(23, 40)
+      Me.LogoPictureBox.Name = "LogoPictureBox"
+      Me.LogoPictureBox.Size = New System.Drawing.Size(52, 52)
+      Me.LogoPictureBox.SizeMode = System.Windows.Forms.PictureBoxSizeMode.CenterImage
+      Me.LogoPictureBox.TabIndex = 0
+      Me.LogoPictureBox.TabStop = False
+      '
+      'OKButton
+      '
+      Me.OKButton.DialogResult = System.Windows.Forms.DialogResult.Cancel
+      Me.OKButton.Location = New System.Drawing.Point(105, 114)
+      Me.OKButton.Name = "OKButton"
+      Me.OKButton.Size = New System.Drawing.Size(75, 19)
+      Me.OKButton.TabIndex = 0
+      Me.OKButton.Text = "&OK"
+      '
+      'LabelCompanyName
+      '
+      Me.LabelCompanyName.Location = New System.Drawing.Point(108, 77)
+      Me.LabelCompanyName.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
+      Me.LabelCompanyName.MaximumSize = New System.Drawing.Size(152, 17)
+      Me.LabelCompanyName.MinimumSize = New System.Drawing.Size(152, 17)
+      Me.LabelCompanyName.Name = "LabelCompanyName"
+      Me.LabelCompanyName.Size = New System.Drawing.Size(152, 17)
+      Me.LabelCompanyName.TabIndex = 0
+      Me.LabelCompanyName.Text = "Nome società"
+      Me.LabelCompanyName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
+      'LabelCopyright
+      '
+      Me.LabelCopyright.Location = New System.Drawing.Point(108, 60)
+      Me.LabelCopyright.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
+      Me.LabelCopyright.MaximumSize = New System.Drawing.Size(152, 17)
+      Me.LabelCopyright.MinimumSize = New System.Drawing.Size(152, 17)
+      Me.LabelCopyright.Name = "LabelCopyright"
+      Me.LabelCopyright.Size = New System.Drawing.Size(152, 17)
+      Me.LabelCopyright.TabIndex = 0
+      Me.LabelCopyright.Text = "Copyright"
+      Me.LabelCopyright.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
+      'LabelVersion
+      '
+      Me.LabelVersion.Location = New System.Drawing.Point(108, 43)
+      Me.LabelVersion.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
+      Me.LabelVersion.MaximumSize = New System.Drawing.Size(152, 17)
+      Me.LabelVersion.MinimumSize = New System.Drawing.Size(152, 17)
+      Me.LabelVersion.Name = "LabelVersion"
+      Me.LabelVersion.Size = New System.Drawing.Size(152, 17)
+      Me.LabelVersion.TabIndex = 0
+      Me.LabelVersion.Text = "Versione"
+      Me.LabelVersion.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
+      'LabelProductName
+      '
+      Me.LabelProductName.Location = New System.Drawing.Point(108, 26)
+      Me.LabelProductName.Margin = New System.Windows.Forms.Padding(6, 0, 3, 0)
+      Me.LabelProductName.MaximumSize = New System.Drawing.Size(152, 17)
+      Me.LabelProductName.MinimumSize = New System.Drawing.Size(152, 17)
+      Me.LabelProductName.Name = "LabelProductName"
+      Me.LabelProductName.Size = New System.Drawing.Size(152, 17)
+      Me.LabelProductName.TabIndex = 0
+      Me.LabelProductName.Text = "Nome prodotto"
+      Me.LabelProductName.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
+      'AboutBox1
+      '
+      Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+      Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+      Me.CancelButton = Me.OKButton
+      Me.ClientSize = New System.Drawing.Size(284, 148)
+      Me.Controls.Add(Me.LogoPictureBox)
+      Me.Controls.Add(Me.OKButton)
+      Me.Controls.Add(Me.LabelCompanyName)
+      Me.Controls.Add(Me.LabelCopyright)
+      Me.Controls.Add(Me.LabelVersion)
+      Me.Controls.Add(Me.LabelProductName)
+      Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
+      Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+      Me.MaximizeBox = False
+      Me.MinimizeBox = False
+      Me.Name = "AboutBox1"
+      Me.Padding = New System.Windows.Forms.Padding(9)
+      Me.ShowInTaskbar = False
+      Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
+      Me.Text = "AboutBox1"
+      Me.TopMost = True
+      CType(Me.LogoPictureBox, System.ComponentModel.ISupportInitialize).EndInit()
+      Me.ResumeLayout(False)
+
+End Sub
+    Friend WithEvents LogoPictureBox As System.Windows.Forms.PictureBox
+    Friend WithEvents OKButton As System.Windows.Forms.Button
+    Friend WithEvents LabelCompanyName As System.Windows.Forms.Label
+    Friend WithEvents LabelCopyright As System.Windows.Forms.Label
+    Friend WithEvents LabelVersion As System.Windows.Forms.Label
+    Friend WithEvents LabelProductName As System.Windows.Forms.Label
+
+End Class
@@ -0,0 +1,419 @@
+<?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.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
+  <data name="LogoPictureBox.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+    <value>
+        Qk3mHwAAAAAAADYAAAAoAAAANAAAADQAAAABABgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////xYVNxYVN////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////xYVNxYVN////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////xYVNxYVN////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////xYVNxYVN////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////xYVNxYVN////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////xYVNxYVN////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////xYVNxYVN////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////xYVNxYVN////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        /////////////////////////////////////////fr59uvm8NvS8NzS/v38////////xYVNxYVN////
+        ////////////////////////////////////////////////////////////////////////////////
+        /////////////////////////////////////////////////////////////////////////vz79+3o
+        8d7V6s7B5cOz5cOz7dXK/v79////////////xYVNxYVN////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        /////////////////////////v39+PDs8uDY69HE5cS05cOz5cOz5cOz5cOz7dXK/v79////////////
+        ////xYVNxYVN////////////////////////////////////////////////////////////////////
+        //////////////////////////////////////////////////////////7++vPv8+Pb7NPH5sW25cOz
+        5cOz5cOz5cOz5cOz5cOz5cOz7tjO//7+////////////////////xYVNxYVN////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////+/Xy9OXe7dbL5sa35cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz7tjO//7+////
+        ////////////////////xYVNxYVN////////////////////////////////////////////////////
+        /////////////////////////////////////////////Pf19efh7tjO58i65cOz5cOz5cOz5cOz5cOz
+        5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz6cy9///+////////////////////////////xYVNxYVN////
+        /////////////////////////////////////////////////////////////////////////////fr4
+        9urk79rR6Mu95cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5MKv
+        3rae////////////////////////////////xYVNxYVN////6tO/+fLr////////////////////////
+        /////////////////////////////fv79+zn8N3U6c3A5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz
+        5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz48Cs2auQ2q2T////////////////////////////
+        ////xYVNxYVN////0qB1xYVNzpdo3beW7NfE+/by/////////////////////v39+O/r8d/X69DD5cO0
+        5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz
+        5cOz48Ct2auQ2auQ2auQ/Pj1////////////////////////////xYVNxYVN////4sKmxYVNxYVNxYVN
+        xYVNxYVO0Jxv37yd7trK8eDX7NLG5sW15cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz
+        5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz4r+r2auQ2auQ2auQ2auQ+O/q////////
+        ////////////////////xYVNxYVN////8uPXxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNyItW2KyJ48Kt
+        58i45cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz
+        5cOz5cOz5cOz4r+r2auQ2auQ2auQ2auQ2auQ9Obe////////////////////////////xYVNxYVN////
+        /v79yY1YxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNyo9c27GR5cSx58e45cOz5cOz5cOz
+        5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cOz5cKy4b2p2auQ2auQ2auQ2auQ2auQ
+        2auQ8N3S////////////////////////////xYVNxYVN////////2KyGxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNzJVl3bWY5ca05sa35cOz5cOz5cOz5cOz5cOz5cOz5cOz
+        5cOz5cOz5cOz5cOz5cKy4b2o2auQ2auQ2auQ2auQ2auQ2auQ2auQ69TG////////////////////////
+        ////xYVNxYVN////////6M+4xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNz5ps3rmd5se15sa25cOz5cOz5cOz5cOz5cOz5cOz5cKz4byn2auQ2auQ2auQ
+        2auQ2auQ2auQ2auQ2auQ58u6////////////////////////////xYVNxYVN////////+PDpxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYZO0p924Lyi5si35sW15cOz5cKz4Lum2auQ2auQ2auQ2auQ2auQ2auQ2auQ2auQ2auQ48Ku////////
+        ////////////////////xYVNxYVN////////////zphoxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxodQ1qaA3red2auP
+        2auQ2auQ2auQ2auQ2auQ2auQ2auQ2auQ2auQ37mi////////////////////////////xYVNxYVN////
+        ////////3rmZxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNx4hS1aWCz5dw16eG2q+U2auQ2auQ2auQ2auQ2auQ2auQ2auQ
+        2auQ27CW////////////////////////////xYVNxYVN////////////7tvLxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNx4lU
+        1aWCz5dwz5dwz5dw0Jlz27KX2auQ2auQ2auQ2auQ2auQ2auQ2auQ2auQ/fv6////////////////////
+        ////xYVNxYVN/////////////Pr3xohRxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNyItV1KSBz5dwz5dwz5dwz5dwz5dwz5dw16mI2q6T
+        2auQ2auQ2auQ2auQ2auQ2auQ+fLu////////////////////////xYVNxYVN////////////////1KR6
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNyItV1KSBz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw0Zp03LKX2auQ2auQ2auQ2auQ2auQ9enh////
+        ////////////////////xYVNxYVN////////////////5MasxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNyY1Z1KF+z5dwz5dwz5dwz5dwz5dwz5dw
+        z5dwz5dwz5dwz5dwz5dw2KqL2qyS2auQ2auQ2auQ8eDW////////////////////////xYVNxYVN////
+        ////////////9OjdxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNyY1Z1KF+z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw0Zx327KX
+        2auQ2auQ7dfK////////////////////////xYVNxYVN///////////////////+ypBcxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNy5Be06B7z5dwz5dwz5dwz5dw
+        z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw2KyN2qyR6M29////////////////////
+        ////xYVNxYVN////////////////////2rGNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNy5Be06B7z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw
+        z5dwz5dwz5dwz5dwz5dw0p555MOu////////////////////////xYVNxYVN////////////////////
+        6tO+xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNzJJj0p55z5dwz5dw
+        z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw37qg
+        +/f0////////////////xYVNxYVN////////////////////+vTvxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNzJJj0p56z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw
+        z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw06B98eDU////////////xYVNxYVN////
+        ////////////////////0JxvxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNzZVo0p55
+        z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw
+        z5dwz5dwz5dwz5dwz5dwz5dw4b6m/Pn3////xYVNxYVN////////////////////////4L2fxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNzZVo0Zx3z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw
+        z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw0Zt21aSD2a2O3bWZ4r+o69TE
+        ////xYVNxYVN////////////////////////8N/RxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        z5hr0Zx3z5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dwz5dw0Jlz1KJ/2KuM3LSY4Lyj5caw
+        6c687dfI8eDV9enh+fLt/fv5////////////////////////////xYVNxYVN////////////////////
+        /////fz6x4pUxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNz5lt0Zp0z5dwz5hx06B816mI3LKW37qh48Ot
+        6M267NXF8N7S9Ofe+PDq/Pn3////////////////////////////////////////////////////////
+        ////////////////////xYVNxYVN////////////////////////////1qiBxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVN0Jxv8eHV9+7n+/bz///+////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////xYVNxYVN////
+        ////////////////////////5sqyxYVNxYVNxYVNxYVNxYVNxYVN0Z9z/Pj1////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////xYVNxYVN////////////////////////////9uzjxYVN
+        xYVNxYVNxYVNxYVN0qB1/Pj1////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////xYVNxYVN////////////////////////////////zJNixYVNxYVNxYVN1KR6/fr4////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////xYVNxYVN////////////////////
+        ////////////3LWTxYVNxYVN1KV7/fr4////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////xYVNxYVN////////////////////////////////7NfFxYVN16qD/vz7////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////xYVNxYVN////
+        ////////////////////////////+/fz16uF/vz7////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////xYVNxYVN////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////xYVNxYVN////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////xYVNxYVN////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////xYVNxYVN////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////xYVNxYVN////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////////////////////////////////////////////////
+        ////////////////////////////////////xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVNxYVN
+        xYVNxYVN
+</value>
+  </data>
+  <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>
@@ -0,0 +1,25 @@
+Public NotInheritable Class AboutBox1
+
+    Private Sub AboutBox1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
+        ' Imposta il titolo del form.
+        Dim ApplicationTitle As String
+        If My.Application.Info.Title <> "" Then
+            ApplicationTitle = My.Application.Info.Title
+        Else
+            ApplicationTitle = System.IO.Path.GetFileNameWithoutExtension(My.Application.Info.AssemblyName)
+        End If
+        Me.Text = String.Format("Informazioni su {0}", ApplicationTitle)
+        ' Inizializza tutto il testo visualizzato nella finestra di dialogo Informazioni su.
+        ' TODO: Personalizzare le informazioni sull'assembly dell'applicazione nel riquadro "Applicazione" 
+        '    della finestra delle proprietà del progetto (accessibile dal menu "Progetto").
+        Me.LabelProductName.Text = My.Application.Info.ProductName
+        Me.LabelVersion.Text = String.Format("Versione {0}", My.Application.Info.Version.ToString)
+        Me.LabelCopyright.Text = My.Application.Info.Copyright
+        Me.LabelCompanyName.Text = My.Application.Info.CompanyName
+    End Sub
+
+    Private Sub OKButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OKButton.Click
+        Me.Close()
+    End Sub
+
+End Class
@@ -20,37 +20,6 @@ Const EgtInterface As String = "EgtInterfaceR32.dll"
 #End If
 #End If

-'API di test
-<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function Summ(ByVal dA As Double, ByVal dB As Double) As Double
-End Function
-<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function Summ2(ByRef dA As Double, ByVal dB As Double) As Boolean
-End Function
-<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function Append(ByVal sA As String, ByRef sB As IntPtr) As Boolean
-End Function
-<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function FreeMemory(ByVal sB As IntPtr) As Boolean
-End Function
-<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function SetPoint(ByRef ptP As Point3d) As Boolean
-End Function
-<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function OutText(ByVal hW As IntPtr, ByVal sA As String) As Boolean
-End Function
-<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function DrawCross(ByVal hW As IntPtr, ByVal nX As Integer, ByVal nY As Integer, ByVal nDim As Integer) As Boolean
-End Function
-
-   Public Shared Function Append(ByVal sA As String, ByRef sB As String) As Boolean
-      Dim sD As IntPtr
-      Dim bOk As Boolean = Append(sA, sD)
-      sB = Marshal.PtrToStringUni(sD)
-      FreeMemory(sD)
-      Return bOk
-   End Function
-
 'API
 'General
 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
@@ -65,6 +34,11 @@ End Function
 Public Shared Function EgtSetFont(ByVal sNfeFontDir As String, ByVal sDefaultFont As String) As Boolean
 End Function

+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtFreeMemory(ByVal sB As IntPtr) As Boolean
+End Function
+
+
 'GeomDB
 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Public Shared Function EgtInitGeomDB() As Integer
@@ -106,6 +80,178 @@ End Function
 Public Shared Function EgtExportStl(ByVal nCtx As Integer, ByVal nId As Integer, ByVal sFilePath As String) As Boolean
 End Function

+
+'GeomDB Objects
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtExistsObj(ByVal nCtx As Integer, ByVal nGroupId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetFirstInGroup(ByVal nCtx As Integer, ByVal nGroupId As Integer) As Integer
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetNext(ByVal nCtx As Integer, ByVal nId As Integer) As Integer
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetLastInGroup(ByVal nCtx As Integer, ByVal nGroupId As Integer) As Integer
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetPrev(ByVal nCtx As Integer, ByVal nId As Integer) As Integer
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetType(ByVal nCtx As Integer, ByVal nId As Integer) As Integer
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Private Shared Function EgtGetTitle(ByVal nCtx As Integer, ByVal nId As Integer, ByRef psTitle As IntPtr) As Boolean
+End Function
+Public Shared Function EgtGetTitle(ByVal nCtx As Integer, ByVal nId As Integer, ByRef sTitle As String) As Boolean
+   Dim psTitle As IntPtr
+   Dim bOk As Boolean = EgtGetTitle(nCtx, nId, psTitle)
+   sTitle = Marshal.PtrToStringUni(psTitle)
+   EgtFreeMemory(psTitle)
+   Return bOk
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Private Shared Function EgtGroupDump(ByVal nCtx As Integer, ByVal nId As Integer, ByRef psDump As IntPtr) As Boolean
+End Function
+Public Shared Function EgtGroupDump(ByVal nCtx As Integer, ByVal nId As Integer, ByRef sDump As String) As Boolean
+   Dim psDump As IntPtr
+   Dim bOk As Boolean = EgtGroupDump(nCtx, nId, psDump)
+   sDump = Marshal.PtrToStringUni(psDump)
+   EgtFreeMemory(psDump)
+   Return bOk
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Private Shared Function EgtGeoObjDump(ByVal nCtx As Integer, ByVal nId As Integer, ByRef psDump As IntPtr) As Boolean
+End Function
+Public Shared Function EgtGeoObjDump(ByVal nCtx As Integer, ByVal nId As Integer, ByRef sDump As String) As Boolean
+   Dim psDump As IntPtr
+   Dim bOk As Boolean = EgtGeoObjDump(nCtx, nId, psDump)
+   sDump = Marshal.PtrToStringUni(psDump)
+   EgtFreeMemory(psDump)
+   Return bOk
+End Function
+
+
+'GeomDB Obj attributes
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtSetLevel(ByVal nCtx As Integer, ByVal nId As Integer, ByVal nLevel As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtRevertLevel(ByVal nCtx As Integer, ByVal nId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetLevel(ByVal nCtx As Integer, ByVal nId As Integer, ByRef nLevel As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetCalcLevel(ByVal nCtx As Integer, ByVal nId As Integer, ByRef nLevel As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtSetMode(ByVal nCtx As Integer, ByVal nId As Integer, ByVal nMode As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtRevertMode(ByVal nCtx As Integer, ByVal nId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetMode(ByVal nCtx As Integer, ByVal nId As Integer, ByRef nMode As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetCalcMode(ByVal nCtx As Integer, ByVal nId As Integer, ByRef nMode As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtSetStatus(ByVal nCtx As Integer, ByVal nId As Integer, ByVal nStat As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtRevertStatus(ByVal nCtx As Integer, ByVal nId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetStatus(ByVal nCtx As Integer, ByVal nId As Integer, ByRef nStat As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetCalcStatus(ByVal nCtx As Integer, ByVal nId As Integer, ByRef nStat As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtSetMark(ByVal nCtx As Integer, ByVal nId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtResetMark(ByVal nCtx As Integer, ByVal nId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetMark(ByVal nCtx As Integer, ByVal nId As Integer, ByRef bMark As Boolean) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtGetCalcMark(ByVal nCtx As Integer, ByVal nId As Integer, ByRef bMark As Boolean) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtSetName(ByVal nCtx As Integer, ByVal nId As Integer, ByVal sName As String) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Private Shared Function EgtGetName(ByVal nCtx As Integer, ByVal nId As Integer, ByRef psName As IntPtr) As Boolean
+End Function
+Public Shared Function EgtGetName(ByVal nCtx As Integer, ByVal nId As Integer, ByRef sName As String) As Boolean
+   Dim psName As IntPtr
+   Dim bOk As Boolean = EgtGetName(nCtx, nId, psName)
+   sName = Marshal.PtrToStringUni(psName)
+   EgtFreeMemory(psName)
+   Return bOk
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtExistsName(ByVal nCtx As Integer, ByVal nId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtRemoveName(ByVal nCtx As Integer, ByVal nId As Integer) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtSetInfo(ByVal nCtx As Integer, ByVal nId As Integer, ByVal sKey As String, ByVal sInfo As String) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Private Shared Function EgtGetInfo(ByVal nCtx As Integer, ByVal nId As Integer, ByVal sKey As String, ByRef psInfo As IntPtr) As Boolean
+End Function
+Public Shared Function EgtGetInfo(ByVal nCtx As Integer, ByVal nId As Integer, ByVal sKey As String, ByRef sInfo As String) As Boolean
+   Dim psInfo As IntPtr
+   Dim bOk As Boolean = EgtGetInfo(nCtx, nId, sKey, psInfo)
+   sInfo = Marshal.PtrToStringUni(psInfo)
+   EgtFreeMemory(psInfo)
+   Return bOk
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtExistsInfo(ByVal nCtx As Integer, ByVal nId As Integer, ByVal sKey As String) As Boolean
+End Function
+
+<DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
+Public Shared Function EgtRemoveInfo(ByVal nCtx As Integer, ByVal nId As Integer, ByVal sKey As String) As Boolean
+End Function
+
+
 'Scene
 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Public Shared Function EgtInitScene(ByVal nCtx As Integer, ByVal hWnd As IntPtr, ByVal nDriver As Integer,
@@ -114,7 +260,8 @@ End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Public Shared Function EgtSetBackground(ByVal nCtx As Integer, ByVal nTopRed As Integer, ByVal nTopGreen As Integer, ByVal nTopBlue As Integer,
-                                        ByVal nBottomRed As Integer, ByVal nBottomGreen As Integer, ByVal nBottomBlue As Integer) As Boolean
+                                        ByVal nBottomRed As Integer, ByVal nBottomGreen As Integer, ByVal nBottomBlue As Integer,
+                                        Optional ByVal bRedraw As Boolean = True) As Boolean
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
@@ -126,57 +273,57 @@ Public Shared Function EgtResize(ByVal nCtx As Integer, ByVal nW As Integer, ByV
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function EgtSetShowMode(ByVal nCtx As Integer, ByVal nShowMode As Integer, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtSetShowMode(ByVal nCtx As Integer, ByVal nShowMode As Integer, Optional ByVal bRedraw As Boolean = True) As Boolean
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function EgtSetShowCurveDirection(ByVal nCtx As Integer, ByVal bShow As Boolean, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtSetShowCurveDirection(ByVal nCtx As Integer, ByVal bShow As Boolean, Optional ByVal bRedraw As Boolean = True) As Boolean
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function EgtZoom(ByVal nCtx As Integer, ByVal nZoom As Integer, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtZoom(ByVal nCtx As Integer, ByVal nZoom As Integer, Optional ByVal bRedraw As Boolean = True) As Boolean
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Private Shared Function EgtZoomOnPoint(ByVal nCtx As Integer, ByVal nWinX As Integer, ByVal nWinY As Integer, ByVal dCoeff As Double, ByVal bRedraw As Boolean) As Boolean
 End Function
-Public Shared Function EgtZoomOnPoint(ByVal nCtx As Integer, ByVal Curr As Point, ByVal dCoeff As Double, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtZoomOnPoint(ByVal nCtx As Integer, ByVal Curr As Point, ByVal dCoeff As Double, Optional ByVal bRedraw As Boolean = True) As Boolean
   Return EgtZoomOnPoint(nCtx, Curr.X, Curr.Y, dCoeff, bRedraw)
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Private Shared Function EgtSetWinRect(ByVal nCtx As Integer, ByVal nPrevX As Integer, ByVal nPrevY As Integer, ByVal nCurrX As Integer, ByVal nCurrY As Integer, ByVal bRedraw As Boolean) As Boolean
 End Function
-Public Shared Function EgtSetWinRect(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtSetWinRect(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, Optional ByVal bRedraw As Boolean = True) As Boolean
   Return EgtSetWinRect(nCtx, Prev.X, Prev.Y, Curr.X, Curr.Y, bRedraw)
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function EgtResetWinRect(ByVal nCtx As Integer, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtResetWinRect(ByVal nCtx As Integer, Optional ByVal bRedraw As Boolean = True) As Boolean
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Private Shared Function EgtZoomWin(ByVal nCtx As Integer, ByVal nPrevX As Integer, ByVal nPrevY As Integer, ByVal nCurrX As Integer, ByVal nCurrY As Integer, ByVal bRedraw As Boolean) As Boolean
 End Function
-Public Shared Function EgtZoomWin(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtZoomWin(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, Optional ByVal bRedraw As Boolean = True) As Boolean
   Return EgtZoomWin(nCtx, Prev.X, Prev.Y, Curr.X, Curr.Y, bRedraw)
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
-Public Shared Function EgtSetView(ByVal nCtx As Integer, ByVal nView As Integer, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtSetView(ByVal nCtx As Integer, ByVal nView As Integer, Optional ByVal bRedraw As Boolean = True) As Boolean
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Private Shared Function EgtPanCamera(ByVal nCtx As Integer, ByVal nPrevX As Integer, ByVal nPrevY As Integer, ByVal nCurrX As Integer, ByVal nCurrY As Integer, ByVal bRedraw As Boolean) As Boolean
 End Function
-Public Shared Function EgtPanCamera(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtPanCamera(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, Optional ByVal bRedraw As Boolean = True) As Boolean
   Return EgtPanCamera(nCtx, Prev.X, Prev.Y, Curr.X, Curr.Y, bRedraw)
 End Function

 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Private Shared Function EgtRotateCamera(ByVal nCtx As Integer, ByVal nPrevX As Integer, ByVal nPrevY As Integer, ByVal nCurrX As Integer, ByVal nCurrY As Integer, ByVal bRedraw As Boolean) As Boolean
 End Function
-Public Shared Function EgtRotateCamera(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, ByVal bRedraw As Boolean) As Boolean
+Public Shared Function EgtRotateCamera(ByVal nCtx As Integer, ByVal Prev As Point, ByVal Curr As Point, Optional ByVal bRedraw As Boolean = True) As Boolean
   Return EgtRotateCamera(nCtx, Prev.X, Prev.Y, Curr.X, Curr.Y, bRedraw)
 End Function

@@ -191,6 +338,7 @@ Public Shared Function EgtUnProjectPoint(ByVal nCtx As Integer, ByVal Curr As Po
   Return EgtUnProjectPoint(nCtx, Curr.X, Curr.Y, ptP)
 End Function

+
 'TscExecutor
 <DllImport(EgtInterface, CharSet:=CharSet.Unicode)>
 Public Shared Function EgtInitTscExec(ByVal nCtx As Integer) As Boolean
@@ -204,6 +352,44 @@ End Function
 Public Shared Function EgtTscLineExec(ByVal nCtx As Integer, ByVal sLine As String) As Boolean
 End Function

+
+'Costanti : TIPO DI FILE
+Public Const FT_NULL As Integer = 0
+Public Const FT_NGE As Integer = 1
+Public Const FT_NFE As Integer = 2
+Public Const FT_DXF As Integer = 11
+Public Const FT_STL As Integer = 12
+'Costanti : FORMATO FILE NGE
+Public Const NGE_TEXT As Integer = 0
+Public Const NGE_BIN As Integer = 1
+Public Const NGE_CMPTEXT As Integer = 2
+'Costanti : ID GEOMDB
+Public Const GDB_ID_ROOT As Integer = 0
+Public Const GDB_ID_NULL As Integer = -1
+'Costanti : TIPO OGGETTI
+Public Const TY_NONE As Integer = 0
+Public Const TY_GROUP As Integer = 2
+Public Const TY_GEO_VECTOR As Integer = 128
+Public Const TY_GEO_POINT As Integer = 129
+Public Const TY_GEO_FRAME As Integer = 130
+Public Const TY_CRV_LINE As Integer = 256
+Public Const TY_CRV_ARC As Integer = 257
+Public Const TY_CRV_BEZ As Integer = 258
+Public Const TY_CRV_COMPO As Integer = 259
+Public Const TY_SRF_MESH As Integer = 512
+Public Const TY_EXT_TEXT As Integer = 1024
+'Costanti : LIVELLO DI UN OGGETTO
+Public Const GDB_LV_USER As Integer = 1
+Public Const GDB_LV_SYSTEM As Integer = 2
+Public Const GDB_LV_TEMP As Integer = 3
+'Costanti : MODO DI UN OGGETTO
+Public Const GDB_MD_STD As Integer = 1
+Public Const GDB_MD_LOCKED As Integer = 2
+Public Const GDB_MD_HIDDEN As Integer = 3
+'Costanti : STATO DI UN OGGETTO
+Public Const GDB_ST_OFF As Integer = 0
+Public Const GDB_ST_ON As Integer = 1
+Public Const GDB_ST_SEL As Integer = 2
 'Costanti : TIPO VISUALIZZAZIONE
 Public Const SM_WIREFRAME As Integer = 0
 Public Const SM_HIDDENLINE As Integer = 1
@@ -224,17 +410,5 @@ Public Const CT_ISO_SW As Integer = 7
 Public Const CT_ISO_SE As Integer = 8
 Public Const CT_ISO_NE As Integer = 9
 Public Const CT_ISO_NW As Integer = 10
-'Costanti : TIPO DI FILE
-Public Const FT_NULL As Integer = 0
-Public Const FT_NGE As Integer = 1
-Public Const FT_NFE As Integer = 2
-Public Const FT_DXF As Integer = 11
-Public Const FT_STL As Integer = 12
-'Costanti : FORMATO FILE NGE
-Public Const NGE_TEXT As Integer = 0
-Public Const NGE_BIN As Integer = 1
-Public Const NGE_CMPTEXT As Integer = 2
-'Costanti : ID GRUPPO RADICE
-Public Const GDB_ID_ROOT As Integer = 0

 End Class
@@ -22,10 +22,11 @@ Partial Class Form1
    'Non modificarla nell'editor del codice.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
+      Me.components = New System.ComponentModel.Container()
+      Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
      Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel()
-      Me.FlowLayoutPanel1 = New System.Windows.Forms.FlowLayoutPanel()
-      Me.TextBox1 = New System.Windows.Forms.TextBox()
      Me.Panel1 = New System.Windows.Forms.Panel()
+      Me.tboxCmd = New System.Windows.Forms.TextBox()
      Me.GroupBox1 = New System.Windows.Forms.GroupBox()
      Me.rbtShading = New System.Windows.Forms.RadioButton()
      Me.rbtHiddenLine = New System.Windows.Forms.RadioButton()
@@ -49,14 +50,21 @@ Partial Class Form1
      Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
      Me.ToolStripStatusLabel2 = New System.Windows.Forms.ToolStripStatusLabel()
      Me.ToolStripStatusLabel1 = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.ToolStripStatusLabel3 = New System.Windows.Forms.ToolStripStatusLabel()
+      Me.Panel2 = New System.Windows.Forms.Panel()
+      Me.tBoxInfo = New System.Windows.Forms.TextBox()
+      Me.TreeView1 = New System.Windows.Forms.TreeView()
+      Me.ImageList1 = New System.Windows.Forms.ImageList(Me.components)
      Me.OpenFileDialog = New System.Windows.Forms.OpenFileDialog()
      Me.SaveFileDialog = New System.Windows.Forms.SaveFileDialog()
+      Me.TableLayoutPanel2 = New System.Windows.Forms.TableLayoutPanel()
      Me.Scene1 = New TestEIn.Scene()
      Me.TableLayoutPanel1.SuspendLayout()
-      Me.FlowLayoutPanel1.SuspendLayout()
      Me.Panel1.SuspendLayout()
      Me.GroupBox1.SuspendLayout()
      Me.StatusStrip1.SuspendLayout()
+      Me.Panel2.SuspendLayout()
+      Me.TableLayoutPanel2.SuspendLayout()
      Me.SuspendLayout()
      '
      'TableLayoutPanel1
@@ -66,9 +74,9 @@ Partial Class Form1
      Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
      Me.TableLayoutPanel1.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle())
      Me.TableLayoutPanel1.Controls.Add(Me.Scene1, 1, 0)
-      Me.TableLayoutPanel1.Controls.Add(Me.FlowLayoutPanel1, 0, 0)
      Me.TableLayoutPanel1.Controls.Add(Me.Panel1, 2, 0)
      Me.TableLayoutPanel1.Controls.Add(Me.StatusStrip1, 0, 1)
+      Me.TableLayoutPanel1.Controls.Add(Me.Panel2, 0, 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)
@@ -79,27 +87,9 @@ Partial Class Form1
      Me.TableLayoutPanel1.Size = New System.Drawing.Size(685, 386)
      Me.TableLayoutPanel1.TabIndex = 0
      '
-      'FlowLayoutPanel1
-      '
-      Me.FlowLayoutPanel1.Controls.Add(Me.TextBox1)
-      Me.FlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Fill
-      Me.FlowLayoutPanel1.FlowDirection = System.Windows.Forms.FlowDirection.TopDown
-      Me.FlowLayoutPanel1.Location = New System.Drawing.Point(2, 2)
-      Me.FlowLayoutPanel1.Margin = New System.Windows.Forms.Padding(2)
-      Me.FlowLayoutPanel1.Name = "FlowLayoutPanel1"
-      Me.FlowLayoutPanel1.Size = New System.Drawing.Size(98, 360)
-      Me.FlowLayoutPanel1.TabIndex = 1
-      '
-      'TextBox1
-      '
-      Me.TextBox1.Location = New System.Drawing.Point(3, 3)
-      Me.TextBox1.Multiline = True
-      Me.TextBox1.Name = "TextBox1"
-      Me.TextBox1.Size = New System.Drawing.Size(94, 67)
-      Me.TextBox1.TabIndex = 3
-      '
      'Panel1
      '
+      Me.Panel1.Controls.Add(Me.tboxCmd)
      Me.Panel1.Controls.Add(Me.GroupBox1)
      Me.Panel1.Controls.Add(Me.chkCurveDir)
      Me.Panel1.Controls.Add(Me.btnZoomOut)
@@ -123,6 +113,17 @@ Partial Class Form1
      Me.Panel1.Size = New System.Drawing.Size(195, 358)
      Me.Panel1.TabIndex = 5
      '
+      'tboxCmd
+      '
+      Me.tboxCmd.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+      Me.tboxCmd.Location = New System.Drawing.Point(0, 302)
+      Me.tboxCmd.Multiline = True
+      Me.tboxCmd.Name = "tboxCmd"
+      Me.tboxCmd.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
+      Me.tboxCmd.Size = New System.Drawing.Size(194, 55)
+      Me.tboxCmd.TabIndex = 23
+      '
      'GroupBox1
      '
      Me.GroupBox1.Controls.Add(Me.rbtShading)
@@ -323,7 +324,7 @@ Partial Class Form1
      '
      Me.TableLayoutPanel1.SetColumnSpan(Me.StatusStrip1, 3)
      Me.StatusStrip1.Dock = System.Windows.Forms.DockStyle.Fill
-      Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel2, Me.ToolStripStatusLabel1})
+      Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripStatusLabel2, Me.ToolStripStatusLabel1, Me.ToolStripStatusLabel3})
      Me.StatusStrip1.Location = New System.Drawing.Point(0, 364)
      Me.StatusStrip1.MaximumSize = New System.Drawing.Size(0, 22)
      Me.StatusStrip1.MinimumSize = New System.Drawing.Size(0, 22)
@@ -336,7 +337,7 @@ Partial Class Form1
      '
      Me.ToolStripStatusLabel2.AutoSize = False
      Me.ToolStripStatusLabel2.Name = "ToolStripStatusLabel2"
-      Me.ToolStripStatusLabel2.Size = New System.Drawing.Size(485, 17)
+      Me.ToolStripStatusLabel2.Size = New System.Drawing.Size(300, 17)
      Me.ToolStripStatusLabel2.Spring = True
      '
      'ToolStripStatusLabel1
@@ -351,6 +352,67 @@ Partial Class Form1
      Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(185, 17)
      Me.ToolStripStatusLabel1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
      '
+      'ToolStripStatusLabel3
+      '
+      Me.ToolStripStatusLabel3.AutoSize = False
+      Me.ToolStripStatusLabel3.BorderSides = CType((((System.Windows.Forms.ToolStripStatusLabelBorderSides.Left Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Top) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Right) _
+            Or System.Windows.Forms.ToolStripStatusLabelBorderSides.Bottom), System.Windows.Forms.ToolStripStatusLabelBorderSides)
+      Me.ToolStripStatusLabel3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text
+      Me.ToolStripStatusLabel3.MergeIndex = 2
+      Me.ToolStripStatusLabel3.Name = "ToolStripStatusLabel3"
+      Me.ToolStripStatusLabel3.Size = New System.Drawing.Size(185, 17)
+      Me.ToolStripStatusLabel3.TextAlign = System.Drawing.ContentAlignment.MiddleLeft
+      '
+      'Panel2
+      '
+      Me.Panel2.Controls.Add(Me.TableLayoutPanel2)
+      Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
+      Me.Panel2.Location = New System.Drawing.Point(3, 3)
+      Me.Panel2.Name = "Panel2"
+      Me.Panel2.Size = New System.Drawing.Size(200, 358)
+      Me.Panel2.TabIndex = 7
+      '
+      'tBoxInfo
+      '
+      Me.tBoxInfo.Dock = System.Windows.Forms.DockStyle.Fill
+      Me.tBoxInfo.Location = New System.Drawing.Point(3, 217)
+      Me.tBoxInfo.Multiline = True
+      Me.tBoxInfo.Name = "tBoxInfo"
+      Me.tBoxInfo.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
+      Me.tBoxInfo.Size = New System.Drawing.Size(194, 138)
+      Me.tBoxInfo.TabIndex = 24
+      '
+      'TreeView1
+      '
+      Me.TreeView1.Dock = System.Windows.Forms.DockStyle.Fill
+      Me.TreeView1.FullRowSelect = True
+      Me.TreeView1.HideSelection = False
+      Me.TreeView1.ImageIndex = 0
+      Me.TreeView1.ImageList = Me.ImageList1
+      Me.TreeView1.Location = New System.Drawing.Point(3, 3)
+      Me.TreeView1.Name = "TreeView1"
+      Me.TreeView1.SelectedImageIndex = 0
+      Me.TreeView1.Size = New System.Drawing.Size(194, 208)
+      Me.TreeView1.TabIndex = 0
+      '
+      '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, "Maters.ico")
+      Me.ImageList1.Images.SetKeyName(1, "NoGeo.ico")
+      Me.ImageList1.Images.SetKeyName(2, "Group.ico")
+      Me.ImageList1.Images.SetKeyName(3, "Vector.ico")
+      Me.ImageList1.Images.SetKeyName(4, "Point.ico")
+      Me.ImageList1.Images.SetKeyName(5, "Frame.ico")
+      Me.ImageList1.Images.SetKeyName(6, "Line.ico")
+      Me.ImageList1.Images.SetKeyName(7, "Arc.ico")
+      Me.ImageList1.Images.SetKeyName(8, "CBezier.ico")
+      Me.ImageList1.Images.SetKeyName(9, "CCompo.ico")
+      Me.ImageList1.Images.SetKeyName(10, "STriMesh.ico")
+      Me.ImageList1.Images.SetKeyName(11, "text.ico")
+      '
      'OpenFileDialog
      '
      Me.OpenFileDialog.DefaultExt = "Nge"
@@ -360,12 +422,27 @@ Partial Class Form1
      '
      Me.SaveFileDialog.Title = "Save"
      '
+      'TableLayoutPanel2
+      '
+      Me.TableLayoutPanel2.ColumnCount = 1
+      Me.TableLayoutPanel2.ColumnStyles.Add(New System.Windows.Forms.ColumnStyle(System.Windows.Forms.SizeType.Percent, 100.0!))
+      Me.TableLayoutPanel2.Controls.Add(Me.tBoxInfo, 0, 1)
+      Me.TableLayoutPanel2.Controls.Add(Me.TreeView1, 0, 0)
+      Me.TableLayoutPanel2.Dock = System.Windows.Forms.DockStyle.Fill
+      Me.TableLayoutPanel2.Location = New System.Drawing.Point(0, 0)
+      Me.TableLayoutPanel2.Name = "TableLayoutPanel2"
+      Me.TableLayoutPanel2.RowCount = 2
+      Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 60.0!))
+      Me.TableLayoutPanel2.RowStyles.Add(New System.Windows.Forms.RowStyle(System.Windows.Forms.SizeType.Percent, 40.0!))
+      Me.TableLayoutPanel2.Size = New System.Drawing.Size(200, 358)
+      Me.TableLayoutPanel2.TabIndex = 0
+      '
      'Scene1
      '
      Me.Scene1.Dock = System.Windows.Forms.DockStyle.Fill
-      Me.Scene1.Location = New System.Drawing.Point(105, 3)
+      Me.Scene1.Location = New System.Drawing.Point(209, 3)
      Me.Scene1.Name = "Scene1"
-      Me.Scene1.Size = New System.Drawing.Size(376, 358)
+      Me.Scene1.Size = New System.Drawing.Size(272, 358)
      Me.Scene1.TabIndex = 1
      '
      'Form1
@@ -376,30 +453,30 @@ Partial Class Form1
      Me.ClientSize = New System.Drawing.Size(685, 386)
      Me.Controls.Add(Me.TableLayoutPanel1)
      Me.ForeColor = System.Drawing.SystemColors.ControlText
+      Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
      Me.Margin = New System.Windows.Forms.Padding(2)
      Me.Name = "Form1"
      Me.SizeGripStyle = System.Windows.Forms.SizeGripStyle.Hide
      Me.Text = "Egaltech Interface Prova 1"
      Me.TableLayoutPanel1.ResumeLayout(False)
      Me.TableLayoutPanel1.PerformLayout()
-      Me.FlowLayoutPanel1.ResumeLayout(False)
-      Me.FlowLayoutPanel1.PerformLayout()
      Me.Panel1.ResumeLayout(False)
      Me.Panel1.PerformLayout()
      Me.GroupBox1.ResumeLayout(False)
      Me.StatusStrip1.ResumeLayout(False)
      Me.StatusStrip1.PerformLayout()
+      Me.Panel2.ResumeLayout(False)
+      Me.TableLayoutPanel2.ResumeLayout(False)
+      Me.TableLayoutPanel2.PerformLayout()
      Me.ResumeLayout(False)

 End Sub
    Friend WithEvents TableLayoutPanel1 As System.Windows.Forms.TableLayoutPanel
-    Friend WithEvents FlowLayoutPanel1 As System.Windows.Forms.FlowLayoutPanel
    Friend WithEvents OpenFileDialog As System.Windows.Forms.OpenFileDialog
    Friend WithEvents SaveFileDialog As System.Windows.Forms.SaveFileDialog
    Friend WithEvents btnOpen As System.Windows.Forms.Button
    Friend WithEvents btnSave As System.Windows.Forms.Button
    Friend WithEvents btnExec As System.Windows.Forms.Button
-    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
    Friend WithEvents btnExport As System.Windows.Forms.Button
    Friend WithEvents Panel1 As System.Windows.Forms.Panel
    Friend WithEvents btnNew As System.Windows.Forms.Button
@@ -422,5 +499,12 @@ End Sub
    Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
    Friend WithEvents ToolStripStatusLabel1 As System.Windows.Forms.ToolStripStatusLabel
    Friend WithEvents ToolStripStatusLabel2 As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents tboxCmd As System.Windows.Forms.TextBox
+    Friend WithEvents ToolStripStatusLabel3 As System.Windows.Forms.ToolStripStatusLabel
+    Friend WithEvents Panel2 As System.Windows.Forms.Panel
+    Friend WithEvents TreeView1 As System.Windows.Forms.TreeView
+    Friend WithEvents ImageList1 As System.Windows.Forms.ImageList
+    Friend WithEvents tBoxInfo As System.Windows.Forms.TextBox
+    Friend WithEvents TableLayoutPanel2 As System.Windows.Forms.TableLayoutPanel

 End Class
@@ -123,6 +123,71 @@
  <metadata name="StatusStrip1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>281, 10</value>
  </metadata>
+  <metadata name="ImageList1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>398, 10</value>
+  </metadata>
+  <data name="ImageList1.ImageStream" mimetype="application/x-microsoft.net.object.binary.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
+        LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
+        ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADS
+        DAAAAk1TRnQBSQFMAgEBDAEAAZgBAAGYAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        AwABQAMAAUADAAEBAQABCAYAARAYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
+        AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
+        AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
+        AWYDAAGZAwABzAIAATMDAAIzAgABMwFmAgABMwGZAgABMwHMAgABMwH/AgABZgMAAWYBMwIAAmYCAAFm
+        AZkCAAFmAcwCAAFmAf8CAAGZAwABmQEzAgABmQFmAgACmQIAAZkBzAIAAZkB/wIAAcwDAAHMATMCAAHM
+        AWYCAAHMAZkCAALMAgABzAH/AgAB/wFmAgAB/wGZAgAB/wHMAQABMwH/AgAB/wEAATMBAAEzAQABZgEA
+        ATMBAAGZAQABMwEAAcwBAAEzAQAB/wEAAf8BMwIAAzMBAAIzAWYBAAIzAZkBAAIzAcwBAAIzAf8BAAEz
+        AWYCAAEzAWYBMwEAATMCZgEAATMBZgGZAQABMwFmAcwBAAEzAWYB/wEAATMBmQIAATMBmQEzAQABMwGZ
+        AWYBAAEzApkBAAEzAZkBzAEAATMBmQH/AQABMwHMAgABMwHMATMBAAEzAcwBZgEAATMBzAGZAQABMwLM
+        AQABMwHMAf8BAAEzAf8BMwEAATMB/wFmAQABMwH/AZkBAAEzAf8BzAEAATMC/wEAAWYDAAFmAQABMwEA
+        AWYBAAFmAQABZgEAAZkBAAFmAQABzAEAAWYBAAH/AQABZgEzAgABZgIzAQABZgEzAWYBAAFmATMBmQEA
+        AWYBMwHMAQABZgEzAf8BAAJmAgACZgEzAQADZgEAAmYBmQEAAmYBzAEAAWYBmQIAAWYBmQEzAQABZgGZ
+        AWYBAAFmApkBAAFmAZkBzAEAAWYBmQH/AQABZgHMAgABZgHMATMBAAFmAcwBmQEAAWYCzAEAAWYBzAH/
+        AQABZgH/AgABZgH/ATMBAAFmAf8BmQEAAWYB/wHMAQABzAEAAf8BAAH/AQABzAEAApkCAAGZATMBmQEA
+        AZkBAAGZAQABmQEAAcwBAAGZAwABmQIzAQABmQEAAWYBAAGZATMBzAEAAZkBAAH/AQABmQFmAgABmQFm
+        ATMBAAGZATMBZgEAAZkBZgGZAQABmQFmAcwBAAGZATMB/wEAApkBMwEAApkBZgEAA5kBAAKZAcwBAAKZ
+        Af8BAAGZAcwCAAGZAcwBMwEAAWYBzAFmAQABmQHMAZkBAAGZAswBAAGZAcwB/wEAAZkB/wIAAZkB/wEz
+        AQABmQHMAWYBAAGZAf8BmQEAAZkB/wHMAQABmQL/AQABzAMAAZkBAAEzAQABzAEAAWYBAAHMAQABmQEA
+        AcwBAAHMAQABmQEzAgABzAIzAQABzAEzAWYBAAHMATMBmQEAAcwBMwHMAQABzAEzAf8BAAHMAWYCAAHM
+        AWYBMwEAAZkCZgEAAcwBZgGZAQABzAFmAcwBAAGZAWYB/wEAAcwBmQIAAcwBmQEzAQABzAGZAWYBAAHM
+        ApkBAAHMAZkBzAEAAcwBmQH/AQACzAIAAswBMwEAAswBZgEAAswBmQEAA8wBAALMAf8BAAHMAf8CAAHM
+        Af8BMwEAAZkB/wFmAQABzAH/AZkBAAHMAf8BzAEAAcwC/wEAAcwBAAEzAQAB/wEAAWYBAAH/AQABmQEA
+        AcwBMwIAAf8CMwEAAf8BMwFmAQAB/wEzAZkBAAH/ATMBzAEAAf8BMwH/AQAB/wFmAgAB/wFmATMBAAHM
+        AmYBAAH/AWYBmQEAAf8BZgHMAQABzAFmAf8BAAH/AZkCAAH/AZkBMwEAAf8BmQFmAQAB/wKZAQAB/wGZ
+        AcwBAAH/AZkB/wEAAf8BzAIAAf8BzAEzAQAB/wHMAWYBAAH/AcwBmQEAAf8CzAEAAf8BzAH/AQAC/wEz
+        AQABzAH/AWYBAAL/AZkBAAL/AcwBAAJmAf8BAAFmAf8BZgEAAWYC/wEAAf8CZgEAAf8BZgH/AQAC/wFm
+        AQABIQEAAaUBAANfAQADdwEAA4YBAAOWAQADywEAA7IBAAPXAQAD3QEAA+MBAAPqAQAD8QEAA/gBAAHw
+        AfsB/wEAAaQCoAEAA4ADAAH/AgAB/wMAAv8BAAH/AwAB/wEAAf8BAAL/AgAD//8A/wD/AP8AXAAG/AUA
+        C/wqAAf8BAAC/AcAAvwHAAf8BgAC/BkAAvwDAAH8AgAB/AUAAfwBAAH8CQAD/AgAAvwaAAL8AgAB/AMA
+        AfwDAAH8AgAB/AkAA/wIAAL8BQAF/BAAAvwCAAH8BAAB/AEAAfwDAAH8CQAD/AgAAvwEAAf8AwAC/AoA
+        AvwCAAH8BAAC/AQAAfwJAAP8CAAD/AIAA/wDAAL8AwAC/AoAAvwBAAH8AQAE/AEAAvwEAAH8CAAD/AkA
+        BvwFAAL8AgAC/AoAAvwBAAL8BQAB/AEAAfwDAAH8CAAD/AoAA/wHAAL8AgAC/AoAAvwCAAH8BQAB/AIA
+        AfwCAAH8CAAD/BQAAvwCAAL8CgAC/AMAAfwDAAH8BAAB/AEAAfwIAAP8FAAC/AIAAvwKAAL8BAAC/AEA
+        AfwFAAL8BAAB/AMAA/wDAAH8FAAD/AgAA/wGAAL8AwAE/AQAAfwDAAP8AwAB/BUADPwIAAT8CAAL/BYA
+        CfyAAAH5PwAC+RQAAvwhAAr5DQAC/AQAAvwhAAr5DAAD/AQAAvwgAAL6BgAC+QwAA/wFAAL8EwAC/AkA
+        AvwD+gUAAfkMAAP8BgAD/BEABPwIAAL8AQAD+hAAA/wIAAL8EAAG/AcAAvwCAAP6DgAD/AkAA/wPAAb8
+        BwAC/AMAA/oBAAH6CgAD/AsAA/wPAAT8CAAC/AQABPoJAAP8DAAD/BAAAvwJAAL8BQAD+ggAA/wOAAT8
+        GQAC/AQABPoHAAP8EAAF/BUABvwMAAP8EwAH/BIABPwNAAL8FgAF/BMAAvyuAAP5A/oD+wP8NAAD+QP6
+        A/sD/BcABPwZAAP5A/oD+wP8CQAC+QsABPwCAAL5BwAC/A0AA/kD+gP7A/wJAAL5CgAE/AEAA/kIAAP8
+        DAAD+QP6A/sD/BYAAvwBAAL5AwACBAYAA/wLAAP5A/oD+wP8CQAC+QwAAvkCAAP6AgQHAAP8CgAD+QP6
+        A/sD/AkAAvkLAAL5AQAE+gEAAgQIAAP8AgAC/AUAA/kD+gP7A/wKAAL5CAAD+QT6AwACBAkAA/wBAAL8
+        BQAD+QP6A/sD/AsAAvkGAAL5AgAC+gUAAgQKAAX8BQAD+QP6A/sD/AcAAvkCAAL5CQAC+gIAAwcOAAT8
+        BQAD+QP6A/sD/AcAAvkCAAL5CQAC+gIAAwcMAAb8BQAD+QP6A/sD/AgABPkLAAH6EQAG/AUAA/kD+gP7
+        A/w0AAP5A/oD+wP8cgABQgFNAT4HAAE+AwABKAMAAUADAAFAAwABAQEAAQEGAAECFgAD/4EACv8B/gEH
+        AcABBwT/Af4BAwHPAecB8AEfAZ8C/wHzAbcB1wH8AX8BnwL/AfkBuwG3AfwBfwGfAQcB/wH5Ab0BdwH8
+        AX8BngEDAZ8B+QG8AfcB/AF/AYwBcwGfAfkBQgF7AfwBfwHAAfkBnwH5AT4BuwH8AX8B4wH5AZ8B+QG+
+        AdsB/AF/Af8B+QGfAfkB3QHrAfwBfwH/AfkBnwH5AeUB8wHcAXcC/wGPAfEB+QHDAdwBdwL/AcABAwH8
+        AT8BwAEHAv8B4AEPD/8B9wb/Ac8B8wL/Ac8D/wGAAQEB/wHzAc8D/wGAAQEB/wHjAc8D/wHDAfMB/wHH
+        Ac8B/wH+AX8BwQH3Af8BjwHHAf8B/AE/AcgC/wEfAecB/wH4AR8BzAF/Af4BPwHjAf8B+AEfAc4BLwH8
+        AX8B8QH/AfwBPwHPAQ8B+AH/AfEB/wH+AX8BzwGPAfEB/wH4AX8C/wHPAQ8B4wH/AfwBHwL/AQMB/wHH
+        Av8BAQL/AYcB/wHPAv8BwQL/Ac8V/wHAAQMC/wH4AR8C/wHAAQMC/wHgAWcC/wHAAQMB/gF/AdABywHn
+        Af8BwAEDAf4BfwGhAR0B4wH/AcABAwL/AbIBcQHxAf8BwAEDAf4BfwF5AYIB+AH/AcABAwH+AX8BcgES
+        AfwBZwHAAQMB/wE/AUABcgH+AScBwAEDAf8BnwEZARIB/wEHAcABAwH5AZ8BsgENAf8BhwHAAQMB+QGf
+        AbIBDQH+AQcBwAEDAfwBPwHbARsB/gEHAcABAwL/AucC/wHAAQMC/wH4AR8K/ws=
+</value>
+  </data>
  <metadata name="OpenFileDialog.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
    <value>18, 8</value>
  </metadata>
@@ -132,4 +197,162 @@
  <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
    <value>34</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>
@@ -6,11 +6,40 @@ Imports TestEIn.EgtInterface

 Public Class Form1

+ '-------------------------------- AboutBox -------------------------------------------------------
+<DllImport("user32.dll")>
+Private Shared Function GetSystemMenu(ByVal hWnd As IntPtr, ByVal bRevert As Boolean) As IntPtr
+End Function
+<DllImport("user32.dll", CharSet:=CharSet.Auto)>
+Private Shared Function AppendMenu(ByVal hMenu As IntPtr, ByVal uFlags As Integer,
+                                   ByVal uIDNewItem As Integer, ByVal lpNewItem As String) As Boolean
+End Function
+Private Const MF_STRING As UInt32 = &H0
+Private Const MF_SEPARATOR As UInt32 = &H800
+Private Const WM_SYSCOMMAND As UInt32 = &H112
+Private Const IDM_ABOUTBOX As UInt32 = &H10
+
 '-------------------------------- Form ------------------------------------------------------------
   Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
      Text = "EgalTech TestEIn"
      rbtShading.Checked = True
      Scene1.Init()
+      m_nOldIdTree = GDB_ID_NULL
+      ' aggiungo voce per about box nel menù di sistema
+      Dim hSysMenu As IntPtr = GetSystemMenu(Handle, False)
+      If hSysMenu <> IntPtr.Zero Then
+         AppendMenu(hSysMenu, MF_SEPARATOR, 0, "")
+         AppendMenu(hSysMenu, MF_STRING, IDM_ABOUTBOX, "About TestEIn...")
+      End If
+   End Sub
+
+   Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
+      MyBase.WndProc(m)
+      If m.Msg = WM_SYSCOMMAND Then
+         If m.WParam.ToInt32 = IDM_ABOUTBOX Then
+            AboutBox1.Show()
+         End If
+      End If
   End Sub

   Private Sub CursorPos(ByVal sender As Object, ByVal sCursorPos As String) Handles Scene1.CursorPos
@@ -20,7 +49,8 @@ Public Class Form1
 '-------------------------------- Buttons --------------------------------------------------------
  Private Sub btnNew_Click(sender As System.Object, e As System.EventArgs) Handles btnNew.Click
      If EgtNewFile(Scene1.GetCtx) Then
-         EgtZoom(Scene1.GetCtx, ZM_ALL, True)
+         ClearObjTree()
+         EgtZoom(Scene1.GetCtx, ZM_ALL)
      End If
   End Sub

@@ -31,7 +61,8 @@ Public Class Form1
      If OpenFileDialog.ShowDialog = Windows.Forms.DialogResult.OK Then
         Cursor = Cursors.WaitCursor
         If EgtOpenFile(Scene1.GetCtx, OpenFileDialog.FileName) Then
-            EgtZoom(Scene1.GetCtx, ZM_ALL, True)
+            EgtZoom(Scene1.GetCtx, ZM_ALL)
+            LoadObjTree()
         End If
         Cursor = Cursors.Default
      End If
@@ -43,7 +74,12 @@ Public Class Form1
      SaveFileDialog.FilterIndex = 1
      If SaveFileDialog.ShowDialog = Windows.Forms.DialogResult.OK Then
         Cursor = Cursors.WaitCursor
+         ' ripristino stato oggetto marcato
+         Dim nIdOld As Integer = RevertOldIdInObjTree()
+         ' eseguo salvataggio
         EgtSaveFile(Scene1.GetCtx, SaveFileDialog.FileName, NGE_CMPTEXT)
+         ' rimarco oggetto
+         SelectIdInObjTree(nIdOld)
         Cursor = Cursors.Default
      End If
   End Sub
@@ -58,14 +94,16 @@ Public Class Form1
            Cursor = Cursors.WaitCursor
            EgtNewFile(Scene1.GetCtx)
            If EgtImportDxf(Scene1.GetCtx, OpenFileDialog.FileName) Then
-               EgtZoom(Scene1.GetCtx, ZM_ALL, True)
+               EgtZoom(Scene1.GetCtx, ZM_ALL)
+               LoadObjTree()
            End If
            Cursor = Cursors.Default
         ElseIf nFileType = FT_STL Then
            Cursor = Cursors.WaitCursor
            EgtNewFile(Scene1.GetCtx)
            If EgtImportStl(Scene1.GetCtx, OpenFileDialog.FileName) Then
-               EgtZoom(Scene1.GetCtx, ZM_ALL, True)
+               EgtZoom(Scene1.GetCtx, ZM_ALL)
+               LoadObjTree()
            End If
            Cursor = Cursors.Default
         Else
@@ -100,95 +138,244 @@ Public Class Form1
      OpenFileDialog.FilterIndex = 1
      If OpenFileDialog.ShowDialog = Windows.Forms.DialogResult.OK Then
         Cursor = Cursors.WaitCursor
+         ' pulisco albero degli oggetti
+         ClearObjTree()
+         ' eseguo
         If EgtTscFileExec(Scene1.GetCtx, OpenFileDialog.FileName) Then
-            EgtZoom(Scene1.GetCtx, ZM_ALL, True)
+            EgtZoom(Scene1.GetCtx, ZM_ALL)
+            LoadObjTree()
         End If
+         ' ricarico albero degli oggetti
+         LoadObjTree()
         Cursor = Cursors.Default
      End If
   End Sub

   Private Sub rbtWireFrame_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbtWireFrame.CheckedChanged
-      EgtSetShowMode(Scene1.GetCtx, SM_WIREFRAME, True)
+      EgtSetShowMode(Scene1.GetCtx, SM_WIREFRAME)
   End Sub

   Private Sub rbtHiddenLine_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbtHiddenLine.CheckedChanged
-      EgtSetShowMode(Scene1.GetCtx, SM_HIDDENLINE, True)
+      EgtSetShowMode(Scene1.GetCtx, SM_HIDDENLINE)
   End Sub

   Private Sub rbtShading_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbtShading.CheckedChanged
-      EgtSetShowMode(Scene1.GetCtx, SM_SHADING, True)
+      EgtSetShowMode(Scene1.GetCtx, SM_SHADING)
   End Sub

   Private Sub chkCurveDir_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkCurveDir.CheckedChanged
-      EgtSetShowCurveDirection(Scene1.GetCtx, chkCurveDir.Checked, True)
+      EgtSetShowCurveDirection(Scene1.GetCtx, chkCurveDir.Checked)
   End Sub

   Private Sub btnZoomAll_Click(sender As System.Object, e As System.EventArgs) Handles btnZoomAll.Click
-      EgtZoom(Scene1.GetCtx, ZM_ALL, True)
+      EgtZoom(Scene1.GetCtx, ZM_ALL)
   End Sub

   Private Sub btnZoomIn_Click(sender As System.Object, e As System.EventArgs) Handles btnZoomIn.Click
-      EgtZoom(Scene1.GetCtx, ZM_IN, True)
+      EgtZoom(Scene1.GetCtx, ZM_IN)
   End Sub

   Private Sub btnZoomOut_Click(sender As System.Object, e As System.EventArgs) Handles btnZoomOut.Click
-      EgtZoom(Scene1.GetCtx, ZM_OUT, True)
+      EgtZoom(Scene1.GetCtx, ZM_OUT)
   End Sub

   Private Sub btnTop_Click(sender As System.Object, e As System.EventArgs) Handles btnTop.Click
-      EgtSetView(Scene1.GetCtx, CT_TOP, True)
+      EgtSetView(Scene1.GetCtx, CT_TOP)
   End Sub

   Private Sub btnFront_Click(sender As System.Object, e As System.EventArgs) Handles btnFront.Click
-      EgtSetView(Scene1.GetCtx, CT_FRONT, True)
+      EgtSetView(Scene1.GetCtx, CT_FRONT)
   End Sub

   Private Sub btnLeft_Click(sender As System.Object, e As System.EventArgs) Handles btnLeft.Click
-      EgtSetView(Scene1.GetCtx, CT_LEFT, True)
+      EgtSetView(Scene1.GetCtx, CT_LEFT)
   End Sub

   Private Sub btnBack_Click(sender As System.Object, e As System.EventArgs) Handles btnBack.Click
-      EgtSetView(Scene1.GetCtx, CT_BACK, True)
+      EgtSetView(Scene1.GetCtx, CT_BACK)
   End Sub

   Private Sub btnRight_Click(sender As System.Object, e As System.EventArgs) Handles btnRight.Click
-      EgtSetView(Scene1.GetCtx, CT_RIGHT, True)
+      EgtSetView(Scene1.GetCtx, CT_RIGHT)
   End Sub
   Private Sub btnIso_Click(sender As System.Object, e As System.EventArgs) Handles btnIso.Click
-      EgtSetView(Scene1.GetCtx, CT_ISO_SW, True)
+      EgtSetView(Scene1.GetCtx, CT_ISO_SW)
   End Sub

-   'Private Sub btnExport_Click(sender As System.Object, e As System.EventArgs) Handles btnExport.Click
-   '   Dim dA As Double
-   '   dA = Summ(12.5, 0.5)
-   '   MessageBox.Show(dA.ToString, "Summ", MessageBoxButtons.OK, MessageBoxIcon.Information)
+ '-------------------------------- Command Box ----------------------------------------------------
+   Private Sub tboxCmd_KeyDown(sender As System.Object, e As System.Windows.Forms.KeyEventArgs) Handles tboxCmd.KeyDown
+      If (e.KeyCode = Keys.Enter) Then
+         Dim nLine As Integer = tboxCmd.GetLineFromCharIndex(tboxCmd.GetFirstCharIndexOfCurrentLine)
+         Dim sCmd As String = tboxCmd.Lines(nLine).ToString
+         If Not String.IsNullOrEmpty(sCmd) Then
+            ' ripristino stato oggetto marcato
+            Dim nIdOld As Integer = RevertOldIdInObjTree()
+            ' eseguo comando
+            If EgtTscLineExec(Scene1.GetCtx, sCmd) Then
+               Scene1.Invalidate()
+               ToolStripStatusLabel3.Text = "   "
+            Else
+               ToolStripStatusLabel3.Text = "Error executing command"
+            End If
+            ' ricarico albero degli oggetti
+            LoadObjTree()
+            SelectIdInObjTree(nIdOld)
+         End If
+      End If
+   End Sub

-   '   Dim bOk As Boolean
-   '   Dim sA As String
-   '   sA = "PiΣpΣpo"
-   '   Dim sB As String = ""
-   '   bOk = Append(sA, sB)
-   '   If bOk Then
-   '    MessageBox.Show(sB, "Append", MessageBoxButtons.OK, MessageBoxIcon.Information)
-   '   Else
-   '    MessageBox.Show("Error", "Append", MessageBoxButtons.OK, MessageBoxIcon.Error)
-   '   End If
+ '-------------------------------- Tree View ------------------------------------------------------
+   Private m_nOldIdTree As Integer

-   '   Dim dC As Double
-   '   dC = 22.5
-   '   bOk = Summ2(dC, 0.5)
-   '   If bOk Then
-   '    MessageBox.Show(dC.ToString, "Summ2", MessageBoxButtons.OK, MessageBoxIcon.Information)
-   '   Else
-   '    MessageBox.Show("Error", "Summ2", MessageBoxButtons.OK, MessageBoxIcon.Error)
-   '   End If
+   Private Sub LoadObjTree()
+      ClearObjTree()
+      TreeView1.BeginUpdate()
+      TreeView1.Nodes.Add(GDB_ID_NULL.ToString, "No Selection", 0, 0)
+      AddGroupInObjTree(GDB_ID_ROOT, TreeView1.Nodes)
+      TreeView1.EndUpdate()
+   End Sub

-   '   Dim ptP As Point3d
-   '   ptP.x = 1
-   '   ptP.y = 2
-   '   ptP.z = 3
-   '   bOk = SetPoint(ptP)
-   '   MessageBox.Show(ptP.x.ToString, "Summ2", MessageBoxButtons.OK, MessageBoxIcon.Information)
-   'End Sub
+   Private Sub ClearObjTree()
+      RevertOldIdInObjTree()
+      TreeView1.Nodes.Clear()
+   End Sub
+
+   Private Sub AddGroupInObjTree(ByVal nGroupId As Integer, ByRef PrevNodColl As TreeNodeCollection)
+
+      Dim CurrNodColl As TreeNodeCollection
+
+      If nGroupId = GDB_ID_ROOT Then
+         CurrNodColl = PrevNodColl
+      Else
+         Dim sName As String = String.Empty
+         Dim sText As String = String.Empty
+         If EgtGetName(Scene1.GetCtx, nGroupId, sName) Then
+            sText = sName + " (Group " + nGroupId.ToString + ")"
+         Else
+            sText = "Group " + nGroupId.ToString
+         End If
+         Dim nImage As Integer = TypeToImageInObjTree(TY_GROUP)
+         CurrNodColl = PrevNodColl.Add(nGroupId.ToString, sText, nImage, nImage).Nodes
+      End If
+
+      Dim nId As Integer = EgtGetFirstInGroup(Scene1.GetCtx, nGroupId)
+      While nId <> GDB_ID_NULL
+         'recupero il tipo di nodo
+         Dim nType As Integer = EgtGetType(Scene1.GetCtx, nId)
+         'se gruppo
+         If nType = TY_GROUP Then
+            AddGroupInObjTree(nId, CurrNodColl)
+         'se oggetto geometrico
+         ElseIf nType >= TY_GEO_VECTOR Then
+            Dim sTitle As String = String.Empty
+            EgtGetTitle(Scene1.GetCtx, nId, sTitle)
+            Dim sName As String = String.Empty
+            Dim sText As String = String.Empty
+            If EgtGetName(Scene1.GetCtx, nId, sName) Then
+               sText = sName + " (" + sTitle + " " + nId.ToString + ")"
+            Else
+               sText = sTitle + " " + nId.ToString
+            End If
+            Dim nImage As Integer = TypeToImageInObjTree(nType)
+            CurrNodColl.Add(nId.ToString, sText, nImage, nImage)
+         End If
+         'passo al successivo
+         nId = EgtGetNext(Scene1.GetCtx, nId)
+      End While
+   End Sub
+
+   Private Function TypeToImageInObjTree(ByVal nType As Integer) As Integer
+      Select Case nType
+      Case TY_GROUP
+         Return 2
+      Case TY_GEO_VECTOR
+         Return 3
+      Case TY_GEO_POINT
+         Return 4
+      Case TY_GEO_FRAME
+         Return 5
+      Case TY_CRV_LINE
+         Return 6
+      Case TY_CRV_ARC
+         Return 7
+      Case TY_CRV_BEZ
+         Return 8
+      Case TY_CRV_COMPO
+         Return 9
+      Case TY_SRF_MESH
+         Return 10
+      Case TY_EXT_TEXT
+         Return 11
+      End Select
+      Return 1
+   End Function
+
+   Private Sub ObjTree_AfterSelect(ByVal sender As Object, ByVal e As TreeViewEventArgs) Handles TreeView1.AfterSelect
+      ' recupero l'Id del nuovo oggetto selezionato
+      Dim nId As Integer
+      If Not Int32.TryParse(e.Node.Name, nId) Then
+         Return
+      End If
+      ' ripristino eventuale vecchio oggetto selezionato
+      RevertOldIdInObjTree()
+      ' recupero il tipo del nuovo oggetto
+      Dim nType As Integer = EgtGetType(Scene1.GetCtx, nId)
+      ' stampa dei dati del nuovo oggetto
+      Dim sDump As String = String.Empty
+      If nType = TY_NONE Then
+         tBoxInfo.Text = String.Empty
+      ElseIf nType = TY_GROUP Then
+         If EgtGroupDump(Scene1.GetCtx, nId, sDump) Then
+            tBoxInfo.Text = sDump
+         Else
+            tBoxInfo.Text = String.Empty
+         End If
+      Else
+         If EgtGeoObjDump(Scene1.GetCtx, nId, sDump) Then
+            tBoxInfo.Text = sDump
+         Else
+            tBoxInfo.Text = String.Empty
+         End If
+      End If
+      ' permetto in ogni caso la visualizzazione dell'oggetto e lo evidenzio
+      Dim nOldMode As Integer = GDB_MD_STD
+      EgtGetMode(Scene1.GetCtx, nId, nOldMode)
+      Dim nMode As Integer = IIf((nOldMode = GDB_MD_HIDDEN), GDB_MD_STD, nOldMode)
+      EgtSetMode(Scene1.GetCtx, nId, nMode)
+      Dim nOldStatus As Integer = GDB_ST_ON
+      EgtGetStatus(Scene1.GetCtx, nId, nOldStatus)
+      Dim nStat As Integer = IIf((nOldStatus = GDB_ST_OFF), GDB_ST_ON, nOldStatus)
+      EgtSetStatus(Scene1.GetCtx, nId, nStat)
+      EgtSetMark(Scene1.GetCtx, nId)
+      m_nOldIdTree = nId
+      ' imposto il ridisegno della scena
+      Scene1.Invalidate()
+   End Sub
+
+   Private Function RevertOldIdInObjTree() As Integer
+      ' salvo il vecchio Id
+      Dim nOldId As Integer = m_nOldIdTree
+      ' se non nullo...
+      If EgtExistsObj(Scene1.GetCtx, m_nOldIdTree) Then
+         ' ripristino il modo e lo stato precedente dell'oggetto e lo smarco
+         EgtRevertMode(Scene1.GetCtx, m_nOldIdTree)
+         EgtRevertStatus(Scene1.GetCtx, m_nOldIdTree)
+         EgtResetMark(Scene1.GetCtx, m_nOldIdTree)
+         ' annullo oggetto da ripristinare
+         m_nOldIdTree = GDB_ID_NULL
+      End If
+      Return nOldId
+   End Function
+
+   Private Function SelectIdInObjTree(ByVal nId As Integer) As Boolean
+
+      Dim tNode() As TreeNode = TreeView1.Nodes.Find(nId.ToString, True)
+      If tNode.Length > 0 Then
+         TreeView1.SelectedNode = tNode(0)
+         Return True
+      Else
+         Return False
+      End If
+   End Function

 End Class
@@ -31,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.2")> 
+<Assembly: AssemblyFileVersion("1.5.9.2")> 
@@ -33,7 +33,7 @@ Public Class Scene
      m_nGseContext = EgtInitGeomDB()
      EgtSetDefaultMaterial(m_nGseContext, 255, 165, 0)
      EgtInitScene(m_nGseContext, Handle, 3, True, 24, 32)
-      EgtSetBackground(m_nGseContext, 140, 154, 168, 40, 44, 48)
+      EgtSetBackground(m_nGseContext, 140, 154, 168, 40, 44, 48, False)
      EgtInitTscExec(m_nGseContext)
   End Sub

@@ -87,7 +87,7 @@ Public Class Scene
      If e.Button = Windows.Forms.MouseButtons.Middle Then
         If m_nStatus = ST.ZOOMWIN Then
            EgtResetWinRect(m_nGseContext, False)
-            EgtZoomWin(m_nGseContext, m_PrevPoint, e.Location, True)
+            EgtZoomWin(m_nGseContext, m_PrevPoint, e.Location)
         End If
         If m_nStatus <> ST.NULL Then
            m_nStatus = ST.NULL
@@ -105,15 +105,15 @@ Public Class Scene
      If e.Button = Windows.Forms.MouseButtons.Middle Then
         If m_nStatus = ST.ZOOMWIN Then
            Cursor = New Cursor(Me.GetType(), "ZoomWin.cur")
-            EgtSetWinRect(m_nGseContext, m_PrevPoint, e.Location, True)
+            EgtSetWinRect(m_nGseContext, m_PrevPoint, e.Location)
            'Il punto di riferimento deve rimanere quello originale
         ElseIf m_nStatus = ST.ROT Then
            Cursor = New Cursor(Me.GetType(), "Rotate.cur")
-            EgtRotateCamera(m_nGseContext, m_PrevPoint, e.Location, True)
+            EgtRotateCamera(m_nGseContext, m_PrevPoint, e.Location)
            m_PrevPoint = e.Location
         ElseIf m_nStatus = ST.PAN Then
            Cursor = New Cursor(Me.GetType(), "Pan.cur")
-            EgtPanCamera(m_nGseContext, m_PrevPoint, e.Location, True)
+            EgtPanCamera(m_nGseContext, m_PrevPoint, e.Location)
            m_PrevPoint = e.Location
         Else
            m_nStatus = ST.NULL
@@ -135,7 +135,7 @@ Public Class Scene
         dCoeff = 1 / dCoeff
      End If
     ' eseguo zoom
-      EgtZoomOnPoint(m_nGseContext, e.Location, dCoeff, True)
+      EgtZoomOnPoint(m_nGseContext, e.Location, dCoeff)
   End Sub

   Private Sub ShowCursorPos(ByVal WinXY As Point)
@@ -117,6 +117,9 @@
    <CodeAnalysisIgnoreBuiltInRules>false</CodeAnalysisIgnoreBuiltInRules>
    <CodeAnalysisFailOnMissingRules>false</CodeAnalysisFailOnMissingRules>
  </PropertyGroup>
+  <PropertyGroup>
+    <ApplicationIcon>Resources\TestEIn.ico</ApplicationIcon>
+  </PropertyGroup>
  <ItemGroup>
    <Reference Include="Microsoft.VisualBasic.PowerPacks.Vs, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL" />
    <Reference Include="System" />
@@ -142,6 +145,12 @@
    <Import Include="System.Xml.Linq" />
  </ItemGroup>
  <ItemGroup>
+    <Compile Include="AboutBox1.Designer.vb">
+      <DependentUpon>AboutBox1.vb</DependentUpon>
+    </Compile>
+    <Compile Include="AboutBox1.vb">
+      <SubType>Form</SubType>
+    </Compile>
    <Compile Include="Form1.vb">
      <SubType>Form</SubType>
    </Compile>
@@ -173,6 +182,9 @@
    </Compile>
  </ItemGroup>
  <ItemGroup>
+    <EmbeddedResource Include="AboutBox1.resx">
+      <DependentUpon>AboutBox1.vb</DependentUpon>
+    </EmbeddedResource>
    <EmbeddedResource Include="Form1.resx">
      <DependentUpon>Form1.vb</DependentUpon>
    </EmbeddedResource>
@@ -225,6 +237,9 @@
    <EmbeddedResource Include="Resources\Pointer.cur" />
    <EmbeddedResource Include="Resources\Rotate.cur" />
  </ItemGroup>
+  <ItemGroup>
+    <Content Include="Resources\TestEIn.ico" />
+  </ItemGroup>
  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
  <PropertyGroup>
    <PostBuildEvent>copy c:\EgtDev\TestEIn\bin\Release32\TestEIn.exe c:\EgtProg\TestEIn\TestEInR32.exe