Code development platform for open source projects from the European Union institutions

Skip to content
Snippets Groups Projects
Commit 7ade28ee authored by Terry Burns's avatar Terry Burns Committed by Kostis ANAGNOSTOPOULOS
Browse files

WIP - Fixed some minor validation errors on Harness, + a few other minor UI...

WIP - Fixed some minor validation errors on Harness, + a few other minor UI issues such as regularising tab order and label spelling mistakes etc.

git-tfs-id: [http://tfs00.element.root.com:8080/tfs/TFSCollection]$/VECTO;C1684
parent 8c1a7dde
No related branches found
No related tags found
No related merge requests found
This diff is collapsed.
...@@ -393,7 +393,7 @@ Public function Validate_Pneumatics( ) As boolean ...@@ -393,7 +393,7 @@ Public function Validate_Pneumatics( ) As boolean
'Dead Volume Litres : txtDeadVolumeLitres 'Dead Volume Litres : txtDeadVolumeLitres
If Not IsZeroOrPostiveNumber(txtDeadVolumeLitres.Text) then If Not IsZeroOrPostiveNumber(txtDeadVolumeLitres.Text) then
errorProvider.SetError(txtDeadVolumeLitres ,"Please provide a non negative between 0 and 1.") errorProvider.SetError(txtDeadVolumeLitres ,"Please provide a non negative number.")
result=False result=False
Else Else
errorProvider.SetError(txtDeadVolumeLitres ,String.Empty) errorProvider.SetError(txtDeadVolumeLitres ,String.Empty)
...@@ -402,7 +402,7 @@ Public function Validate_Pneumatics( ) As boolean ...@@ -402,7 +402,7 @@ Public function Validate_Pneumatics( ) As boolean
'Dead Vol BlowOuts Per Litresper Hour : txtDeadVolBlowOutsPerLitresperHour 'Dead Vol BlowOuts Per Litresper Hour : txtDeadVolBlowOutsPerLitresperHour
If Not IsZeroOrPostiveNumber(txtDeadVolBlowOutsPerLitresperHour.Text) then If Not IsZeroOrPostiveNumber(txtDeadVolBlowOutsPerLitresperHour.Text) then
errorProvider.SetError(txtDeadVolBlowOutsPerLitresperHour ,"Please provide a non negative between 0 and 1.") errorProvider.SetError(txtDeadVolBlowOutsPerLitresperHour ,"Please provide a non negative number.")
result=false result=false
Else Else
errorProvider.SetError(txtDeadVolBlowOutsPerLitresperHour ,String.Empty) errorProvider.SetError(txtDeadVolBlowOutsPerLitresperHour ,String.Empty)
...@@ -542,6 +542,15 @@ Dim result As Boolean = true ...@@ -542,6 +542,15 @@ Dim result As Boolean = true
End Try End Try
'Alternator Gear Efficiency : txtAlternatorGearEfficiency
If Not IsNumberBetweenZeroandOne( txtAlternatorGearEfficiency.Text) then
ErrorProvider.SetError( txtAlternatorGearEfficiency, "Please enter a number between 0 an 1")
result = false
Else
ErrorProvider.SetError( txtAlternatorGearEfficiency,String.Empty)
End If
'Door Action Time : txtDoorActuationTimeSeconds 'Door Action Time : txtDoorActuationTimeSeconds
If Not IsPostiveNumber(txtDoorActuationTimeSeconds.Text) then If Not IsPostiveNumber(txtDoorActuationTimeSeconds.Text) then
errorProvider.SetError(txtDoorActuationTimeSeconds ,"Please provide a non negative number.") errorProvider.SetError(txtDoorActuationTimeSeconds ,"Please provide a non negative number.")
...@@ -769,7 +778,7 @@ Private Sub SmartResult_CellValidating( sender As Object, e As DataGridViewCell ...@@ -769,7 +778,7 @@ Private Sub SmartResult_CellValidating( sender As Object, e As DataGridViewCell
End If End If
End Sub End Sub
private sub resultCard_CellMouseUp( sender As Object, e as DataGridViewCellMouseEventArgs) private sub resultCard_CellMouseUp( sender As Object, e as DataGridViewCellMouseEventArgs) Handles gvResultsCardIdle.CellMouseUp, gvResultsCardTraction.CellMouseUp, gvResultsCardOverrun.CellMouseUp
Dim dgv As DataGridView = CType( sender, DataGridView) Dim dgv As DataGridView = CType( sender, DataGridView)
......
...@@ -11,7 +11,7 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VectoAuxiliariesTests", "VE ...@@ -11,7 +11,7 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VectoAuxiliariesTests", "VE
EndProject EndProject
Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution Items", "{DF50B0A7-5651-4568-9FB9-8768882CFFDB}" Project("{2150E333-8FDC-42A3-9474-1A3956D46DE8}") = "Solution Items", "Solution Items", "{DF50B0A7-5651-4568-9FB9-8768882CFFDB}"
EndProject EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "AuxillaryTestHarness", "AuxillaryTestHarness\AuxillaryTestHarness.vbproj", "{BFCFD8BD-2FF5-4F63-80CE-5B94FDC8298E}" Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "AuxiliaryTestHarness", "AuxillaryTestHarness\AuxiliaryTestHarness.vbproj", "{BFCFD8BD-2FF5-4F63-80CE-5B94FDC8298E}"
EndProject EndProject
Global Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution GlobalSection(SolutionConfigurationPlatforms) = preSolution
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment