Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как узнать имя файла по указанному урлу ? [D7, WinXP]

Фёдор Мегатронов © (2004-08-28 20:29:00)
Я передаю функции полный путь, а она мне возвращает имя файла на сервере. именно имя файла, без всяких там пхп запросов и прочей дребедени.

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

Дмитрий Ботвин (2004-09-03 08:27:00) [1]
Можно ещё вот так:

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

Дмитрий Ботвин (2004-08-30 14:54:00) [2]
Функция ExtractFileName не будет работать с url-ами даже если
слэши заменить на обратные, надо еще и сам url привести
к виду: \\<имя1>\<Имя2>\Имя_файла.*

SergP (2004-08-30 09:27:00) [3]

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

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

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

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

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »