IdHTTP->Get(), словыить ошыбку при обрыве связи.

@gorin · Регистрация: 18.08.2009

Студворк — интернет-сервис помощи студентам

Я пробывал словить ошыбку при обрыве связи с помощю

C++
1
2
3
4
5
6
7
8
try
{
     ...
}
catch(...)
{
    ...
}

EIdSocketError &e, ловит но не так как я хотел. У меня эта проверка в цикле.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
    flags=INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
    for(i=0;i<bsSkinListBox2->Items->Count;i++)
    {
        try
        {
            SetLineSpacing(bsSkinRichEdit2, 22.25);
            SetLineSpacing(bsSkinRichEdit1, 22.25);
            int a,b;
            a=rand() % s;
            b=rand() % s;
            if(bsSkinCheckListBox1->Checked[i] == true)
            {
                if(!InternetGetConnectedState(&flags, 0)){
                    break;Form8->ShowModal(); }
 
                else
                {
                    dataGoogle = IdHTTP1->Get(httpGoogle+bsSkinListBox2->Items->operator [](i));
                    bsSkinMemo2->Lines->Add("  "+IntToStr(bsSkinMemo2->Lines->Count+1)+". Результат: ("+dataGoogle+") "+a+" мсек.");
                    flags=INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
                    bsSkinRichEdit1->Lines->Delete(i);
                    bsSkinCheckListBox1->Checked[i]=false;
                    Sleep(a);
                    if(IdHTTP1->Get(httpGoogle+bsSkinListBox2->Items->operator [](i))!=dataGoogle)
                    {
                    bsSkinRichEdit1->Lines->Insert(i,"No");
                        do
                        {
                            Start = bsSkinRichEdit1->FindText(nSearch,Start+1,bsSkinRichEdit1->Text.Length(), TSearchTypes());
                            if(Start != -1)
                            {
                                bsSkinRichEdit1->SelStart = Start;
                                bsSkinRichEdit1->SelLength = nSearch.Length();
                                bsSkinRichEdit1->SelAttributes->Color = clRed;
                            }
                        }
                        while(Start != -1);
                    }
                    else
                    {
                    bsSkinRichEdit1->Lines->Insert(i,"Yes");
                        do
                        {
                            Start = bsSkinRichEdit1->FindText(sSearch,Start+1,bsSkinRichEdit1->Text.Length(), TSearchTypes());
                            if(Start != -1)
                            {
                                bsSkinRichEdit1->SelStart = Start;
                                bsSkinRichEdit1->SelLength = sSearch.Length();
                                bsSkinRichEdit1->SelAttributes->Color = clGreen;
                            }
                        }
                        while(Start != -1);
                    }
                }
            }
            if(bsSkinCheckListBox4->Checked[i] == true)
            {
                flags=INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
                if(!InternetGetConnectedState(&flags, 0)){
                    break;Form8->ShowModal();    }
 
                else
                {
                    dataYandex = IdHTTP1->Get(httpYandex+bsSkinListBox2->Items->operator [](i));
                    bsSkinMemo2->Lines->Add("  "+IntToStr(bsSkinMemo2->Lines->Count+1)+". Результат: ("+dataYandex+") "+b+" мсек.");
                    flags=INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
                    bsSkinRichEdit2->Lines->Delete(i);
                    bsSkinCheckListBox4->Checked[i]=false;
                    Sleep(b);
                    if(IdHTTP1->Get(httpYandex+bsSkinListBox2->Items->operator [](i))!=dataYandex)
                    {
                        bsSkinRichEdit2->Lines->Insert(i,"No");
                        do
                        {
                            Start = bsSkinRichEdit2->FindText(nSearch,Start+1,bsSkinRichEdit2->Text.Length(), TSearchTypes());
                            if(Start != -1)
                            {
                                bsSkinRichEdit2->SelStart = Start;
                                bsSkinRichEdit2->SelLength = nSearch.Length();
                                bsSkinRichEdit2->SelAttributes->Color = clRed;
                            }
                        }
                        while(Start != -1);
                    }
                    else
                    {
                        bsSkinRichEdit2->Lines->Insert(i,"Yes");
                        do
                        {
                            Start = bsSkinRichEdit2->FindText(sSearch,Start+1,bsSkinRichEdit2->Text.Length(), TSearchTypes());
                            if(Start != -1)
                            {
                                bsSkinRichEdit2->SelStart = Start;
                                bsSkinRichEdit2->SelLength = sSearch.Length();
                                bsSkinRichEdit2->SelAttributes->Color = clGreen;
                            }
                        }
                        while(Start != -1);
                    }
                }
            }
            if(bsSkinSpeedButton14->Caption=="Отменить Ping")
            {
                break;
                bsSkinMemo2->Clear();
            }
            Timer1->Enabled = false;
            Application->ProcessMessages();
        }
        catch ( EIdSocketError &e)
        {
            Form8->ShowModal();
            break;
        }
    }

@Samrisbe · 10.06.2011, 10:30

А в чем собственно вопрос то?

@kzru_hunter · 10.06.2011, 11:38

Что вы на этих индейцев набросились? Есть нормальные компоненты TNM* (TNMHTTP во вкладке FastNet), с которыми нет никаких проблем.

@Programmer. · 10.06.2011, 14:35

gorin,
Вот пример

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
void __fastcall TForm24::Button1Click(TObject *Sender)
{
try{
IdHTTP1->Get(L"http://www.google.ru");
   ShowMessage(L"You are connected to internet");
}
catch(EIdHTTPProtocolException &e)
{
 ShowMessage(e.ErrorMessage);
}
catch(...)
{
    ShowMessage(L"Exception");
}
 
}

