Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];




Вниз

Как реализовать проверку расширения файлов? 


inko   (2002-04-09 15:37) [0]

Как реализовать проверку расширения файлов?

Например, нужно проверить *.ocx; *.dll; *.tlb; *.acm; *.ax ли это файлы.



Song   (2002-04-09 15:40) [1]

А русским языком?



Anatoly Podgoretsky   (2002-04-09 15:45) [2]

С помощью IF



AFROLOV   (2002-04-09 15:49) [3]

ExtractFileExt

Returns the extension portions of a file name.
Unit
SysUtils
Category
file name utilities
function ExtractFileExt(const FileName: string): string;
Description
Use ExtractFileExt to obtain the extension from a file name. For example, the following code returns the extension of the file name specified by a variable named MyFileName:
MyFilesExtension := ExtractFileExt(MyFileName);
The resulting string includes the period character that separates the name and extension parts. This string is empty if the given file name has no extension.
Note: This function works for multi-byte character systems (MBCS).



inko   (2002-04-09 15:49) [4]

Нужна функция проверки расширения файла, который находится в Edit1.



Андрей Сенченко   (2002-04-09 16:26) [5]

В Edit1 не может находиться файла. Максимум, что там может быть - это строка, в которой описан путь к файлу и его и имя.



inko   (2002-04-09 16:34) [6]

Это я и имел ввиду.



Андрей Сенченко   (2002-04-09 16:55) [7]

В этом случае Вам полностью подходит ответ А.Фролова




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.22;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.035 c
1-69768           JokerJ                2002-04-10 06:05  2002.04.22  
TWebBrowser :: автозаполнение форм


6-69961           DimaIv                2002-02-04 21:56  2002.04.22  
Возможна ли докачка в FastNet и как её сделать?


1-69844           Vij                   2002-04-11 09:57  2002.04.22  
HTML Editor


6-69959           Alexey Evstigneev     2001-10-30 06:51  2002.04.22  
Wake-on-Lan


14-70016          Lego                  2002-03-16 02:15  2002.04.22  
Как выключить вообще комбинацию клавиш ALT + F4?