Форум: "Основная";
Поиск по всему сайту: 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.02 c
1-69822           Vcoder                2002-04-07 12:33  2002.04.22  
TBitmap.LoadFromResouceName - истина где-то рядом?


3-69739           gai73                 2002-04-02 10:10  2002.04.22  
TQuery


3-69724           Roman_Tutov@mail.ru   2002-03-28 17:04  2002.04.22  
Ликбез


1-69884           Alibaba               2002-04-09 12:11  2002.04.22  
TStringGrid


3-69711           Zombie                2002-04-01 08:18  2002.04.22  
Containg в BDE