Показать сообщение отдельно
  #1  
Старый 20.11.2010, 21:57
bulldog bulldog вне форума
Начинающий
 
Регистрация: 10.05.2010
Сообщения: 160
Репутация: 14
По умолчанию Странное поведение function Pos

Получаю сайт, он передаёт покет который нада тоже принять, на одном из сайтов делал так
Код:
function PosSrc(ss: String): String;
var
	B, E: Integer;
begin
	B:= Pos('SRC="', ss)+5;
	E:= PosEx('"', ss, B);
	Result:= Copy(ss, B, E-B);
end;

procedure BUX.Execute;
var
Otvet: String;
Otvet1: String;
Ur: String;
begin
Otvet:= HTTP_BUX.Get('http://' + сайт);
Ur:= PosSrc(Otvet);
Otvet1:= HTTP_BUX.Get('http://' + сайт+пакет);
Такой покет нормально обрабатывает
PHP код:
<html>
<
head>
<
meta http-equiv="Pragma" content="no-cache">
<
meta http-equiv="Expires" content="-1">
<
title>///</title>
<FRAMESET ROWS="35px,30px,90%,70px">
<
FRAME marginwidth="0" marginheight="0" name="frminfo" scrolling="no" noresize NAME="a" SRC="ips.php">//это ловит
</FRAMESET>
</
head>
</
html
а такой не может
PHP код:
<html>
<
head>
<
title>///</title>
</head>
<
FRAMESET ROWS="90,*" FRAMEBORDER="0" FRAMESPACING="0" BORDER="0">
<
frame marginwidth="0" marginheight="0" name="frm" scrolling="no" noresize src="cgho.php">//это не ловит
</frameset>
</
html
Почему? Или раздница лиш в длине слова?
Ответить с цитированием