摘要： 1、准备工作。从Lazarus安装目录中找到pcap.pp。加到工程中，并引用它。win下要安装WinPcap。 2、写一个读取数据的回调 function htons(hostshort: word): word;begin Result := ((hostshort and $00FF) shl 阅读全文