Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Приветствую, уважаемые эксперты!
В свою программу переношу файлы из проводника Windows. Использую функцию:
DragQueryFile(THandle(Msg.WParam), 0, FileName, SizeOf(Filename));
Как сделать так, чтобы при переносе одновременно нескольких файлов добовлялись все, а не только один первый?

Вопрос задал: Романов М.Ю. (статус: Посетитель) Вопрос отправлен: 16 августа 2009, 20:40 Состояние вопроса: открыт, ответов: 1.

Ответ #1. Отвечает эксперт: min@y™

У меня щас нет времени, чтобы подробно раписывать, однако, прицепляю к ответу тестовый проект, в котором мной написан компонент-потомок TListBox, который принимает файлы и добавляет их к себе в Items. Исходник посвящён именно разработке этого компонента, так что ничего лишнего там нет. Надеюсь, разберёшься.
Если нужно, чтобы файлы принимала форма, методы листбокса перенеси в форму и всё.
К ответу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки ответа)

Ответ отправил: min@y™ (статус: Доктор наук) Время отправки: 16 августа 2009, 21:04 Оценка за ответ: 5 Комментарий к оценке: Спасибо. Вполне достаточно.

Мини-форум вопроса

Мини-форум пуст.

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.