Скачать: CL | DM;

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

← →
Mishenka   (2003-06-01 21:33) [0]

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

---

← →
Anatoly Podgoretsky ©   (2003-06-01 21:42) [1]

Extract*

---

← →
Song ©   (2003-06-01 21:42) [2]

ExtractFilePath()
ExtractFileName()
ExtractFileExt()

---

← →
Mishenka   (2003-06-01 22:56) [3]

ExtractFileName() вытаскивает имя с расширением. А как вытащить без расширения?

---

← →
DrPass ©   (2003-06-01 22:58) [4]

Функции pos и copy известны?

---

← →
Mishenka   (2003-06-01 23:02) [5]

Известны то известны, о я думал может нахаляву, не напрягаться :)))

---

← →
DrPass ©   (2003-06-01 23:03) [6]

Эх, молодежь...

---

← →
Song ©   (2003-06-01 23:33) [7]

>>ExtractFileName() вытаскивает имя с расширением. А как вытащить без расширения?

S:=StringReplace(ExtractFileName(FName),ExtractFileExt(FName),"",[]);

---

← →
VMcL ©   (2003-06-02 01:53) [8]

>Song © (01.06.03 23:33)

Гы-гы. А если имя файла, например, "abc.jpg.bmp.jpg"?

---

← →
Poirot ©   (2003-06-02 06:37) [9]

>
> Гы-гы. А если имя файла, например, "abc.jpg.bmp.jpg"?

Тогда удалять всё с последней точьки вместе с ней. :o)
Типа непонятно наверное!

---

← →
Anatoly Podgoretsky ©   (2003-06-02 07:27) [10]

ChangeFileExt верный ответ, или SetLength, длина то расширения известна.

---

← →
MegaVolt ©   (2003-06-02 10:17) [11]

Длинна расшинения не константа!!!

---

← →
Anatoly Podgoretsky ©   (2003-06-02 10:22) [12]

Естественно, а что это проблема определить длину, раз возможно получить расширение?

---

← →
Sandman25 ©   (2003-06-02 10:24) [13]

SetLength(FName,Length(FName)-Length(ExtractFileExt(FName))-1)

---

← →
ladybird   (2003-06-02 12:47) [14]

Unit

FileCtrl

Category

file name utilities

procedure ProcessPath (const EditText: string; var Drive: Char; var DirPart: string; var FilePart: string);

---

← →
Song ©   (2003-06-02 20:04) [15]

>>Гы-гы. А если имя файла, например, "abc.jpg.bmp.jpg"?
ExtractFileExt() вернёт ".jpg"

---

← →
DVM ©   (2003-06-02 20:58) [16]

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

---

← →
Palladin ©   (2003-06-02 23:36) [17]

> VMcL © (02.06.03 01:53)

а что гыгы, в windows считается расширением часть строки после последней встреченой точки...

---

← →
VMcL ©   (2003-06-03 01:37) [18]

>Song © (02.06.03 20:04)

>>>Гы-гы. А если имя файла, например, "abc.jpg.bmp.jpg"?
>ExtractFileExt() вернёт ".jpg"

Браво! А StringReplace(ExtractFileName(FName),ExtractFileExt(FName),"",[]); вернёт "abc.bmp". Немного неправильно. Не находите?

---

← →
VMcL ©   (2003-06-03 01:39) [19]

>VMcL © (03.06.03 01:37)

Oops, это если rfReplaceAll, а так будет "abc.bmp.jpg". В общем, всё равно лажа.

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.012 c