Drag 'n Drop from TListBox with Drag Image

Does anybody know how to display a drag image when drag 'n dropping from a
list box in the same way that a TTreeView or TListView component displays
the node as an image when dragged.  Also, in the Treeview and ListView, the
image disappears when the mouse pointer dragged outside the treeview or
listview. How can the dragimage be kept visible?

Thanks

-----------------------------------
Andrew Jackson
C-C-C Technology Ltd.