Længde af fil

En Boolean fylder nøjagtig 1 byte, sy filens størrelse fortæller direkte hvor mange boolean den indeholder.

Filens størelse kan du finde med funktionen FileSize.
Sådan:

AntalBoolean := FileSize(FilNavn);

Ja, 1 byte, men nogle bruger vist nok 2 bytes, da det er hurtigere at arbejde med words (2 byte) end bytes.
Du kan teste med følgende: (skriver 10 boolean\'s til en fil og checker størrelsen)

procedure TForm1.Button1Click(Sender: TObject);
var
  f: file of boolean;
  i: integer;
  b: boolean;
begin
  b := true;
  assignFile(f,\'c:\\temp\\booltest.txt\');
  rewrite(f);
  for i := 1 to 10 do
    write(f,b);
  label1.caption :=intToStr(filesize(f));
  closefile(f);
end;

hreiff >> ... og når du selv har udført din lille test, vil du se at det jeg siger er RIGTIG ;o)

velle >> Lukker du ikke lige spørgsmålet?
Det er besvaret for længe siden.

Jeps, det er rigtigt - det var egentlig også bare en kommentar. Men jeg har faktisk oplevet en c-compiler der arbejdede med words.

Sorry, sagen er bare, at min compiler gik i ged dengang, og derfor fik jeg aldrig chekket det, og så havde jeg egentligt glemt det.

men tak for det hurtige svar btw