Thema: ping

Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie
(Moderator)

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#4

Re: ping

  Alt 6. Nov 2008, 21:05
Zitat von technik05:
Code:

procedure TForm1.Panel1Click(Sender: TObject);
begin
IdIcmpClient1.Host := '192.168.0.222';
IdIcmpClient1.Ping();
If IdIcmpClient1.ReceiveTimeout = 5000 Then
pannel1.Color :=red
else pannel1.Color :=green;
end;
was ist hier falsch ?????
Keine Ahnung, sag du es uns, du sitzt vor der IDE, welchs die Fehlermeldung ausgibt.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat