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

Вниз

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

← →
TBeginner ©   (2004-07-21 23:33) [0]

Здравствуйте!
Как узнать имя файла беc расширения, то есть выдрать из файла только его имя?
P.S.: Хотелась бы наедятся, что этот вопрос в “Орехи” не попадёт…

---

← →
GanibalLector ©   (2004-07-21 23:40) [1]

file name utilities +F1

---

← →
Anatoly Podgoretsky ©   (2004-07-21 23:57) [2]

ChangeFileExt поможет

---

← →
Gero ©   (2004-07-22 00:09) [3]

function ExtractFileNameWithoutExt(const FileName : string) : string;
begin
 Result := ExtractFileName(FileName);
 Result := Copy(Result, 1, Length(Result) - Length(ExtractFileExt(Result)));
end;

---

← →
Palladin ©   (2004-07-22 00:31) [4]

> [3] Gero ©   (22.07.04 00:09)

:) А таки ChangeFileExt(FileName,"") проще написать....

---

← →
TBeginner ©   (2004-07-22 01:16) [5]

Спасибо всем!
Думаю после такой замечательной очереди ответов у меня больше вопросов не должно возникнуть. Ещё раз, спасибо!

---

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

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

Наверх

Память: 0.47 MB
Время: 0.027 c