Einzelnen Beitrag anzeigen

Benutzerbild von Binärbaum
Binärbaum

Registriert seit: 19. Jan 2005
Ort: Elstra
764 Beiträge
 
Delphi 7 Enterprise
 
#9

Re: Bitweise schreiben mit Streams?

  Alt 8. Apr 2005, 23:28
Zitat von glkgereon:
kann ich denn ohne streams biteise schreiben?
AFAIK geht das auch nicht.

Zitat von glkgereon:
oder kann ich bei einem byte ein bit direkt ohne umwege über 2er-potenzen "ansteuern"?
Es wäre möglich, mit Hilfe der Operatoren Delphi-Referenz durchsuchenshl und/oder Delphi-Referenz durchsuchenshr auf bestimmte bits im Byte zuzugreifen:
Delphi-Quellcode:
function GetBitofByte(aByte: Byte; nBit: Byte): Boolean;
begin
  Result:= ((aByte and (1 shl nBit))<>0);
end;
Die Funktion gibt True zurück, wenn das entsprechende Bit von aByte gesetzt ist, ansonsten erhält man False. (Es sei 0<=nBit<=7)

MfG
Binärbaum
There are exactly 10 kinds of people: those who understand binary, and those who don't.
---
"Software reift beim Kunden. Bei Hardware ist es anders: Hardware fault beim Kunden." - Rainer G. Spallek
  Mit Zitat antworten Zitat