Как узнать имя файла по указанному урлу ?

← →
Фёдор Мегатронов (2004-08-28 20:29) [0]

Я передаю функции полный путь, а она мне возвращает имя файла на сервере. именно имя файла, без всяких там пхп запросов и прочей дребедени.

есть ли такое ?

← →
SergP © (2004-08-30 09:27) [1]

> Я передаю функции полный путь, а она мне возвращает имя
> файла на сервере. именно имя файла,

Это как? Типа передаешь функции например "http://vasya.ru/pupkin.htm", а она тебе возвращает "pupkin.htm", что-ли?
Если да, то есть такая функция ExtractFileName(FileName:string):string
правда она с обычными путями работает а с урлами нет. Т.е. чтобы рботала нужно в урле предварительно заменить слеши на обратные.

> без всяких там пхп запросов и прочей дребедени.

А что такое пхп запрос?

← →
Дмитрий Ботвин (2004-08-30 14:54) [2]

Функция ExtractFileName не будет работать с url-ами даже если
слэши заменить на обратные, надо еще и сам url привести
к виду: \\<имя1>\<Имя2>\Имя_файла.*

← →
Дмитрий Ботвин (2004-09-03 08:27) [3]

Можно ещё вот так:

function ExtractUrlFileName(const AUrl: string): string;
var
i: Integer;
begin
i := LastDelimiter("/", AUrl);
Result := Copy(AUrl, i + 1, Length(AUrl) - (i));
end;

procedure TForm1.Button1Click(Sender: TObject);
var
s: string;
begin
s := ExtractUrlFileName("http://www.delphimania.de/index.php");
ShowMessage(s); //index.php
end

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