From ceddfd631442b6150d28814d63f24117ad71934c Mon Sep 17 00:00:00 2001
From: "ankostis@host:STUW025" <ankostis@gmail.com>
Date: Tue, 27 May 2014 11:17:52 +0200
Subject: [PATCH] GUI: FIX "Calibrate" button not to change to "Evaluate" after
completion.
---
CSE/Calculation/Signal_identification.vb | 2 +-
CSE/GUI/CSEMain.vb | 8 ++++----
2 files changed, 5 insertions(+), 5 deletions(-)
diff --git a/CSE/Calculation/Signal_identification.vb b/CSE/Calculation/Signal_identification.vb
index 8fa6605..3b75c5b 100644
--- a/CSE/Calculation/Signal_identification.vb
+++ b/CSE/Calculation/Signal_identification.vb
@@ -8,7 +8,7 @@
If SectionDev Then
' Output on the GUI
- fInfWarErrBW(6, False, "Identifing the sections")
+ fInfWarErrBW(6, False, "Identifying the sections")
' Devide the measured data into there sections
DevInSec(vMSC)
diff --git a/CSE/GUI/CSEMain.vb b/CSE/GUI/CSEMain.vb
index 82ff871..c8019bd 100644
--- a/CSE/GUI/CSEMain.vb
+++ b/CSE/GUI/CSEMain.vb
@@ -194,7 +194,7 @@ Public Class CSEMain
' Read the data from the GUI
If Not fGetOpt(True, Cali) Then
- Me.ButtonCalC.Text = "Calculate"
+ Me.ButtonCalC.Text = "Calibrate"
Exit Sub
End If
@@ -210,12 +210,12 @@ Public Class CSEMain
If resEx = MsgBoxResult.Yes Then
MkDir(OutFolder)
Else
- Me.ButtonCalC.Text = "Calculate"
+ Me.ButtonCalC.Text = "Calibrate"
Exit Sub
End If
Else
fInfWarErr(9, False, "No outputfolder is given!")
- Me.ButtonCalC.Text = "Calculate"
+ Me.ButtonCalC.Text = "Calibrate"
Exit Sub
End If
End If
@@ -618,7 +618,7 @@ Public Class CSEMain
' Reset the calculate button to calculate
If Cali Then
- Me.ButtonCalC.Text = "Calculate"
+ Me.ButtonCalC.Text = "Calibrate"
Me.TextBoxRVeh.Text = Math.Round(fv_veh, 3).ToString
Me.TextBoxRAirPos.Text = Math.Round(fv_pe, 3).ToString
Me.TextBoxRBetaMis.Text = Math.Round(beta_ame, 2).ToString
--
GitLab