如何将byte转换成String?

Question

我想比较Var
  TempVar           : Array[0..8] Of byte;
  i, EndValue       : integer;
  SN, FileName      : String;
  key               : String;
  F                 : File Of byte;
   tempstr:string;Begin
  //设置文件名
  FileName := getwindir + '\Key.dat';
  SN := GetVolLabel(leftstr(getwindir, 3));
  EndValue := Length(SN) - 1;      AssignFile(F, filename);      reset(f);For i := 0 To 8 Do    Begin
      //循环读入每一个字节
      blockread(F, TempVAR[i], 1);
     //比较两个值
       If TempVar[i]:= '7' Then   //****想完成这一句，但报错           messagebeep;end;

Answer 1

If TempVar[i]:= '7' 该成 IF TEmpVar[i]='7'

Answer 2

if TempVar[i]:= '7' then
这句能比较？？？？
//if TempVar[i] = '7' then
if TempVar[i] = Ord('7') then
if TempVar[i] = Byte('7') then
if Chr(TempVar[i]) = '7' then
if Char(TempVar[i]) = '7' then

Answer 3

应该改成
If inttostr(TempVar[i])= '7' Then
或
IF TempVar[i]=inttostr( '7' ) Then

Answer 4

怎么个个试了都没用啊？!我将MOUSE移到TempVar[i]上，明明看到
TempVar = (7,167,57,64,0,168,230,66,0)，照提示看TempVar[0]=
'7'，怎么 If TempVar[i]= byte('7') Then或
If IntToStr(TempVar[i])='7' Then 或
 If chr(TempVar[0])= '7' Then都没用？
BY THE WAY，Delphi中有没有象VB中的立即窗口，可以用PRINT TEMPVAR[0]=
语句查询结果？

Answer 5

这里真臭，这么简单的问题，竟然没有回答出来!我到大富翁论坛一下子就找
到了答案，应该是TempVar[0]=7 或ord(7)

Answer 6

我上面没有这个Ord('7')吗？
你说明了你要比的是字符还是数字没？
不会告诉我你连字符串和数字都分不清吧。
问题都没问清楚，就在说人。如果这么没礼貌，在DFW我看到你的贴子，我也不会给你回了