procedure IdRawBuildIcmpTimestamp(
    const AType: byte; 
    const ACode: byte; 
    const AnId: word; 
    const ASeq: word; 
    const AnOtime: TIdNetTime; 
    const AnRtime: TIdNetTime; 
    const ATtime: TIdNetTime; 
    const APayload: TIdBytes; 
    var VBuffer: TIdBytes
);