Спасибо за помощь. Вынес в отдельный проект и все заработало.
Единственная проблема это кодировка. Но это решаемо.
Да скорость конекта достаточна приличная , ожидал худшего.
url := 'http://www.teploluxe.net/SMS.php';
if OpenHttp(cn, url) then
begin
SetHttpMethod(cn, GET);
i := sendHttpMessage(cn);
result := getHttpResponse(cn);
drawText(''+result,2,2);
repaint;
CloseHttp(cn);
end; else halt;
delay(3000);
|