`TIdTextModeResourceRecord`
pt		FormatQName
pt		FormatQNameFull
pt		FormatRecord
pt		SetRRDatas
pt		SetTTL
		CreateInit
		Destroy
		ifAddFullName
		GetValue
		SetValue
		ItemCount
		BinQueryRecord
		TextRecord
		ClearAnswer