idhttp, timeout, stop

[wargo]

Mam problem: łączę się przez ten komponent w pętli while i chce aby za kazdym razem był host z dopiskiem i ściagało mi plik z nowa nazwą.
Jednak gdy przekroczy czas połączenia wyskakuje błąd i pętla dalej się nie wykonuje a jak od nowa nacisnę button to zaczyna od now ( własnie sobie uświadomiłem ze zacznie od nowa zawsze a nie dokończy). Jak zrobić aby nie przerywało pętli?

[Cyfrowy Baron]

Pokaż przykład tej pętli.

[wargo]

Kod: Zaznacz cały

int y;
y = 0;
while (y < 20)
{
TFileStream *F = new TFileStream("c:\\katalog\\nazwa_pliku.roz", fmCreate);
HTTP1->Get("88.88.88."+y, F);
delete F;
}


[Cyfrowy Baron]

Obiekt klasy TFileFstream w każdym obiegu pętli powinien zapisywać pobrane dane do pliku z inną nazwą w przeciwnym razie pliki będą nadpisywane i w efekcie zapisany zostanie tylko ostatni, a jeżeli ostatniego nie da się pobrać to zostanie utworzony pusty plik. Inna rzecz to dodajesz do wartości typu AnsiString wartość typu Integer bez konwersji, to może wywoływać błędy, należy dokonać konwersji int do String. Kolejna sprawa pętla kiedyś powinna się zakończyć, w przykładzie po 20 obiegach, więc należy zwiększać wartość zmiennej y o jeden w każdym obiegu pętli inaczej będzie działała w nieskończoność i w efekcie spowoduje zawieszenie programu, a wogóle to w tym konkretnym przypadku lepiej będzie użyć pętli for.
Jeżeli nie chcesz otrzymywać komunikatów o wyjątkach to użyj metody try{;}catch(...){continue;}:

Kod: Zaznacz cały

  for(int y = 0; y <= 20; y++)
  {
    TFileStream *F = new TFileStream("c:\\plik" + (String)y + ".html", fmCreate);
    try
    {
      HTTP1->Get("88.88.88." +(String)y, F);
    }
    catch(...)
    {
      continue;
    }
    delete F;
  }


[wargo]

Ja przecież zwiększam wartośc y (tylko zapomniałem tu wpisać).
A jeśli chodzi o inny plik-to tak robię, mozliwe ze zrozumiałes to tak jak powyzszy przykład (nie zwiększałem wartości).

A co do try cath to to mi nie pomaga, i tak się pokazują błędy jednak najwiekszym problemem jest to że przerywa petlę!

[Cyfrowy Baron]

Prosiłem żebyś podał przykład swojej pętli. Podałeś ją, sprawdziłem u siebie i tak jak podałem u mnie wszystko działa jak należy, nie pobiera żadnych plików, gdyż pod podanym przykładowym adresem nic nie ma, ale mimo iż nic nie pobiera to pętli mi nie przerywa. Skoro Tobie przerywa, to znaczy, że masz inną pętlę niż ta, którą tutaj podałeś i to właśnie w tym tkwi błąd. Piszesz, że Twoja petla ma to i tamto, ale w podanym przez Ciebie przykładzie nie widać tego, wiec po co wogóle podawałeś przykład pętli skoro u siebie masz zupełnie inną pętlę?!?

[wargo]

A mógłbyć podaź jakiś przykład pobierania ipków z string list i sprawdzaniu kazdego z nich np. od 1.0.0.2 do 1.0.0.5???

[Cyfrowy Baron]

Nie wiem co to ipki i wogóle nie rozumiem o co pytasz.

[wargo]

O adresy ip

[Cyfrowy Baron]

Kod: Zaznacz cały

TStringList *Adresy = new TStringList;
Adresy->Add("10.100.3.189"); // adresy muszą istnieć i muszą zawierać adres do jakiegoś pliku (np. *.html)
Adresy->Add("192.168.01.1");
Adresy->Add("http://cyfbar.republika.pl/index.html"); // ten adres istnieje na pewno
Adresy->Add("http://programowanie.cal.pl/forum/index.php"); // ten adres istnieje na pewno

//Funkcja Get pobiera tylko konkretne pliki nie zaś całe witryny WEB

for(int y = 0; y <= Adresy->Count; y++)
  {
    TFileStream *F = new TFileStream("c:\\pobrany_" + (String)y + ".html", fmCreate);
    try
    {
      HTTP1->Get(Adresy->String[y], F);
    }
    catch(...)
    {
      continue;
    }
    delete F;
  }


[wargo]

A jeśli adres nie działa to nie przerwie to pęli?

[Darek_C++]

W tym wypadku nie, bo wyjątek zgłoszony przez TIdHTTP zostanie przechwycony przez blok try catch bez wyświetlenia okna z komunikatem o treści wyjątku.

[wargo]

Wszystko działa, dziękuję za pomoc