TIdicmp_hun

type TIdicmp_hun = class(TIdUnion)

protected

  function Getecho_id;

  function Getecho_seq;

  function Getfrag_mtu;

  function Getfrag_pad;

  function Getgateway_s_b1;

  function Getgateway_s_b2;

  function Getgateway_s_b3;

  function Getgateway_s_b4;

  function Getgateway_s_l;

  function Getgateway_s_w1;

  function Getgateway_s_w2;

  procedure Setecho_id();

  procedure Setecho_seq();

  procedure Setfrag_mtu();

  procedure Setfrag_pad();

  procedure Setgateway_s_b1();

  procedure Setgateway_s_b2();

  procedure Setgateway_s_b3();

  procedure Setgateway_s_b4();

  procedure Setgateway_s_l();

  procedure Setgateway_s_w1();

  procedure Setgateway_s_w2();

public

  constructor Create; override;

  property echo_id: UInt16; [rw]

  property echo_seq: UInt16; [rw]

  property gateway_s_b1: UInt8; [rw]

  property gateway_s_b2: UInt8; [rw]

  property gateway_s_b3: UInt8; [rw]

  property gateway_s_b4: UInt8; [rw]

  property gateway_s_w1: UInt16; [rw]

  property gateway_s_w2: UInt16; [rw]

  property gateway_s_l: UInt32; [rw]

  property frag_pad: UInt16; [rw]

  property frag_mtu: UInt16; [rw]

end;

TIdicmp_hun

TIdUnion

TIdStruct

TObject