Dicas - Converter uma String de inteiros em um Array de byte

Veja nesta dica, como converter uma string em um array de byte.

Converter uma String de inteiros em um Array de byte

 

A melhor solução é criar dinamicamente um array de byte que possua o mesmo tamanho da string. Uma vez que você tenha o array você pode preenchê-lo com os valores da string, no entanto precisamos atentar que a representação ascii do caractere ‘1’ não é equivalente a 1. Abaixo está um exemplo de como criar um array de 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;

Artigos relacionados