|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
04.05.2007, 15:55 | #1 |
Пользователь
Регистрация: 27.03.2007
Сообщений: 37
|
Проверка расширения файла
Привет всем!
Кто знает как можно проверить расширения файла при открытие файла с помощью OpenDialog я попробывал вот так if Opendialog1.Filter<>('*.bmp') then raise NoBmp.Create('Не Bmp') else но это не проверяет фигня получается подскажите пожалуйста. Зарание благодарю. |
04.05.2007, 16:16 | #2 |
Delphi/C++/C#
Участник клуба
Регистрация: 29.10.2006
Сообщений: 1,972
|
Тебе надо OpenDialog-ом открыть только BMP файл?
Настрой OpenDialog: свойство filter, счёлкни по нему и введи: название (BMP-files) и маску (*.bmp) для отображаемых файлов. Все прочие не проходящие фильтр не будут отображаться! А вообще проверка расширения: ExtractFileExt(PATH) - возвратит строку, содержащую только расширение файла, расположенного по пути PATH. Более подробно читай в хелпе по Делфи, там есть. Последний раз редактировалось zetrix; 04.05.2007 в 16:21. |
04.05.2007, 16:41 | #3 |
Форумчанин
Регистрация: 26.04.2007
Сообщений: 143
|
ага и выглядеть это будет так, если вы не смогли разобраться с функцией в хелпе (а не могут разобратся достаточно многие к сожалению):
procedure TForm1.Button1Click(Sender: TObject); var st : string; begin if opendialog1.Execute then st:= extractfileext(opendialog1.FileName ); edit1.Text:=st; end; в Edit1 будет выводится расширение открываемого файла... Удачи...
Свободу клавиатурным самураям...
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сообщение при открытии из почты:Действительный формат файла отличается от расширения... | bregante | Microsoft Office Excel | 1 | 31.08.2008 21:11 |
Проверка наличия файла | russian-stalker | Общие вопросы Delphi | 4 | 31.08.2008 19:27 |
Проверка атрибутов файла. | v01umE | Общие вопросы C/C++ | 2 | 31.05.2008 08:37 |
Проверка нового файла на ФТП | Aleksei | Работа с сетью в Delphi | 11 | 10.05.2008 22:26 |
Изменение расширения файла при каждой итерации | Jack Torrance | Помощь студентам | 3 | 18.12.2007 23:24 |