hSession:=InternetOpen('Test',INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
???

INTERNET_OPEN_TYPE_PRECONFIG Есть прокси или нету WinInet будет сам раздуплялтся правда если есть то в InternetConnect надо будет указать пароль и логин на прокси