B4J Question Solved: [jDragAndDrop2] How to put files on the DragBoard

Sub txtSource_DragDetected(e As MouseEvent)
        Dim f As JavaObject 
        f.InitializeNewInstance("java.io.File",Array(File.Combine(File.DirTemp,"MyFile.txt")))
        Dim files As List
        files.Initialize
        files.Add(f)
        DragDrop.SetDragModeAndData(TransferMode.ANY, Array As String("application/x-java-file-list"),Array As Object(files))
        Log("DragDetected : Starting drag")
End Sub