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

Вниз

Как из полного имени файла вместе с директорией вычесть только формат?   Найти похожие ветки 

 
Man-In-Red ©   (2002-02-24 16:26) [0]

Пожалуйста, подскажите как из полного имени файла вместе с директорией вычесть только формат и поместить его в label1.caption?
Заранее благодарен!


 
vrRaven   (2002-02-24 16:33) [1]

Если ты под словом формат имеешь ввиду расширение, то:
ExtractFileExt() - выделяет расширение файла
Я не помню, если оно не работает для полного пути вместе с директорией, но для имени файлов сгодится...


 
McSimm ©   (2002-02-24 16:33) [2]

Если предположить, что формат - это расширение имени, то:
Label1.Caption := ExtractFileExt(S);


 
DarkAngel   (2002-02-24 16:39) [3]

Формат, это типа раширение файла? Если нужно расширение файла без
пути и имени файла, тогда попробуй искать в строке позицию точки,
типа так.

var
s,ss:widestring
.......
x:=pos(".",s);
ss:=copy(s,x,3);
label1.caption:=ss;

Приблизительно, так, может есть какие-то другие способы, но сейчас ничего под рукой нет, поэтому не обезсудь.


 
Man-In-Red ©   (2002-02-24 16:48) [4]

А ну да...Расширение :)
Спасибо!


 
VID ©   (2002-02-24 20:37) [5]

TO DarkAngel : А зачем так извращаться ?


 
panov ©   (2002-02-24 21:32) [6]

>DarkAngel (24.02.02 16:39)
Увы, но точка может быть и в имени каталога...


 
Anatoly Podgoretsky ©   (2002-02-24 21:47) [7]

Более того их может быть несколько, вполне нормальное имя x.y.z a.b.c


 
VID ©   (2002-02-24 22:17) [8]

TO panov & Anatoly: ну говорю же изврат :)))



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

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

Наверх




Память: 0.48 MB
Время: 0.011 c
7-32583
harisma
2001-12-06 13:14
2002.03.11
Очень надо!!!


1-32459
b00ts0
2002-02-22 23:01
2002.03.11
ламерский вопрос относительно чата для локальной сети


1-32510
Лана Розанова
2002-02-25 12:01
2002.03.11
DDE


1-32450
yaJohn
2002-02-20 13:11
2002.03.11
bistraya Windows ;)))


3-32415
КСА
2002-02-12 12:05
2002.03.11
InterBase. Deadlock detected