Einzelnen Beitrag anzeigen

Dejan Vu
(Gast)

n/a Beiträge
 
#4

AW: Bitpacked Record

  Alt 3. Sep 2014, 13:03
oder einfach nur eine Property (sollte doch so gehen, oder?)
Delphi-Quellcode:
Type
  TByte = Record
  private
    fByte : Byte;
    function GetBits(start,length : Integer) : Byte;
    procedure SetBits(start,length : Integer; value : Byte);
  public
    Property Bits[start,length : integer] : Byte Read GetBits Write SetBits;
  end
  Mit Zitat antworten Zitat