![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#11 |
Форумчанин
Регистрация: 10.02.2009
Сообщений: 181
|
![]()
Всем большое спасибО!
|
![]() |
![]() |
![]() |
#12 |
Пользователь
Регистрация: 21.02.2009
Сообщений: 28
|
![]()
В данном случае необходимо воспользоваться функцией получения атрибутов файла:
function FileGetAttr(const FileName: string): Integer; и возвращаемое значение проверить на наличие флага faDirectory ($00000010). Если флаг установлен, то это директория и соответственно данное имя занести в ListBox2, иначе воспользоваться функцией получения расширения: function ExtractFileExt(const FileName: string): string; и если возвращаемое значение равно 'mp3', то записываем имя файла в ListBox3. Все функции для работы с файлами находятся в модуле Sysutils. Там-же определены флаги атрибутов.
В споре рождается истина.
|
![]() |
![]() |
![]() |
#13 |
Форумчанин
Регистрация: 10.02.2009
Сообщений: 181
|
![]()
спс!!!!!!!!!!
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как узнать, выдвинут, или задвинут, определённый дисковод? | Altera | Win Api | 5 | 10.03.2009 08:47 |
файл и папка | StartMis | Общие вопросы Delphi | 1 | 19.11.2008 19:48 |
Как по пути опредилить файл это или папка | Anatol_rus | Мультимедиа в Delphi | 2 | 07.11.2008 11:51 |
как узнать string или Real | Влажимир | Общие вопросы Delphi | 2 | 11.04.2008 17:06 |
(Это снова я) Как записать в файл? | Air | Общие вопросы Delphi | 5 | 03.05.2007 20:36 |