tnew = class(tthread)  
private   
idHTTP:TIdHTTP;
procedure getln;  
protected  
procedure execute; override; 
end;