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, мощеш в кнопкупку поставить

Новые блоги и статьи Все статьи Все блоги /
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .

@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