Bitweise schreiben mit Streams?

[glkgereon]

hi

ich möchte wirklich bitweise in eine Datei schreiben.

geht das irgendwie?

oder muss ich immer 8 schleifendurchläufe warten, und in den anderen 7 das in nen byte-buffer schreiben?

es wäre für mich erheblich einfacher (und imho auch performanter) das bitweise zu machen...wie?

[Vjay]

Das Erstere, eine andere Lösung wärem ir nicht bekannt. Ich denke nicht das eine grössere bitweise Operation bei grösseren Datenmengen ohne asm in irgend einer Weise performant ist ^^

[Binärbaum]

Die kleinste Einhet, die man in Streams schreiben kann ist ein Byte. D.h. du musst immer erst warten, bis min. 8 Bit zum Schreiben bereitstehen.
Das gleiche gilt auch für das Auslesen.

MfG
Binärbaum

[glkgereon]

kann ich denn ohne streams biteise schreiben?

oder kann ich bei einem byte ein bit direkt ohne umwege über 2er-potenzen "ansteuern"?

[Luckie]

Was hast du denn vor, dass du bitweise schreiben musst?

[glkgereon]

ich hatte ne idee wie man komprimieren könnte (kann aber auch sein dasses das schon gibt...) und dazu will ich halt schön ein bit nachm anderen reinklatschen.

ich will eine zahl (die ich aus der datei erstelle) mit 2 operationen aufschlüsseln, bis ich sie bei 0 hab, und von diesen operationen muss ich mir nur immer die reihenfolge merken...also ein bit...

[BenBE]

AFAIK gibt's dafür den TBitStream von Borland. Guck mal in der DOH; müsstest Du Infos zu finden.

[glkgereon]

also ich hab Delphi 7, und hab kein TBitStream inner OH :(

wer morgen noch mal ausführlich über google etc. suchen...

aber danke für den tipp

[Binärbaum]

Zitat:

Zitat von glkgereon

kann ich denn ohne streams biteise schreiben?

AFAIK geht das auch nicht.

Zitat:

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 shl und/oder shr 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