TReplyStatus

type TReplyStatus = class(TObject)

protected

  FBytesReceived: Integer;

  FFromIpAddress: string;

  FToIpAddress: string;

  FMsgType: Byte;

  FMsgCode: Byte;

  FSequenceId: Word;

  FMsRoundTripTime: UInt32;

  FTimeToLive: Byte;

  FReplyStatusType: TReplyStatusTypes;

  FPacketNumber: Integer;

  FHostName: string;

  FMsg: string;

  FRedirectTo: string;

public

  property RedirectTo: string; [rw]

  property Msg: string; [rw]

  property BytesReceived: Integer; [rw]

  property FromIpAddress: string; [rw]

  property ToIpAddress: string; [rw]

  property MsgType: Byte; [rw]

  property MsgCode: Byte; [rw]

  property SequenceId: Word; [rw]

  property MsRoundTripTime: UInt32; [rw]

  property TimeToLive: Byte; [rw]

  property ReplyStatusType: TReplyStatusTypes; [rw]

  property HostName: string; [rw]

  property PacketNumber: Integer; [rw]

end;

TReplyStatus

TObject