InsertItem method does not set ParentID correctly

Summary

Id: 7.2
Type: Bug Bug
Current Status: Open

Detail

25 Apr 2003 Open Jens Neuhalfen

When inserting items the parent-id was not set correctly. I added a two (actually: three) line fix in InsertItem

..... .bChevronAppearance = False .bChevronBehaviour = False .bShowCheckAndIcon = False .sKey = sKey 'jn: copy parent id Dim lBeforeParentIndex As Long lBeforeParentIndex = m_tMI(lIndexBefore).lParentIndex If (0 <> lBeforeParentIndex) Then .lParentId = m_tMI(lBeforeParentIndex).lActualID .lParentIndex = lBeforeParentIndex End If End With