Delphi drag-and-drop file from application to shell?

Есть более свежая версия этого решения вплоть до XE8, https://github.com/landrix/The-new-Drag-and-Drop-C... .... но там проблема в том что функция DoDragDrop которая по сути отвечает за результат переноса всегда возвращает не удачу... почему пока не разобрался, если будут идии или альтернативные варианты, только СПАСИБО БОЛЬШОЕ!!!!