数据文件的转换(30分)

提一个很弱的问题：我在做一个网上流量分析的东东，我在网上下载了一些数据，但我打开基本上都是16进制的数据，也不知道其中的表项和内容：
忾
斉 ? P?忾
斉

{字符转化为十六进制数}
Function StrToAsc(StrString: String): String;
Var
i: integer;
tempstr: String;
Begin
result := '';
tempstr := Ansiuppercase(trim(strstring));
If tempstr = '' Then
exit;
For i := 1 To length(strstring) Do
result := result + inttohex(Ord(strstring), 2);
End;
试试看？？

你需要知道数据的格式。否则无法转化，即使转化了，出来的也时乱码。