как вытащить ссыку на видео?

[Volkogriz]

Доброе время суток!
Подскажите как вытащить ссылку вот с этого кода

var player = new SWFObject('http://st.kinopod.ru/media/player.swf?v=8', 'mediaplayer', '640', '480', '9', '#000000');
                            player.addParam('allowfullscreen', 'true');
                            player.addParam('allowscriptaccess', 'always');
                            player.addParam('wmode', 'opaque');
                            player.addVariable('javascriptid', 'mediaplayer');
                                                        player.addVariable('file', 'http://master.kinopod.org/get/6b3ce69e3712e0930e749ffce826a5d3/v9/2011/09/28/23097-72ev.flv');
                                                        player.addVariable('type', 'http');
                                                        player.addVariable('image', 'http://img.kinopod.org/data/2011/04/12/72/9pvbbm-640x480.jpg');
                                                        player.addVariable('autostart', 'false');
                            player.addVariable('bufferlength', '10');
                            player.addVariable('duration', '0');
                                                        player.addVariable('skin', 'http://st.kinopod.ru/media/skins/newtubedark_v1.zip');
                            
                            player.addVariable('logo.file', 'http://st.kinopod.ru/images/logo-small.png');
                            player.addVariable('logo.link', 'http%3A%2F%2Fkinopod.ru%2Fvideo.html%3Fid%3D1387');
                            player.addVariable('logo.linktarget', '_blank');
                            player.addVariable('logo.position', 'top-left');
                            player.addVariable('logo.timeout', 10);
                            player.addVariable('logo.about_title', 'KinoPod.ru - Каталог онлайн фильмов');
                            player.addVariable('logo.about_link', 'http://kinopod.ru');

Нужна к примеру Эта ссылка: http://master.kinopod.org/get/6b3ce6...23097-72ev.flv
За ранее благодарен.
С уважением,
Я!

[bakanaev]

http://programmersforum.ru/showpost....91&postcount=6

[Кольша]

var
s,link:string;
begin
s:=http.get('http://');
link:=pars('player.addVariable(''file'', ''',''');',s);
showmessage('Video file link is '+link);
//так вроде
end;

[demiancz]

Парсить надо.

[Lesha]

регулярные выражения

#'file', '(http://.+?\.flv)#i

[kta87]

function TParser.CCopyText(S, C1, C2: string): string;
begin
 if C1 <> '' then Delete(S, 1, Pos(C1, S) + Length(C1) - 1);
 if C2 <> '' then Delete(S, Pos(C2, S), Length(S));
 Result := S;
end;

S:= получаемый код Get запроса, т.е. тот что вы прикрепили.

C1{в вашем случае}:= "player.addVariable('file', '";

С2:= "');";

Т.е. функция получает кусок кода из общей строки "S", между кодом C1 и C2 соответственно!
Ну как это пользоваться готовой функцией? )) Думаю труда не составит!