Thema: Delphi msb-lsb

Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.116 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: msb-lsb

  Alt 13. Okt 2003, 15:41
Moin Christoph,

das geht recht einfach.
Du müsstest das jeweilige Byte ausmaskieren.
Das höherwertige Byte müsste dann noch mit div oder shr nach unten verschoben werden. Wenn ich mich recht entsinne ist div schneller als shr.

Beispiel:

Delphi-Quellcode:
var
  wVar : WORD;
  bVar1 : byte;
  bVar2 : byte;

begin
  wVar := $ABCD;
  bVar1 := wVar and $00FF; // => $CD
  bVar2 := (wVar and $FF00) div $FF; // => $AB
end;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat