Index: src/Deltares.DSoilModel.Forms.Tests/BoringLookup1DControlTests.cs
===================================================================
diff -u
--- src/Deltares.DSoilModel.Forms.Tests/BoringLookup1DControlTests.cs (revision 0)
+++ src/Deltares.DSoilModel.Forms.Tests/BoringLookup1DControlTests.cs (revision 341)
@@ -0,0 +1,47 @@
+using Deltares.Geotechnics;
+using Deltares.Standard.Forms;
+using NUnit.Framework;
+
+namespace Deltares.DSoilModel.Forms.Tests
+{
+ [TestFixture, RequiresSTA]
+ class BoringLookup1DControlTests : ControlTester
+ {
+ protected override IPropertyControl CreatePropertyControl()
+ {
+ return new BoringLookup1DControl();
+ }
+
+ [Test]
+ public void ControlBindingsTest()
+ {
+ // there are no extra bindings
+ // at least let's test assigned name
+ Assert.AreEqual("Boring", PropertyControl.Name);
+ }
+
+ [Test]
+ public void SelectedObjectTest()
+ {
+ var lookup = new BoringLookup1D
+ {
+ Boring = new Boring()
+ };
+
+ Assert.AreNotSame(lookup, PropertyControl.SelectedObject); // because we haven't assign it yet
+ PropertyControl.SelectedObject = lookup;
+ Assert.AreSame(lookup, PropertyControl.SelectedObject);
+
+ var subcontrol = GetPrivateField(PropertyControl, "BoringControl") as BoringControl;
+ Assert.NotNull(subcontrol);
+ Assert.AreSame(lookup.Boring, subcontrol.SelectedObject);
+ }
+
+ [Test]
+ public void IsVisibleTest()
+ {
+ Assert.IsTrue(PropertyControl.IsVisible); // always true
+ }
+ }
+}
+
Index: src/Deltares.DSoilModel.Forms.Tests/Deltares.DSoilModel.Forms.Tests.csproj
===================================================================
diff -u -r338 -r341
--- src/Deltares.DSoilModel.Forms.Tests/Deltares.DSoilModel.Forms.Tests.csproj (.../Deltares.DSoilModel.Forms.Tests.csproj) (revision 338)
+++ src/Deltares.DSoilModel.Forms.Tests/Deltares.DSoilModel.Forms.Tests.csproj (.../Deltares.DSoilModel.Forms.Tests.csproj) (revision 341)
@@ -92,6 +92,7 @@
+