[Genry]

Можно узнать имя из адреса к файлу на диск. Вот так:

Код:

var
S: string;
begin
S:=ExtractFileName('D:\red.jpg');
end;

А как узнать из URL адреса? Например: http://mysite.ru/red.jpg

[ART]

Смотрите сначала в FAQ!!!

[M.A.D.M.A.N.]

Код:

function ExtractUrlName(UrlName:String):String;
var Index:Word;
begin
  for Index:=Length(UrlName) downto 1 Do
    if UrlName[Index]='/' Then
      begin
        Result:=Copy(UrlName,Index+1,Length(UrlName));
        Exit;
      end;
end;

Пойдет?