🚀 go-pugleaf

Hi Gambit,

the Ping function need two parameters, that is why my code does not work. i
get this error messages:

[C++ Fehler] main.cpp(865): E2193 Zu wenige Parameter im Aufruf von
'_fastcall TIdIcmpClient::Ping(AnsiString,unsigned short)'

Means like "To few parameters in call of '_fastcall
TIdIcmpClient::Ping(AnsiString,unsigned short)'"

[C++ Fehler] main.cpp(866): E2288 Zeiger auf Struktur auf linker Seite
von -> oder von ->* erforderlich
[C++ Fehler] main.cpp(869): E2288 Zeiger auf Struktur auf linker Seite
von -> oder von ->* erforderlich
[C++ Fehler] main.cpp(870): E2288 Zeiger auf Struktur auf linker Seite
von -> oder von ->* erforderlich
[C++ Fehler] main.cpp(871): E2288 Zeiger auf Struktur auf linker Seite
von -> oder von ->* erforderlich
[C++ Fehler] main.cpp(872): E2288 Zeiger auf Struktur auf linker Seite
von -> oder von ->* erforderlich

Means like "Pointer of structure on the left site from -> or from ->*
necessarily


This is here is my actual code:

void __fastcall TForm1::Button2Click(TObject *Sender)
{
   AnsiString s;
   IdIcmpClient1->Ping("www.borland.com");
   switch(IdIcmpClient1->ReplyStatus->ReplyStatusType)
   {
      case rsEcho:
         s = "Reply from " + IdIcmpClient1->ReplyStatus->FromIpAddress
         + (": bytes=" +
AnsiString(IdIcmpClient1->ReplyStatus->BytesReceived))
         + (" time=" +
AnsiString(IdIcmpClient1->ReplyStatus->MsRoundTripTime) + "ms")
         + (" TTL=" + AnsiString(IdIcmpClient1->ReplyStatus->TimeToLive));
         ShowMessage(s);
      break;

      case rsError:
         ShowMessage("Request Error");
      break;

      case rsTimeOut:
         ShowMessage("Request Timed Out");
      break;

      case rsErrorUnreachable:
         ShowMessage("Host Unreachable");
      break;

      case rsErrorTTLExceeded:
         ShowMessage("TTL Exceeded");
      break;
   }

}
//--------------------------------------------------------------------------
-


Any ideas about the second parameter? I am using Indy 90017

john



"Remy Lebeau (TeamB)" <no.spam@no.spam.com> schrieb im Newsbeitrag
news:41af5738$1@newsgroups.borland.com...
>
> "John M." <johnnym@yahoo.com> wrote in message
> news:41af0a1b@newsgroups.borland.com...
>
> > i tried this here:
>
> That code is wrong.  Did you not read Indy's documentation yet?
>
> > IdIcmpClient1->Host = "www.borland.com";
>
> You do not use the Host property.  You pass the hostname to Ping() as a
> parameter instead:
>
>     IdIcmpClient1->Ping("www.borland.com");
>
> > ShowMessage(IdIcmpClient1->ReplyStatus);
>
> ReplyStatus is a class, not a string:
>
>     switch( IdIcmpClient1->ReplyStatus->ReplyStatusType )
>     {
>         case rsEcho:
>         {
>             AnsiString s = "Reply from " +
> IdIcmpClient1->ReplyStatus->FromIpAddress
>                  + (": bytes=" +
> AnsiString(IdIcmpClient1->ReplyStatus->BytesReceived))
>                 + (" time=" +
> AnsiString(IdIcmpClient1->ReplyStatus->MsRoundTripTime) + "ms")
>                 + (" TTL=" +
> AnsiString(IdIcmpClient1->ReplyStatus->TimeToLive));
>             ShowMessage(s);
>             break;
>         }
>
>         case rsError:
>             ShowMessage("Request Error");
>             break;
>         case rsTimeOut:
>             ShowMessage("Request Timed Out");
>             break;
>         case rsErrorUnreachable:
>             ShowMessage("Host Unreachable");
>             break;
>         case rsErrorTTLExceeded
>             ShowMessage("TTL Exceeded");
>             break;
>     }
>
>
> Gambit
>
>