Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.04.22;
Скачать: CL | DM;

Вниз

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

 
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]

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



Страницы: 1 вся ветка

Текущий архив: 2002.04.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-69917
cok
2002-03-30 14:55
2002.04.22
Pascal срочно, плзззз...


14-69982
savva
2002-03-14 12:39
2002.04.22
глюк в сайте..


1-69816
mio
2002-04-08 18:04
2002.04.22
Непонятности с памятью


1-69783
Pafnuty
2002-04-10 12:23
2002.04.22
Системное время.


1-69815
VEG
2002-04-10 01:05
2002.04.22
Работа с ресурсами другого exe-шника.