Рулетка

[Misapwnz]

Добрый вечер. На сервере установлена рулетка, решил я написать простой скрипт для того чтобы стать убер богатым. Тело скрипта готово, вот только появилась проблема что Адрик не хочет при bypass отправлять значение Int

При таком варианте все отправляется:


var Int : integer; Begin InpStr := Engine.DlgText; Int := 100000; Engine.BypassToServer('menu_select?ask=8888 &reply= 100000'); end.
Но если написать

var Int : integer;

Begin
InpStr := Engine.DlgText;
Int := 100000;
Engine.BypassToServer('menu_select?ask=8888 &reply= Int');
end.

Или

var Int : integer;

Begin
InpStr := Engine.DlgText;
Int := 100000;
Engine.BypassToServer('menu_select?ask=8888 &reply= '+'Int');
end.

То выводится сообщение об ошибке "Минимальная ставка 100000 аден"

В чем может быть проблема?

 

[shayne]

Нужно сформировать строку и отправлять её. Примерно так:

Int := 100000;
String byPassRequest = ''menu_select?ask=8888 &reply= ' + StrToInt(Int) + '''
Engine.BypassToServer(byPassRequest);



P.S. Точно синтаксиса уже не помню, но думаю суть ясна.