Консультация № 109747
16.11.2007, 20:25
0.00 руб.
0 2 2
Здравствуйте! Написал программу блокировки файлов. Есть ListBox, как можно сделать так, чтобы можно было перетаскивать файлы из проводника Windows в ListBox, и туда копировался путь этого файла??
Наподобии как добавлять музыку в плейлист винампа...

Обсуждение

Неизвестный
17.11.2007, 00:10
общий
это ответ
Здравствуйте, Зощенко Алексей!

<a href=http://delphiworld.narod.ru/base/drag_files_list.html>Как получить список файлов из Проводника</a>
<a href=http://delphiworld.narod.ru/base/wm_dropfiles.html>Перетаскивать файлы в свою программу - WM_DROPFILES</a>
давно
Профессионал
153662
1070
19.11.2007, 16:58
общий
это ответ
Здравствуйте, Зощенко Алексей!
Я использую вот такой код в плэеере собственного изготовления.

Приложение:
private { Private declarations } procedure WMDropFiles(var Msg: TWMDropFiles); message WM_DROPFILES; //получение сообщений о переносе файла в окно приложенияprocedure TPlayer.WMDropFiles(var Msg: TWMDropFiles);var CFileName: array[0..MAX_PATH] of Char; // переменная, хранящая имя файлаbegin try If DragQueryFile(Msg.Drop, 0, CFileName, MAX_PATH)> 0 then // получение пути файла begin LIstBox.Items.Add(CFileName); // имя файла Msg.Result := 0; end; finally DragFinish(Msg.Drop); // отпустить файл end;
Об авторе:
Мои программы со статусом freeware для Windows на моём сайте jonix.ucoz.ru

Форма ответа