//string[250]也是string类型
//它的下标也是从1开始不是0
//参考如下代码
var
 hexbuf: array [0..250] of Char;
 s: string;
begin
  hexbuf[0]:='0';
  hexbuf[1]:='1';
  hexbuf[2]:='2';
  hexbuf[3]:='3';
  hexbuf[4]:=#0; //结束标记
  s := '0x' + hexbuf + ',';
  ShowMessage(s);
end;

解决方案 »

  1.   

    var
    i:integer;
    begin
    for i:=0 to length(hexbuf)-1 do
    begin
    s:=s+bexbuf[i];
    end;
    end;
      

  2.   

    VAR hexbuf:array [1..255] of char;
            S:STRING;
            i:integer;
    begin
    for i:=1 to 255 do
    hexbuf[i]:=chr(0);hexbuf[1]:='0';
    hexbuf[2]:='1';
    hexbuf[3]:='2';
    hexbuf[4]:='3';s:=trim(hexbuf);
    s:='0x'+s+',';
    ShowMessage(s);end;
      

  3.   

    VAR //hexbuf:array [1..255] of char;
          hexbuf:string[255];
            S:STRING;
            i:integer;
    begin
    for i:=1 to 255 do//这个部分可要可不要不过显示出来的可不相同
    hexbuf[i]:=chr(0);hexbuf[0]:='s';//任何字符'0'..'9',
                   // 'a'..'z','A'..'Z',但是#0 
                  //不能在这里;
    hexbuf[1]:='1';
    hexbuf[2]:='2';
    hexbuf[3]:='3';
    hexbuf[4]:='4';s:=trim(hexbuf);
    s:='0x'+s+',';
    ShowMessage(s);
      

  4.   

    zswang(伴水)帮主的可以一试。