Setting of an autofill for both tmax and tmin receivers

IDEMSInternational · Aug 24, 2020 · ec5a170 · ec5a170
1 parent 545eb45
commit ec5a170
Showing 1 changed file with 5 additions and 0 deletions.
diff --git a/instat/dlgClimaticCheckDataTemperature.vb b/instat/dlgClimaticCheckDataTemperature.vb
@@ -623,6 +623,11 @@ Public Class dlgClimaticCheckDataTemperature
         StrTmaxCol = frmMain.clsRLink.GetClimaticColumnOfType(StrDataFrame, "tmax_label")
         StrTminCol = frmMain.clsRLink.GetClimaticColumnOfType(StrDataFrame, "tmin_label")
 
+        If StrTmaxCol <> "" AndAlso StrTminCol <> "" Then
+            ucrReceiverElement1.Add(StrTmaxCol, StrDataFrame)
+            ucrReceiverElement2.Add(StrTminCol, StrDataFrame)
+        End If
+
     End Sub
 
     Private Sub ucrReceiverStation_ControlValueChanged(ucrChangedControl As ucrCore) Handles ucrReceiverStation.ControlValueChanged