>Cetin,
>
>I see that, but now, how can i pass the value to the listbox?
>
>João Batista

Check :
Fun with OLE dragdrop
and :
OLE drga drop data formats
in solution.app

Here is an excerpt from OLEDragDrop (Solution.app):

...
CASE oDataObject.GetFormat(1) && Text
cText = oDataObject.GetData(1)

*-- Add the text as a new item in the list
This.AddItem( cText )
...
Cetin