Source position: netdb.pp line 290
function BuildPayLoadTCP(
var Q: TQueryDataLength;
Name: string;
RR: Word;
QClass: Word
):Integer;