NextNameRR

function NextNameRR(

  const pl: TPayLoadTCP;

  start: Word;

  out RRName: TRRNameData

):Boolean;

function NextNameRR(

  const pl: TPayLoad;

  start: Word;

  out RRName: TRRNameData

):Boolean;