C语言怎么换成DELPHI

Question

unsigned char time[]={0x32, 0x47, 0x09, 0x02, 0x25, 0x12, 0x07, 0x3E};
    if(ZH_DownPosTime(time))
        Memo1->Lines->Add("设置时间成功");
    else
        Memo1->Lines->Add("设置时间失败");
谁能帮我一下把这个代码转换在DELPHI应该写成什么样呀,谢谢了,这是C语言写的, 

Answer 1

var time:string;
begin
   time:=chr($32)+chr($47)+chr($9)+chr($2)+chr($25)+chr($12)+chr($7)+chr(3e);
   if ZH_DownPosTime(time) then
     memo1.lines.add('设置时间成功')
   else
     memo1.lines.add('设置时间失败');
end;

Answer 2

晕，unsigned char可不是char,就是delphi的byte,所以：
var
  time:array [0..7] of byte = {$32,$47,$9,$2,$25,$12,$07,$3E};