@gorin · 11.06.2011, 11:21 **[ТС]**

kzru_hunter, У меня нет такой вкладки, где можно скачать этот компонент (FastNet)?

Добавлено через 2 часа 52 минуты
Programmer., у тебя етот код нормально работает?

Добавлено через 37 минут
kzru_hunter, Кинь мне эту библиотеку, у меня Билде 2009

Добавлено через 14 часов 58 минут
А если брать вот таким способом?

C++
1
2
3
4
5
6
7
8
9
10
DWORD flags;
int Start=0;
flags=INTERNET_CONNECTION_MODEM+INTERNET_CONNECTION_LAN+INTERNET_CONNECTION_PROXY;
    if(!InternetGetConnectedState(&flags,0))
        Form2->ShowModal();
    else
    {
        IdHTTP1->Get(L"http://www.google.ru");
        ShowMessage(L"You are connected to internet");
    }

Вроде работает но всеровно два раза выбивает ошыбку EIdSocketError, может етот компонент нужно както поднастроить?

@Programmer. · 11.06.2011, 13:42

gorin,
Да нормално работает

Сообщение от gorin

DWORD flags;
int Start=0;
flags=INTERNET_CONNECTION_MODEM+INTERNET _CONNECTION_LAN+INTERNET_CONNECTION_PROX Y;
if(!InternetGetConnectedState(&flags,0))
Form2->ShowModal();
else
{
IdHTTP1->Get(L"http://www.google.ru");
ShowMessage(L"You are connected to internet");
}

Да ну так и можно, но если хочеш чтоб программа сама дала код ошыбки то надо так как я тя показал

@gorin · 11.06.2011, 13:52 **[ТС]**

Programmer., Мне нужно ошыбку (EIdSocketError) перехвачивать, чтобы она не выбивала!, и посли того чтобы я смог опять работать с IdHTTP1 когда соиденение с интернетом появилось.

@Programmer. · 11.06.2011, 16:19

gorin,
Попробуй у IdHTPP1 в Object Inspector е MaxAuthRetries постав на 1 или на 0 и скажи сработает лы?!

@gorin · 11.06.2011, 17:43 **[ТС]**

Programmer., Все также

Добавлено через 26 минут
Ошыбка

@Programmer. · 11.06.2011, 18:35

gorin,
Мдаа 2 ошыбки я думаю принодлежит дебаггеру а не программу а последная ето уже обрыв связи, гмм я шас другой проект пишу и вечером исправим твою проблему, в личку скаип остав

@gorin · 14.06.2011, 22:00 **[ТС]**

Пацаны такая проблема:
IdHTTP работает отлично но при обрыве связи он какбы не работает после востонавление связи с интернетом. В чем проблема? зарание спс.

Добавлено через 10 часов 20 минут
Нашол ришение

C++
1
IdHTTP1->Disconnect();

@Dr.Xank · 14.06.2011, 22:14

Сообщение от gorin

Нашол ришение

И куда это нужно добавить?

@gorin · 15.06.2011, 08:50 **[ТС]**

Alex1983, мощеш в кнопкупку поставить

Новые блоги и статьи Все статьи Все блоги /
Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .
Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .	Фото: Daniel Greenwood kumehtar 13.11.2025	Расскажи мне о Мире, бродяга kumehtar 12.11.2025 — Расскажи мне о Мире, бродяга, Ты же видел моря и метели. Как сменялись короны и стяги, Как эпохи стрелою летели. - Этот мир — это крылья и горы, Снег и пламя, любовь и тревоги, И бескрайние. . .	PowerShell Snippets iNNOKENTIY21 11.11.2025 Модуль PowerShell 5. 1+ : Snippets. psm1 У меня модуль расположен в пользовательской папке модулей, по умолчанию: \Documents\WindowsPowerShell\Modules\Snippets\ А в самом низу файла-профиля. . .

@Samrisbe 1365 / 732 / 67 Регистрация: 28.01.2011 Сообщений: 2,069
	10.06.2011, 10:30
	А в чем собственно вопрос то? 0

@kzru_hunter 1124 / 795 / 101 Регистрация: 01.02.2011 Сообщений: 1,887 Записей в блоге: 1
	10.06.2011, 11:38
	Что вы на этих индейцев набросились? Есть нормальные компоненты TNM* (TNMHTTP во вкладке FastNet), с которыми нет никаких проблем. 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	11.06.2011, 13:52 [ТС]
	Programmer., Мне нужно ошыбку (EIdSocketError) перехвачивать, чтобы она не выбивала!, и посли того чтобы я смог опять работать с IdHTTP1 когда соиденение с интернетом появилось. 0

@Programmer. Прогер 632 / 263 / 15 Регистрация: 17.11.2010 Сообщений: 1,371 Записей в блоге: 2
	11.06.2011, 16:19
	gorin, Попробуй у IdHTPP1 в Object Inspector е MaxAuthRetries постав на 1 или на 0 и скажи сработает лы?! 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	11.06.2011, 17:43 [ТС]
	Programmer., Все также Добавлено через 26 минут Ошыбка 0

@Programmer. Прогер 632 / 263 / 15 Регистрация: 17.11.2010 Сообщений: 1,371 Записей в блоге: 2
	11.06.2011, 18:35
	gorin, Мдаа 2 ошыбки я думаю принодлежит дебаггеру а не программу а последная ето уже обрыв связи, гмм я шас другой проект пишу и вечером исправим твою проблему, в личку скаип остав 0

@gorin 209 / 16 / 4 Регистрация: 18.08.2009 Сообщений: 571
	15.06.2011, 08:50 [ТС]
	Alex1983, мощеш в кнопкупку поставить 0