DEC für Delphi 2009

[toms]

D2009 scheint auch Mode, Init etc nicht mehr zu erkennen. (DECTest.dpr, ab Zeile 708)

Delphi-Quellcode:

            with CipherByIdentity(ReadLong).Create do
            try
              Mode := TCipherMode(ReadByte);
              Init(HashByIdentity(ReadLong).KDFx(APassword, ReadBinary, Context.KeySize));

Erst wenn CipherByIdentity(ReadLong).Mode geschrieben wird, gibt es keinen Fehler mehr aus.