OK, nehmen wird an, das ECB mit 128-Bit key vorliegt, dann sollte
es ungefähr so gehen
Delphi-Quellcode:
var
AES: TDCP_rijndael;
const
key128: array[0..15] of Ansichar = 'Key16_123456789!';
var
plain,ct: array[0..15] of byte
...
AES.Init(key128,128,nil);
AES.EncryptECB(plain,ct);
Das Problem mit DCPCrypt (so wie ich es kenne, zB dcpcrypt2-2010.zip) ist, daß EncryptECB nur einen 16-Byte-Block akzeptiert. Du mußt also in einer Schleife entschlüsseln.
Zu Testen kannst Du zB
http://jacquelin.potier.free.fr/CryptoStuff/ hernehmen. Wenn's dann wirklich ECB ist kannst Du auch meine AES-Routinen
http://www.wolfgang-ehrhardt.de/crypt_de.html#AES verwenden.