Public Overrides Sub OnDblClick() ...snip... m_newLineFeedback.Stop() ...snip... Dim feature As IFeature feature = ftrClass.CreateFeature feature.Shape = m_newlineFeedBack m_newLineFeedback = Nothing feature.Store()
If you're setting your own symbol for the tool then you'll need to set the ROP2 property to NotXorPen.
symbol.ROP2 = esriRasterOpCode.esriROPNotXOrPen
Further to this question, I want to save the line feedback which I've stored in a module variable m_newlineFeedBack into a shapefile.
Can I do this?Public Overrides Sub OnDblClick() ...snip... m_newLineFeedback.Stop() ...snip... Dim feature As IFeature feature = ftrClass.CreateFeature feature.Shape = m_newlineFeedBack m_newLineFeedback = Nothing feature.Store()
Dim dataset As IDataset = fLayer.FeatureClass dataset = fLayer.FeatureClass Dim ftrClass As IFeatureClass = dataset ' Turn the new line feedback into a shape Dim lineGeometry As IGeometry5 ' Stop the feedback and put into geometry lineGeometry = m_newLineFeedback.Stop If Not lineGeometry Is Nothing Then '' Save the digitized line in the new shapefile Dim feature As IFeature feature = ftrClass.CreateFeature feature.Shape = lineGeometry feature.Store()