Einzelnen Beitrag anzeigen

Kostas

Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.062 Beiträge
 
Delphi 10 Seattle Enterprise
 
#1

Bytes auf ein Integer auffädeln

  Alt 6. Sep 2018, 20: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