Показать сообщение отдельно

  #9  
Старый 19.03.2010, 02:14
RedFern.89
Постоянный
Регистрация: 20.01.2010
Сообщений: 338
Провел на форуме:
500264

Репутация: 69
Отправить сообщение для RedFern.89 с помощью ICQ
По умолчанию

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

Код:
var
 ms : TMemoryStream;
 Img: TPngImage;
begin
 ms := TMemoryStream.Create;
 Img := TPngImage.Create;

 HTTP.Get('http://Ogli.org/engine/modules/antibot.php?rndval=' + TimeToStr(Time), ms);
 ms.Position := 0;
 Img.LoadFromStream(ms);
 Image1.Picture.Graphic := img; // Assign вываливает эксепшен, делай так))
 img.Free;
 ms/Free;
end;

Последний раз редактировалось RedFern.89; 19.03.2010 в 02:17..
 
Ответить с цитированием