SOLVED: MultiSelect Problem...!?

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

I have a RC with 5 records. MultiSelection=True, MultiSelectMode=False

MultiSelect is not working properly for some odd reason. Using the CTRL key to select various items, no matter how many rows I select (>1), I am getting SelectedRows=2, and the two supposed selected rows are not highlighted, only the last one clicked.

Using Shift, if I click the first item, and Shift-Click the last, the count comes out right, but the rows are not actually selected or highlighted... when i drag those rows, only the highlighted one is dragged.

Has anyone experienced this at all?

Private Sub lstMessages_SelectionChanged()

  If lstMessages.SelectedRows.Count = 1 Then
    Dim ThreadID As String

    ThreadID = lstMessages.SelectedRows(0).Record.Item(0).Value
    CurrentThreadID = ThreadID

    StatusBar1.Panels(1).Text = ""

    If val(ThreadID) < 1 Then
      replyEditor.Enabled = False
      Exit Sub
    End If

    replyEditor.Enabled = True
    replyEditor.Tag = ThreadID & ","

  End If

  StatusBar1.Panels(1).Text = lstMessages.SelectedRows.Count & " selected"

End Sub

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
JasonG Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 07 July 2008 Status: Offline Points: 76	Post Options Post Reply Quote JasonG Report Post Thanks(0) Quote Reply Topic: SOLVED: MultiSelect Problem...!? Posted: 22 July 2008 at 3:34pm
	I have a RC with 5 records. MultiSelection=True, MultiSelectMode=False MultiSelect is not working properly for some odd reason. Using the CTRL key to select various items, no matter how many rows I select (>1), I am getting SelectedRows=2, and the two supposed selected rows are not highlighted, only the last one clicked. Using Shift, if I click the first item, and Shift-Click the last, the count comes out right, but the rows are not actually selected or highlighted... when i drag those rows, only the highlighted one is dragged. Has anyone experienced this at all? Private Sub lstMessages_SelectionChanged() If lstMessages.SelectedRows.Count = 1 Then Dim ThreadID As String ThreadID = lstMessages.SelectedRows(0).Record.Item(0).Value CurrentThreadID = ThreadID StatusBar1.Panels(1).Text = "" If val(ThreadID) < 1 Then replyEditor.Enabled = False Exit Sub End If replyEditor.Enabled = True replyEditor.Tag = ThreadID & "," End If StatusBar1.Panels(1).Text = lstMessages.SelectedRows.Count & " selected" End Sub
	Product: Xtreme SuitePro (ActiveX) 12.0.1 Platform: Windows Vista/XP Language: Visual Basic 6.0 SP6

Aaron Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 29 January 2008 Status: Offline Points: 2192	Post Options Post Reply Quote Aaron Report Post Thanks(0) Quote Reply Posted: 22 July 2008 at 4:35pm
	Hi, I have no problems with selecting rows in general. Shift / CTRL works as expected. There's only one issue which is already in my buglist Can you upload test project? I would like to see what is going wrong
	Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option....

jpbro Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 12 January 2007 Status: Offline Points: 1357	Post Options Post Reply Quote jpbro Report Post Thanks(0) Quote Reply Posted: 22 July 2008 at 7:25pm
	I've tried to reproduce the bug based on the description without success. I too would like a sample if possible...
	Product: Xtreme SuitePro (ActiveX) version 16.2.6 Platform: Windows XP - SP3 Language: Visual Basic 6.0 SP6

JasonG Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 07 July 2008 Status: Offline Points: 76	Post Options Post Reply Quote JasonG Report Post Thanks(0) Quote Reply Posted: 23 July 2008 at 8:24am
	I'm not sure Id be able to reproduce this in a test project. Let me investigate a little bit further and get back to you all.
	Product: Xtreme SuitePro (ActiveX) 12.0.1 Platform: Windows Vista/XP Language: Visual Basic 6.0 SP6

JasonG Members Profile Send Private Message Find Members Posts Add to Buddy List Groupie Joined: 07 July 2008 Status: Offline Points: 76	Post Options Post Reply Quote JasonG Report Post Thanks(0) Quote Reply Posted: 23 July 2008 at 8:51am
	Ok, we can scratch this one off the list. I was not handling the filtering in a very smart way... I had the code like this, so the RC was always being repopulated... Private Sub CommandBars_Update(ByVal Control As XtremeCommandBars.ICommandBarControl) If Control.Id = 1000 Then Dim L As CommandBarEdit Set L = Control lstMessages.filterText = L.Text lstMessages.Populate End If End Sub CHANGED TO Private Sub CommandBars_Update(ByVal Control As XtremeCommandBars.ICommandBarControl) If Control.Id = 1000 Then Dim L As CommandBarEdit Set L = Control txtFilter = L.Text End If End Sub Private Sub txtFilter_Change() lstMessages.FilterText = txtFilter lstMessages.Populate End Sub
	Product: Xtreme SuitePro (ActiveX) 12.0.1 Platform: Windows Vista/XP Language: Visual Basic 6.0 SP6