# Problem with ThemeItem Selection **URL:** \ **Category:** WinForms\ **Created:** [February 25, 2011, 5:46am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605 "2011-02-25T05:46:09Z")\ **Posts on this page:** 20\ **Page:** 1
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [February 25, 2011, 5:46am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/1 "2011-02-25T05:46:09Z")
Dear Yale As per Sample made in C Sharp for Map suite explorer, I have created ThemeItem and ThemeView Control in vb.net. I think there is something missing in code, so the event on check box change and selection of theme item not fire. Pleas help. Private Sub SetupThemeItem(ByVal layer As Layer)Dim themeItem As New ThemeItem() themeItem.ShapeName = layer.Name AddHandler themeItem.ItemCheckedChanged, AddressOf themeItem\_ItemCheckedChanged AddHandler themeItem.ItemLinkClicked, AddressOf themeItem\_ItemLinkClicked AddHandler themeItem.ThemeItemClick, AddressOf themeItem\_ThemeItemClick AddHandler themeItem.ThemeItemRightClick, AddressOf themeItem\_ThemeItemRightClickEnd Sub Private Sub themeItem\_ItemCheckedChanged(ByVal sender As Object, ByVal e As ShapeEventArgs)If DirectCast(winformsMap1.Overlays(0), LayerOverlay).Layers.Contains(e.ShapeName) Then winformsMap1.Overlays(0).Lock.EnterWriteLock() Try DirectCast(winformsMap1.Overlays(0), LayerOverlay).Layers(e.ShapeName).IsVisible = e.IsShow Finally winformsMap1.Overlays(0).Lock.ExitWriteLock() End Try   Try DrawImage() Catch End Try End If End Sub But the ThemeItem\_ItemCheckedChanged Event not fire. Or Please can you provide Map Suite Explorer Sample copy in Vb.net Regrards Sanjay         ThemeView.Items.Add(layer.Name, themeItem)  End Sub ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [February 25, 2011, 7:53am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/2 "2011-02-25T07:53:34Z")
Sanjay, Thanks for your posts and questions.   I am sorry to say that it is very hard to provide the VB sample for Map Suite Explorer for now as the project is somehow huge, is it possible to provide me your sample to recreate this issue, I reviewed the code above and I did not find any problem with it.   Any more questions please feel free to let me know.   Thanks.   Yale ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [February 25, 2011, 10:37am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/3 "2011-02-25T10:37:02Z")
Yale,      I have attached my sample with ticket no 3370. Please review my code and correct is if any, so that I will able to check / uncheck the layer and selct that layer for movement up/down   Regards   Sanjay ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [February 28, 2011, 8:17am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/4 "2011-02-28T08:17:49Z")
Sanjay,      I have replied to you via the ticket, please check.      Any more questions please feel free to let me know.      Thanks.      Yale  ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 17, 2011, 11:31am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/5 "2011-03-17T11:31:45Z")
Yale,      I have Tab FeatureLayer, it shows data. I have done thematic color or this layer. So, I before implementing thematic color, I want to make copy of FeatureLayer. So the thematic color can apply on copy of FeatureLayer, and original not be disturbed.    How to made a clone of FeatureLayer.      Regards   Sanjay ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 18, 2011, 9:48am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/6 "2011-03-18T09:48:23Z")
Sanjay,      Thanks for your post and questions.      We need to consider using the serialization/deserialization for the feature layer, while I am sorry to say that for now not all feature layer can be serialized, following posts shows how to serialize the shape file feature layer, pls take a look if you are intested.   [gis.thinkgeo.com/Support/DiscussionForums/tabid/143/aff/21/aft/8134/afv/topic/Default.aspx](http://gis.thinkgeo.com/Support/DiscussionForums/tabid/143/aff/21/aft/8134/afv/topic/Default.aspx)      Any more questions please feel free to let me know.      Thanks.      Yale  ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 22, 2011, 12:35am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/7 "2011-03-22T00:35:40Z")
Yale,   I don’t want to save layer permanently into my disk. I just want to make copy of feature layer for a session.      Regards   Sanjay ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 22, 2011, 12:54am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/8 "2011-03-22T00:54:06Z")
Sanjay,      You can save all features to a InMemoryFeatureLayer, about how to add feature you can look at HowDoI samples-\>AddFeaturesFromAFeatureLayer sample.      Thanks,      James ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 22, 2011, 1:22am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/9 "2011-03-22T01:22:51Z")
James,      I think you didn’t understand properly. I am not trying to copy a feature, although I am trying to copy a TabFileFeatureLayer, which will be treated as different object.      If any thing more you want to clear please let me know.      Regards   Sanjay ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 22, 2011, 9:07am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/10 "2011-03-22T09:07:55Z")
Sanjay, Thanks for your post and feedbacks.   If you want to keep this copy in memory or session, why not try to save those properties used to construct the feature layer instead, for example, try to keep the pathFileName, idColumnName, featureSchemaName instead of keeping the TabFeatureLayer, and then try to create a new TabFeatureLayer using these properties when needed. What is your opinion?   Any more questions please feel free to let me know.   Thanks.   Yale ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 23, 2011, 12:12am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/11 "2011-03-23T00:12:07Z")
Yale,      You mean to say to create a new TabFeatureLayer with different name, whenever required, with help of already loaded tab file. It could be one solution.      Actually where I required a copy of TabFeatureLayer, that is different form. Initially when TabFutureLayer created that process is wriiten on Main form. Also I have to find the file name from a colletion of Tab File. Is the copy facility not availalable in API?      What is cloneDeep?    It is working with Layer, but not with FeatureLayer?      Regards   Sanjay  ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 23, 2011, 12:59am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/12 "2011-03-23T00:59:02Z")
Sanjay,      CloneDeep rely on serializable, however TabFeatureLayer didn’t support serializable so that you couldn’t use CloneDeep to copy it.      I have updated the FdoExtension and make the TabFeatureLayer support it, please get the latest version 4.5.143.0 tommorrow and have a try.      Thanks,      James ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 23, 2011, 2:28am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/13 "2011-03-23T02:28:15Z")
James,    After download from customer portal, how I use this update. Please guide me. In updated version, which property will be use. Please brief them.  Regards  Sanjay ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 23, 2011, 2:46am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/14 "2011-03-23T02:46:06Z")
Sanjay, As your mention by using CloneDeep API: `                TabFileFeatureLayer layer = new TabFileFeatureLayer(@"..\..\SampleData\Data\HoustonMuniBdySamp_Boundary.TAB", "FID", "OGRSchema", "HoustonMuniBdySamp_Boundary", "GEOMETRY");                layer.ZoomLevelSet.ZoomLevel01.DefaultAreaStyle = AreaStyles.CreateSimpleAreaStyle(GeoColor.FromArgb(100, GeoColor.SimpleColors.Green), GeoColor.SimpleColors.Green);                layer.ZoomLevelSet.ZoomLevel01.ApplyUntilZoomLevel = ApplyUntilZoomLevel.Level20;                TabFileFeatureLayer copiedLayer = layer.CloneDeep() as TabFileFeatureLayer;` James ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 23, 2011, 3:38am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/15 "2011-03-23T03:38:44Z")
James,      How to update DLL file.      Regards ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 23, 2011, 3:48am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/16 "2011-03-23T03:48:20Z")
Sanjay,      You can find the old FdoExtension.dll on your disk, delete it and copy the new FdoExtension.dll to the same folder, or you can change the reference of your application and point to the new FdoExtension.dll.      Thanks,      James ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 25, 2011, 1:09am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/17 "2011-03-25T01:09:07Z")
James,  I have changed the FdoExtentio.dll (4.5.0.144 and 4.5.144.0 both Tested), but I am getting error like  Type 'MapSuiteFdoExtension.GeoFdoFeatureSource' in Assembly 'MapSuiteFdoExtension, Version=1.0.0.0, Culture=neutral, PublicKeyToken=null' is not marked as serializable.  Actually my proceess of copy like this,  Dim Layer As FeatureLayer = winformsMap1.FindFeatureLayer(drpTable.Text.Trim)  'drpTable.Text contains the name of TabFeatureLayer  dim copiedLayer As TabFileFeatureLayer = TryCast(Layer.CloneDeep(), TabFileFeatureLayer) its generates error, also I have tried like below but same result Dim    t As TabFileFeatureLayer = TryCast(Layer, TabFileFeatureLayer) Dim copiedLayer As TabFileFeatureLayer = t.CloneDeep Regards  Sanjay   ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 25, 2011, 3:04am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/18 "2011-03-25T03:04:38Z")
Sanjay, You may find the wrong layer which type is not TabFileFeatureLayer, because I did following test, it works properly.             Dim layer As New TabFileFeatureLayer()             Dim copiedLayer As TabFileFeatureLayer = TryCast(layer.CloneDeep(), TabFileFeatureLayer) Thanks, James ---
**Author:** ![Sanjay](https://community.thinkgeo.com/letter_avatar_proxy/v4/letter/s/58956e/32.png) [@Sanjay](https://community.thinkgeo.com/u/Sanjay)\ **Post date:** [March 26, 2011, 4:22am UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/19 "2011-03-26T04:22:12Z")
James, You are right. I am also not getting error when I have created a new TabFeatureLayer and try to use CloneDeep API in the same module. Please try to like this. On page load Dim worldLayer As New TabFileFeatureLayer("D:\Desktop Working\New Folder\upw vector\vector.tab", Nothing)worldLayer.Name = "Vector" Dim customLineStyle As Style = New AreaStyle(New GeoPen(GeoColor.SimpleColors.Black, 1)) Dim customAreaStyle As Style = New LineStyle(New GeoPen(GeoColor.SimpleColors.Black, 1)) Dim customPointStyle As Style = New PointStyle(PointSymbolType.Star, New GeoSolidBrush(GeoColor.SimpleColors.LightGreen), 10) worldLayer.ZoomLevelSet.ZoomLevel01.CustomStyles.Add(customAreaStyle)worldLayer.ZoomLevelSet.ZoomLevel01.CustomStyles.Add(customPointStyle)worldLayer.ZoomLevelSet.ZoomLevel01.CustomStyles.Add(customLineStyle)worldLayer.ZoomLevelSet.ZoomLevel01.ApplyUntilZoomLevel = ApplyUntilZoomLevel.Level20 Dim staticOverlay As New LayerOverlay() staticOverlay.Layers.Add("WorldLayer", worldLayer) WinformsMap1.Overlays.Add(staticOverlay) Process.GetCurrentProcess().ProcessorAffinity = CType(1, System.IntPtr) worldLayer.Open() WinformsMap1.CurrentExtent = worldLayer.GetBoundingBox worldLayer.Close() WinformsMap1.Refresh()   Now click on copy button and try to use following code: Dim  Layer As FeatureLayer = WinformsMap1.FindFeatureLayer("WorldLayer") Layer.Close() Dim copiedLayer As TabFileFeatureLayer = TryCast(Layer.CloneDeep(), TabFileFeatureLayer) We can not careate a new TabFeatureLayer (as you shown) for copy purpose, beacuse TabFeatureLayer is already created. We have to find the FeatureLayer to create copy, I tried with above code. If anything wrong with code please let me know. In other way you can try to make copy with WinForms1.FindFeatureLayer Thanks Sanjay    WinformsMap1.MapUnit = GeographyUnit.DecimalDegree WinformsMap1.BackgroundOverlay.BackgroundBrush = New GeoSolidBrush(GeoColor.SimpleColors.Transparent) Now Create a Button to copy above created TabFileFeatureLayer: I have Created Like below: Dim Layer As FeatureLayer = WinformsMap1.FindFeatureLayer("WorldLayer") Layer.Close() Dim copiedLayer As TabFileFeatureLayer = TryCast(Layer.CloneDeep(), TabFileFeatureLayer)WinformsMap1.CurrentExtent =New RectangleShape(-90, 45, 90, -45)   ---
**Author:** ![ThinkGeo](https://community.thinkgeo.com/user_avatar/community.thinkgeo.com/thinkgeo/32/25029_2.png) [@ThinkGeo](https://community.thinkgeo.com/u/ThinkGeo)\ **Post date:** [March 27, 2011, 8:57pm UTC](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605/20 "2011-03-27T20:57:42Z")
Sanjay,      I tested your code and I can recreate your problem, I think you need to CloneDeep TabFileFeatureLayer before calling TabFileFeatureLayer.Open(), otherwise it will throw exception, the reason is that when you call open method, it will load some unmanaged source which can’t be serialize.      Sorry for inconvenice.      James [Next page](https://community.thinkgeo.com/t/problem-with-themeitem-selection/1605.md?page=2)