Текущий архив: 2003.06.12;
Скачать: 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 вся ветка
Текущий архив: 2003.06.12;
Скачать: CL | DM;
Память: 0.5 MB
Время: 0.014 c
