Delphi:将integer串转化成byte数组
来源:优易学  2011-10-10 9:55:57   【优易学:中国教育考试门户网】   资料下载   IT书店
  How to Convert a String of Integers into an Array of Byte
  如何将integer串转化成byte数组
  The best solution is to dynamically create an array of byte that has length equal to that of the string. Once you have your array you can fill the array with the values from the string, however there is some offset since the ascii representation of the character \'1\' isn\'t equivalent to 1.
  最好的解决方案是动态的创建一个与这个串长度相同的byte数组。一旦您得到了数组您就可以用串中的值填充数组,但是因为ASC字符\'1\'并不与1相等,所以有一个偏移量。
  Below is a sample of how one might return an array of byte:
  下面是一个如何返回byte数组的例子:
  ~~~~~~~~~~~~~~~~~~~~~~~~~
  interface
  uses
   ...
  type
  dynamic array type for Array of Byte
  TByteArr = array of byte;
  ...
  implementation
  function ArrOfByte(AStr: String): TByteArr;
  var
  j: integer;
  begin
  SetLength( Result, Length(AStr)) ;
  for j := 0 to Length(AStr) - 1 do
  Result[j] := ord(AStr[j + 1]) - 48;
  end;

责任编辑:小草

文章搜索:
 相关文章
热点资讯
资讯快报
热门课程培训