Mit DEC ein record verschlüsseln

[Roaster]

Hi,

ich möchte mit Hilfe des DEC von Hagen ein record mit folgendem Aufbau verschlüsseln:

Delphi-Quellcode:

  TLicenseString = array [0..255] of byte;

  TLicenseBlock = packed record
    Code : TCode;
    ApplicationKey : TKey;
    Modifier : LongInt;
    LicVersionLow   : word;
    LicVersionMid   : word;
    LicVersionHigh   : word;
    LicVersionStr   : TLicenseString;
    RegUserName : TLicenseString;
    RegCompany : TLicenseString;
    VendorName : TLicenseString;
    VendorCompany    : TLicenseString;
  end;

Wie stelle ich dies am besten an?