Procedure WMDropFiles(var Msg

Процедура обработки этого сообщения будет выглядеть следующим образом: