BUG: ListView: ListItems disappear

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

ListItems disappear under certain circumstances:

-Open a new project
-put a CommandButton and a ListView on the Form1
-use this code:

Private Sub Form_Load()
  Me.Width = 2175
  Me.Height = 4110

  Command1.Top = 120
  Command1.Height = 375
  Command1.Width = 1815
  Command1.Left = 120

  ListView1.Top = 600
  ListView1.Left = 120

  ListView1.HideSelection = False
  ListView1.View = xtpListViewList

  Dim lngItem As Long
  For lngItem = 1 To 16
    ListView1.ListItems.Add , CStr(lngItem), String(lngItem, Chr(lngItem + 74))
  Next
  ListView1.Arrange = xtpListViewArrangeAutoTop
End Sub

Private Sub Form_Resize()
  On Error Resume Next
  ListView1.Height = Me.ScaleHeight - 700
  ListView1.Width = Me.ScaleWidth - 240
End Sub

Private Sub Command1_Click()
  On Error Resume Next
  Dim Item As XtremeSuiteControls.ListViewItem
  For Each Item In ListView1.ListItems
    If Item.Key = "14" Then
      Item.Selected = True
      Exit For
    End If
  Next

  ListView1.SelectedItem.EnsureVisible
End Sub

-start the application and press the button
-Item with key 14 is selected and visible: Good!  
-now increase the height of the form
-ListItems disappear and there's no scrollbar 

This can happen also if you resize the Form/ListView by code!
Don't I use the ListView as intended?

Another curious behavoir is that the HideSelection-Property is obviously reset if you chance the View-Property. You can check this if you change the order of the two lines in the sample code above.