Byte

21/09/2010

Bom Gostaria de Saber como poderia transformar um String = '55AA1010' em byte no delphi 2010
Alexandro Oliveira

Alexandro Oliveira

Curtidas 0

Respostas

Wesley Yamazack

Wesley Yamazack

21/09/2010

Olá amigo,

Seguinte pelo que entendi veja se este exemplo que desenvolvi lhe ajudar.

http://video.devmedia.com.br/discovirtual/192388/Consultoria/String to Byte.zip

Um abraço

Wesley Y
GOSTEI 0
Alexandro Oliveira

Alexandro Oliveira

21/09/2010

Muito Show o seu Exemplos você é fera mesmo. Campeão Você poderia, por favor me explicar como este código funciona?. não entendi muito bem o que significa '-48' Result[j] := ord(AStr[j + 1]) - 48;
GOSTEI 0
Wesley Yamazack

Wesley Yamazack

21/09/2010

Olá amigo,


Veja a função : function Ord(X: Char): Byte;

Seguinte a função Ord, retorna o valor ordinal de uma expressão do tipo ordinal.

X é um expressão em Delphi do tipo ordinal. O resultado é a posição ordinal do X; seu tipo é o menor tipo inteiro padrão que pode conter todos os valores do tipo X.

Ord não pode operar em Int64 valores.

Caracter Decimal - 48
Decimal
D 20 68 E 53 101 V 70 118 M 29 77 E 53 101 D 52 100 I 57 105 A 49 97
- 48 é para podermos converter de Decimal para Byte(68(Decimal) - 48 = 20Byte, veja neste link a tabela ASCII http://www.walthowe.com/navnet/faq/ascitabl.html

Result[I] := ord(Value[I + 1]) - 48; - Estamos aqui montando o array para preencher as informações de acordo com  o tamanho da String, se a String tem 10 posições teu array terá 10 posições, blz ?

Att,

Wesley Y


GOSTEI 0
Alexandro Oliveira

Alexandro Oliveira

21/09/2010

Ok Entendi , Agora estou precisando enviar isto via udp qual seria o componente do delphi mais indicado pra enviar este arquivos e qual seria o melhor metodo de envio desta informações para um placa controladora ?
GOSTEI 0
Wesley Yamazack

Wesley Yamazack

21/09/2010

Olá amigo,

Para cada dúvida é necessário a abertura de um chamado, sua dúvida inicial era sobre o Byte certo? Para esta outra dúvida necessito que abra um outro chamado, ok meu caro ?

Um abraço

Wesley Y
GOSTEI 0
Alexandro Oliveira

Alexandro Oliveira

21/09/2010

entendo....
GOSTEI 0
Wesley Yamazack

Wesley Yamazack

21/09/2010

Blz amigo, chamado fechado.

Att,

Wesley Y
GOSTEI 0
POSTAR