extract

← →
TUser (2003-12-18 12:54) [0]

Есть ли какая-нибудь функция типа ExtractFileName для работы с урлами. Не хочется изобретать велосипед.
Надо типа так
s:=" http://www.mail.ru/index.html";
label1.Caption:=extractfilename(s);
и получить "index.html"

← →
Sandman25 (2003-12-18 13:07) [1]

А ExtractFileName разве не сработает, как ожидается?

← →
TUser (2003-12-18 13:08) [2]

Нет, выдает "//www.mail.ru/index.html"

← →
Sandman25 (2003-12-18 13:25) [3]

function ExtractFileName(const FileName: string): string;
var
I: Integer;
begin
I := LastDelimiter(PathDelim + DriveDelim, FileName);
Result := Copy(FileName, I + 1, MaxInt);
end;

Вместо PathDelim + DriveDelim нужно подставить "/";

extract Найти похожие ветки