Delphi Problem bei IdIcmpClient (Ping)

Thema durchsuchen

Ansicht

Themen-Optionen

Problem bei IdIcmpClient (Ping)

Ein Thema von stho · begonnen am 24. Sep 2009 · letzter Beitrag vom 24. Sep 2009

Vorheriger Beitrag

Nächster Beitrag

stho

Registriert seit: 16. Sep 2009
Ort: 127.0.0.1
288 Beiträge

Delphi 2007 Professional

Re: Problem bei IdIcmpClient (Ping)

24. Sep 2009, 08:56

könntest du mir sagen wie ich das mache?
Also ich habe ja die möglichkeit mit der Komponente Rückgabewerte ab zu fangen:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.IdIcmpClient1Reply(ASender: TComponent;

  const AReplyStatus: TReplyStatus);

begin

  //IP-Ping kommt zurück...

  if AReplyStatus.FromIpAddress <> '0.0.0.0' then

  begin

    Listbox1.Items.Add(AReplyStatus.FromIpAddress);

  end;

end;

Das tue ich ja. aber wie kann ich das in die obere funktion ein bauen?