[Chip]

А у меня не хочет работать? Непойму толи изза того что хостинг глючит, толи я чето не догоняю?
program Image;
var
i:integer;
url : string;
cn : http;
img : Image;
begin
url := 'http://teploluxe.net/mail/Kr.png';
if OpenHttp(cn, url) then
begin
SetHttpMethod(cn, GET);
i := sendHttpMessage(cn);
img :=loadImage ('http://teploluxe.net/mail/Kr.png');
DrawImage (img , 0 , 0 );
repaint;
end; else halt;
CloseHttp(cn);
end.