Hey all! I've never had this problem before, but for some reason
when I add rows do a listbox through drag and drop, the text isn't
actually showing up. I ran myself ragged with the debugger --
everything looked fine -- before changing the ColumnTypes to
editable. Now I realize that the text is making it in there, but for
some reason it is invisible in the cells. Making the cell active
makes the text appear. But I would rather it just worked from the
beginning.
Anybody have any ideas why this might be? I've tried refreshing the
Listbox after I'm done, but it doesn't help. I'm using 5.5.4 on and
older g4, with 10.4.7...
Here's my DropObject code:
Sub DropObject(obj As DragItem)
dim parts(2),txt as String
dim i as Integer
Do
If Obj.TextAvailable then
parts = split(Obj.Text,"^") // passing numerous cells via
DragItem.Text, separated by carrots
Me.AddRow ""
i = 0
for each txt in parts
me.Cell(me.LastIndex,i) = txt
i = i + 1
next
end if
Loop until Not obj.NextItem
End Sub
Thanks!
Ian
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>