Помогите с браузером.

344

14 июля 2006 года

Delpher

493 / / 14.08.2005

Для этого необходимо использовать компонент IdHTTP(вкладка IndyClients)

запрос к сереверу :

var str:string;
begin
str:=IdHTTP1.Get('http://sait.ru/');

или

str:=IdHTTP1.Post('http://sait.ru/?', param);

делаем с str все что надо(надеюсь как искать в тексте известно)

// Вставка текста (программно сгенерированной HTML-страницы)
// в TWebBrowser не из файла, а из текстовой переменной
procedure TextToWebBrowser(Text: string; var WB: TWebBrowser);
var
Document: IHTMLDocument2;
V: OleVariant;
begin
// Документ необходимо создать только один раз за текущую
// сессию работы
if WB.Document=nil
then WB.Navigate('about :blank');
// Ожидаем создания документа и позволяем обрабатывать все
// сообщения
while WB.Document=nil do
Application.ProcessMessages;
Document:=WB.Document as IHtmlDocument2;
// Вставляем текст (до 2Гб)
V:=VarArrayCreate([0,0], varVariant);
V[0]:=Text;
Document.Write(PSafeArray(TVarData(v).VArray));
Document.Close;
end;

15K

14 июля 2006 года

Виктор123123

12 / / 13.07.2006

Я незнаю правельно вы меня понели или нет.
В общем зачем мне это нужно есть игра надо угодать несколько чисел от 3 до 7 за 7 угаданных чисел выигрыш 1000 000 $ я прооналезировал HTML код и думою если попробовать заменить во время загрузки страници одну строчку с нужными номерами можно выигровать.
Если кто поможет поделюсь адресом сайта.
Теперь почему я думаю что это может сработать потаму что как мне кажется цыфры сравневаются уже на загруженои странице и если успеть вставить свои цифры во время загрузки может чтото получится.
Блогодарю всех откликувшихся.

339

14 июля 2006 года

619 / / 12.09.2005

ересь... с чего ты взял, что проверка производится на стороне клиента, когда проще её произвести нп серваке..... и потом при помощи чего она по твоему проводится?? javascript?? не смеши.... то, что тебе delpher предложил выполняется примерно так.....

загрузка страницы с сервера - наши манипуляции - загррузка в браузер и выполнение....

есть ещё другой вариант.... пишем свой браузер на основе ie... и обрабатываем загрузку страницы..... подробнее об этом смотри MSDN... WebBrowser Custimization.... или нечто в этом роде... не помню уже...

339

14 июля 2006 года

619 / / 12.09.2005

Если угадаете все 7 чисел, то выиграете $1000000, если 6 чисел, то $10000, если 5 чисел, то $100, если 4, то $1, если 3, то 1 цент.

ты не об этом случайно?

339

14 июля 2006 года

619 / / 12.09.2005

http://www.MoneyBalls.com я полагаю....... )))))

339

14 июля 2006 года

619 / / 12.09.2005

вобщем если это так - спешу тебя расстроить..... всё что на странице - всего лишь анимация...... корень здесь....

Свернуть исходник

Код:

...

<script language="JavaScript">

function blockError(){return true;}

window.onerror = blockError;

</script>

<script language="JavaScript">

var picks = [1,2,3,4,5,6,7];

[color=blue]var wins = [6,28,11,61,3,50,31];[/color]

var checked = new Array (64);

for (var n = 1; n < 64; n++) {checked[n] = "uncheck";}

...

выигрышные числа заложены заранее....

15K

14 июля 2006 года

Виктор123123

12 / / 13.07.2006

Сайт именно этот и код тот же но всеже попробовать заменить свои числа во время загрузки можно же.