Ich habe vor ein paar Tagen einen Portscanner basierend auf Winsock geschrieben, also nichts neues. Aber Winsock ist mir zu langsam.
Jetzt will ich auf den IdIcmpClient zurückgreifen.

RichEdit1->Lines->Add("Antwort von " + AReplyStatus.FromIpAddress);
  RichEdit1->Lines->Add(IntToStr(AReplyStatus.BytesReceived));
  RichEdit1->Lines->Add(IntToStr(AReplyStatus.MsgType));

Ich weiss genau welche Ports an meinem TestPC im lokalen Netz offen sind, und welche nicht.
Jedoch leifert BytesReceived stets 72 bytes, und der MsgType ist immer 0. Das kann aber nicht stimmen.

http://www.indyproject.org/docsite/html/frames.html?frmname=topic&frmfile=TReplyStatus.html schrieb:

Byte value that identifies the message type received in response to an echo request. MsgType can have the value 0 when a time-out occurs prior to receiving a response to an echo request. 0 - net unreachable 1 - host unreachable 2 - protocol unreachable 3 - port unreachable 4 - fragmentation needed 5 - source route failed

Also müsste MsgType bei geschlossenen Ports doch 4 zurückgeben? Was mache ich falsch?

Danke schonmal.
Tippo

PS: Bei der Loopbackadresse kommen auch die selben unsinnigen Rückgabewerte.