Einzelnen Beitrag anzeigen

Kostas

Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.109 Beiträge
 
Delphi 12 Athens
 
#1

Bytes auf ein Integer auffädeln

  Alt 6. Sep 2018, 21:33
Hallo Zusammen,

um z.B.: zwei Bytes auf ein Integer aufzufädeln mache ich das so:

Delphi-Quellcode:
var L: Integer;
begin
  L := FReceiveBuffer[9];
  L := L shl 8;
  L := L or FReceiveBuffer[10];
end;
Ich setze gerade ein Protokoll um und da muss ich diese Aktion öfters machen von ein bis vier Bytes auf ein Integer auffädeln.
Gibt es eine elegantere Möglichkeit dafür?

Gruß Kostas
  Mit Zitat antworten Zitat