From e2d9beb6a66451b7252048f0300e76db90a8c888 Mon Sep 17 00:00:00 2001
From: Demetrio Cassarino <demetrio.cassarino@egalware.com>
Date: Mon, 30 Jun 2025 15:55:09 +0200
Subject: [PATCH] -cambiato processo

---
 CameraMng/FrmMain.designer.vb | 26 ++++++++++++--------------
 CameraMng/FrmMain.vb          |  8 ++++----
 2 files changed, 16 insertions(+), 18 deletions(-)

diff --git a/CameraMng/FrmMain.designer.vb b/CameraMng/FrmMain.designer.vb
index ea48741..2f6f253 100644
--- a/CameraMng/FrmMain.designer.vb
+++ b/CameraMng/FrmMain.designer.vb
@@ -73,9 +73,9 @@ Partial Class FrmMain
       Me.BtnStone = New System.Windows.Forms.Button()
       Me.BtnAbortDefAree = New System.Windows.Forms.Button()
       Me.BtnSaveAree = New System.Windows.Forms.Button()
-      Me.ImageControl1 = New ImageControl()
         Me.ComboBoxCameras = New System.Windows.Forms.ComboBox()
         Me.ComboBoxCameraCfg = New System.Windows.Forms.ComboBox()
+        Me.ImageControl1 = New ImageControl()
         Me.GBImgFromCam.SuspendLayout()
         Me.GBCorrected.SuspendLayout()
         Me.GBCalibration.SuspendLayout()
@@ -406,11 +406,21 @@ Partial Class FrmMain
         Me.BtnSaveAree.Name = "BtnSaveAree"
         Me.BtnSaveAree.UseVisualStyleBackColor = True
         '
+        'ComboBoxCameras
+        '
+        resources.ApplyResources(Me.ComboBoxCameras, "ComboBoxCameras")
+        Me.ComboBoxCameras.Name = "ComboBoxCameras"
+        '
+        'ComboBoxCameraCfg
+        '
+        resources.ApplyResources(Me.ComboBoxCameraCfg, "ComboBoxCameraCfg")
+        Me.ComboBoxCameraCfg.Name = "ComboBoxCameraCfg"
+        '
         'ImageControl1
         '
+        resources.ApplyResources(Me.ImageControl1, "ImageControl1")
         Me.ImageControl1.Image = Nothing
         Me.ImageControl1.initialimage = Nothing
-        resources.ApplyResources(Me.ImageControl1, "ImageControl1")
         Me.ImageControl1.MouseEnabled = True
         Me.ImageControl1.Name = "ImageControl1"
         Me.ImageControl1.Origin = New System.Drawing.Point(0, 0)
@@ -421,18 +431,6 @@ Partial Class FrmMain
         Me.ImageControl1.ZoomFactor = 1.0R
         Me.ImageControl1.ZoomOnMouseWheel = True
         '
-        'ComboBoxCameras
-        '
-        Me.ComboBoxCameras.FormattingEnabled = True
-        resources.ApplyResources(Me.ComboBoxCameras, "ComboBoxCameras")
-        Me.ComboBoxCameras.Name = "ComboBoxCameras"
-        '
-        'ComboBoxCameraCfg
-        '
-        Me.ComboBoxCameraCfg.FormattingEnabled = True
-        resources.ApplyResources(Me.ComboBoxCameraCfg, "ComboBoxCameraCfg")
-        Me.ComboBoxCameraCfg.Name = "ComboBoxCameraCfg"
-        '
         'FrmMain
         '
         resources.ApplyResources(Me, "$this")
diff --git a/CameraMng/FrmMain.vb b/CameraMng/FrmMain.vb
index 81b587a..122f39c 100644
--- a/CameraMng/FrmMain.vb
+++ b/CameraMng/FrmMain.vb
@@ -141,7 +141,7 @@ Public Class FrmMain
 
       SpessLastra = 0
 
-      For i As Integer = 0 To 3
+      For i As Integer = 1 To 4
          ComboBoxCameraCfg.Items.Add(i)
       Next
       ComboBoxCameraCfg.SelectedIndex = 0
@@ -307,7 +307,7 @@ Public Class FrmMain
       DirToReadCfg = GetIniValue("Data", "DataRoot", NomeFileIni, DirToReadCfg)
       ' Indirizzo il programma al processo desiderato
       If Not ModalitaNascosta Then
-         DirToReadCfg = DirToReadCfg & ComboBoxCameraCfg.SelectedIndex.ToString()
+         DirToReadCfg = DirToReadCfg & ComboBoxCameraCfg.SelectedItem.ToString()
       Else
          DirToReadCfg = DirToReadCfg & MainModule.IndexProc.ToString()
       End If
@@ -728,7 +728,7 @@ Public Class FrmMain
          DirToReadCfg = GetIniValue("Data", "DataRoot", NomeFileIni, DirToReadCfg)
          ' aggiungiamo indici processo corrente
          If Not ModalitaNascosta Then
-            DirToReadCfg = DirToReadCfg & ComboBoxCameraCfg.SelectedIndex.ToString()
+            DirToReadCfg = DirToReadCfg & ComboBoxCameraCfg.SelectedItem.ToString()
          Else
             DirToReadCfg = DirToReadCfg & MainModule.IndexProc.ToString()
          End If
@@ -810,7 +810,7 @@ Public Class FrmMain
       Try
          DirToReadCfg = GetIniValue("Data", "DataRoot", NomeFileIni, DirToReadCfg)
          If Not ModalitaNascosta Then
-            DirToReadCfg = DirToReadCfg & ComboBoxCameraCfg.SelectedIndex.ToString()
+            DirToReadCfg = DirToReadCfg & ComboBoxCameraCfg.SelectedItem.ToString()
          Else
             DirToReadCfg = DirToReadCfg & MainModule.IndexProc.ToString()
          End If