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

Skip to content
Snippets Groups Projects
Commit 23e52b9e authored by Franz KOBER josef's avatar Franz KOBER josef
Browse files

added missing button code at EM-Form

parent 1bcd31f6
No related branches found
No related tags found
No related merge requests found
......@@ -573,12 +573,17 @@ Public Class ElectricMotorForm
OpenFiles(FileRepl(tbDragTorque.Text, GetPath(_emFile)))
End If
End Sub
Private Sub btnBrowseEmMapLow_Click(sender As Object, e As EventArgs) Handles btnBrowseEmMapLow.Click
Private Sub btnBrowseMaxTorqueLow_Click(sender As Object, e As EventArgs) Handles btnBrowseMaxTorqueLow.Click
If ElectricMachineMaxTorqueFileBrowser.OpenDialog(FileRepl(tbMaxTorqueLow.Text, GetPath(_emFile))) Then _
tbMaxTorqueLow.Text = GetFilenameWithoutDirectory(ElectricMachineMaxTorqueFileBrowser.Files(0), GetPath(_emFile))
End Sub
Private Sub btnBrowseEmMapLow_Click(sender As Object, e As EventArgs) Handles btnBrowseEmMapLow.Click
If ElectricMachineEfficiencyMapFileBrowser.OpenDialog(FileRepl(tbMapLow.Text, GetPath(_emFile))) Then _
tbMapLow.Text = GetFilenameWithoutDirectory(ElectricMachineEfficiencyMapFileBrowser.Files(0), GetPath(_emFile))
End Sub
Private Sub btnEmMapOpenLow_Click(sender As Object, e As EventArgs) Handles btnEmMapOpenLow.Click
Dim theFile As String
......@@ -590,4 +595,16 @@ Public Class ElectricMotorForm
OpenFiles(FileRepl(tbMapLow.Text, GetPath(_emFile)))
End If
End Sub
Private Sub btnMaxTorqueCurveOpenLow_Click(sender As Object, e As EventArgs) Handles btnMaxTorqueCurveOpenLow.Click
Dim theFile As String
theFile = FileRepl(tbMaxTorqueLow.Text, GetPath(_emFile))
If theFile <> NoFile AndAlso File.Exists(theFile) Then
OpenFiles(FileRepl(tbMaxTorqueLow.Text, GetPath(_emFile)), theFile)
Else
OpenFiles(FileRepl(tbMaxTorqueLow.Text, GetPath(_emFile)))
End If
End Sub
End Class
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