|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.11.2008, 18:43 | #1 |
Пользователь
Регистрация: 30.09.2008
Сообщений: 33
|
Как по пути опредилить файл это или папка
Народ подзабыл чуток,не напоните??
Вот код для перетаскивания файлов в окно приложения- ет у нас в обработчике OnCreate: DragAcceptFiles(Handle, true); Ето в описании класса TForm: protected procedure WMDropFiles (var Msg: TMessage); message wm_DropFiles; А в эту процедуру она заходит при отпускании левой кнопки мыши: procedure TForm1.WMDropFiles(var Msg: TMessage); var FileName: array[0..256] of char; begin DragQueryFile(THandle(Msg.WParam), 0, FileName, SizeOf(Filename)); //Делаем то что нам надо DragFinish(THandle(Msg.WParam)); end; Так вот в FileName передается путь перетаскиваемого файла(или папки) и у меня - есть ли процедура в Delphi 7 опредиляющая файл это или папка?? |
06.11.2008, 19:17 | #2 |
*
Старожил
Регистрация: 22.11.2006
Сообщений: 9,201
|
faDirectory - атрибут файла
|
07.11.2008, 11:51 | #3 |
Пользователь
Регистрация: 30.09.2008
Сообщений: 33
|
Всем спасибо разобрался сам
Для етого сгодится FileExists |
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Что же это, бага vs2005, или VC++ 6.0? | evil_factory | Visual C++ | 1 | 24.07.2008 22:30 |
как опредилить програмно подключен ли сетевой кабель в сетевуху? | Zloy_Doomer | Работа с сетью в Delphi | 1 | 13.06.2008 19:39 |
это вирус или кривые руки? | AngelOfDeath | Безопасность, Шифрование | 4 | 03.06.2008 14:04 |
(Это снова я) Как записать в файл? | Air | Общие вопросы Delphi | 5 | 03.05.2007 20:36 |
кто нить это знает или нет ?! | SALEM | БД в Delphi | 1 | 24.11.2006 16:32 |