Você está aqui: Delphi ::: Win32 API (Windows API) ::: Tipos de Dados |
Como posso quebrar um WORD em dois BYTE?Quantidade de visualizações: 11217 vezes |
|
O tipo WORD da API do Windows é um tipo integral de 16 bits sem sinal (com o valor mínimo de 0 e o máximo de 0 65.535). Já o tipo de dados BYTE é um tipo integral de 8 bits também sem sinal (com valor mínimo de 0 e máximo de 255). Isso quer dizer que o tipo WORD é composto de dois BYTE. Assim, em algumas situações pode ser necessário quebrarmos um WORD em dois BYTE. Quando fazemos isso estamos obtendo o byte de ordem alta ou mais significativo (high-order byte) e o byte de ordem baixa ou menos significativo (low-order byte). Veja, por exemplo, o seguinte valor WORD convertido para binário: Decimal: 2875 Binário: 00001011 00111011 Aqui o byte de ordem alta ou mais significativo é 00001011 e o de ordem baixa ou menos significativo é 00111011. Ambos equivalem aos decimais 11 e 59. Vamos ver isso em Delphi agora? Analise o trecho de código a seguir: ----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------
procedure TForm3.Button2Click(Sender: TObject);
var
valor: WORD;
ordem_alta, ordem_baixa: BYTE;
begin
valor := 2875;
// vamos obter o byte mais significativo
ordem_alta := HIBYTE(valor);
// vamos obter o byte menos significativo
ordem_baixa := LOBYTE(valor);
// vamos exibir o resultado
Memo1.Lines.Add('O valor de ordem alta é: ' +
IntToStr(ordem_alta));
Memo1.Lines.Add('O valor de ordem baixa é: ' +
IntToStr(ordem_baixa));
end;
Este trecho de código exibirá o seguinte resultado: O valor de ordem alta é: 11 O valor de ordem baixa é: 59 Para obter o byte mais significativo nós usamos a macro HIBYTE e para obter o byte menos significativo nós usamos a macro LOBYTE, ambas da API do Windows. O Delphi nos fornece as funções Hi() e Lo() que podem ser usadas com o mesmo objetivo: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- // vamos obter o byte mais significativo ordem_alta := Hi(valor); // vamos obter o byte menos significativo ordem_baixa := Lo(valor); Para fins de compatibilidade, esta dica foi escrita usando Delphi 2009. |
 Link para compartilhar na Internet ou com seus amigos: |
Desafios, Exercícios e Algoritmos Resolvidos de Delphi |
Veja mais Dicas e truques de Delphi |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |
