= I click on item 0:

OnSelectItem: Item not assigned!
OnChange: Index=0 Virtual Count=3001 Item=Caption 0  Selected=TRUE
OnSelectItem: Item=Caption 0  Item.Selected=TRUE  Selected=TRUE

= I now shift-click on Item3, to select all 4 Items:

VirtualItemList.OnSelectItem: Item not assigned!
*** OnDataStateChange: Start=0  End=3
*** OnDataStateChange: 0 Item: Caption 0  Selected=TRUE
*** OnDataStateChange: 1 Item: Caption 1  Selected=TRUE
*** OnDataStateChange: Changing VirtualItem Caption 1 to TRUE
*** OnDataStateChange: 2 Item: Caption 2  Selected=TRUE
*** OnDataStateChange: Changing VirtualItem Caption 2 to TRUE
*** OnDataStateChange: 3 Item: Caption 3  Selected=TRUE
*** OnDataStateChange: Changing VirtualItem Caption 3 to TRUE
OnChange: Index=0 Virtual Count=3001 Item=Caption 0  Selected=TRUE
OnChange: Index=3 Virtual Count=3001 Item=Caption 3  Selected=TRUE

MouseUp: Base Selcount=4 Virtual=4 REAL=4

NOTE:
- OnSelectItem is NOT called during 'Shift-Click' for the Selected items. 
- I now must use OnDataStateChange to Select these. 
- OnChange is ONLY called for Index 0 and 3. Not for the ones in between.

= I now click on Item 4. (This should un-select all other Items. It does do this on the screen...)

OnSelectItem: Item not assigned!
OnChange: Index=3 Virtual Count=3001 Item=Caption 3  Selected=FALSE
*** OnChange: Caption 3 has changed to: FALSE
OnChange: Index=4 Virtual Count=3001 Item=Caption 4  Selected=TRUE
*** OnChange: Caption 4 has changed to: TRUE
OnSelectItem: Item=Caption 4  Item.Selected=TRUE  Selected=TRUE

MouseUp: Base Selcount=1 Virtual=1 REAL=4

NOTE: 
- The OnChange only reported UNSelect for Item 3, and the Select for Item 4, but there is no event anywhere for Item 0, 1 and 3.
- I now have FOUR Selected items in my Virtual List (The SelCount is hard overwritten from the ListView Selcount)