Jup.
Indem du alle deine Bits in Bytes groupierst und diese dann wie gewohnt, in (d)eine Datei mit üblichen Methoden (recherchiere selbst; über die sufu lässt sich einiges finden) schreibst.
Das gruppieren ginge z.B. so:
Delphi-Quellcode:
type
T8Bits = Array[0..7] of Boolean;
function bitsToByte(const Bits: T8Bits): Byte;
var
i, j: Integer;
begin
Result := 0;
j := 1;
for i := 0 to 7 do
begin
if Bits[i] then
Result := Result or 1;
j := j shl 1;
end;
end;