Merge pull request #664 in VECTO/vecto-sim from...

Merge pull request #664 in VECTO/vecto-sim from ~EMQUARIMA/vecto-sim:bugfix/VECTO-776-decision-factor-df-field-is-emtied-after-each-simulation to develop

* commit '27125456':
  fix: storing path of DF target speed and DF velocity drop (driver model)

VECTO/Input Files/VectoJob.vb

@@ -49,6 +49,9 @@ Public Class VectoJob
     Private ReadOnly _engineFile As SubPath
     Private ReadOnly _gearboxFile As SubPath
 
+    Private ReadOnly _lacDfTargetSpeedFile As SubPath
+    Private ReadOnly _lacDfVelocityDropFile as SubPath
+
     Private _startStop As Boolean
     Public StartStopDelay As Double
 
@@ -97,6 +100,8 @@ Public Class VectoJob
         _vehicleFile = New SubPath
         _engineFile = New SubPath
         _gearboxFile = New SubPath
+        _lacDfTargetSpeedFile = New SubPath()
+        _lacDfVelocityDropFile = New SubPath()
 
         _driverAccelerationFile = New SubPath
 
@@ -281,8 +286,30 @@ Public Class VectoJob
     Public Property LacPreviewFactor As Double
     Public Property LacDfOffset As Double
     Public Property LacDfScale As Double
-    Public Property LacDfTargetSpeedFile As String
-    Public Property LacDfVelocityDropFile As String
+    Public Property LacDfTargetSpeedFile(Optional ByVal original As Boolean = false) As String
+        Get
+            If original Then
+                Return _lacDfTargetSpeedFile.OriginalPath
+                Else 
+                return _lacDfTargetSpeedFile.FullPath
+            End If
+        End Get
+        Set(value As String)
+            _lacDfTargetSpeedFile.Init(_myPath, value)
+        End Set
+    End Property
+    Public Property LacDfVelocityDropFile(optional ByVal original As Boolean = false) As String
+        Get
+            If original Then
+                Return _lacDfVelocityDropFile.OriginalPath
+            Else 
+                return _lacDfVelocityDropFile.FullPath
+            End If
+        End Get
+        Set(value As String)
+            _lacDfVelocityDropFile.Init(_myPath, value)
+        End Set
+    End Property
 
 
 #End Region