Ergebnis der Suchanfrage

• Forum: FreePascal

  AW: Bitpacked Record

   
    by himitsu, 3. Sep 2014
  Joar.
  
  Für einbittige Sachen lässt sich das in meine Struktur auch bereits mit einbinden.
  property Bit: Boolean read GetBool write SetBool;
  Ist ja egal, ob der Index von intern oder extern kommt.
  
  Und intern wird dann einfach mit SHL/SHR/AND/OR rumgefummelt.
• Forum: FreePascal

  AW: Bitpacked Record

   
    by himitsu, 3. Sep 2014
  Jupp, Delphi kann nur Byteweise programmiert werden.
  Selbst der Boolean ist ein Byte groß (1x False und 255x True)
  
  Aber über Record-Property kannst du das selber lösen.
  
  type
  TMyRec = record
  private
  function GetBit0: Boolean;
  function GetBool(Index: Integer): Boolean;