Как проверить соединение с интернет

[SeRhy]

Здравствуйте,
я использую HTTPS proxy сервер с индетификацией через имя пользователя и пароль.
Ниникак не могу проверить есть ли соединение с интернет. Посоветуйте что нибуть.
Зарание спасибо.

[TwiX]

var
  connected: boolean;
begin
  connected:=true;
  //тут прописываем настройки idHTTP
  try
    idHTTP.Get('http://www.google.ru');
    //в OnStatus можно прописать дисконнект на статусе "Connected", что б лишнего не качать
  except
    on e: exception do connected:=false;
  end;
  if not connected then
    ShowMessage('Нет инета')
  else
    ShowMessage('Есть инет');
end;

Думаю, тут всё ясно)

[SeRhy]

Появляется ошибка: "Invalid argument to data encode"

[TwiX]

Исправил
idHTTP.Get('http://www.google.ru');
Тут стояли двойные кавычки - только на C++ прогал)

[SeRhy]

Прога запускается, но при попытке отправки Get запроса выскакивает окно с етой ошибкой

[TwiX]

Всё ещё ошибка?

[SeRhy]

Я ето сам исправлял. Ета же ошибка(

[profi]

Извените, что на С++, ну вот:

#include <stdio.h>
#include <winsock2.h>
#include <windows.h>

#define ADDR "209.85.229.104"
#define PORT 80

#pragma comment(lib, "ws2_32.lib")

int main()
{
	WSADATA wsaDATA;
	SOCKET my_socket;
	sockaddr_in server_addr;
	int len_client_sock;

	printf("Scanner address: %s!\n", ADDR);

	if(WSAStartup(MAKEWORD(2,2), &wsaDATA) != NO_ERROR)
	{
		printf("Library WinSock not load!\n");
		WSACleanup();
		system("PAUSE");
		return 1;
	}
	else
	printf("Library WinSock load!");

	my_socket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);

	server_addr.sin_family = AF_INET;	
	server_addr.sin_addr.s_addr = inet_addr(ADDR);
	server_addr.sin_port = htons(PORT);

	len_client_sock = sizeof(server_addr);

		if(connect(my_socket, (sockaddr*)&server_addr, len_client_sock) != SOCKET_ERROR)
			printf("\nInternet YES!\n");
		else
			printf("\nInternet NO!\n");

	shutdown(my_socket, SD_BOTH);
	closesocket(my_socket);
	WSACleanup();

	system("PAUSE");

	return 0;
}

[SeRhy]

Мне бы лутше на делфу, да и в етом коде сишки я не вижу авторизации. через имя пользователя и пароль

[TwiX]

Я у себя проверял - всё работает. idHTTP на фору кинули? Какая ошибка?