百度“delphi aes”出来的结果，千篇一律，都是相互转载，但是没有人发现EldoS, Alexander Ionov于1998-2001写的ElAes.pas代码，存在一个问题。

 

相同的key和iv，计算结果跟.net中的计算结果完全不一样，就快绝望时，跟踪代码想起补齐值的问题。

 

原代码如下：

FillChar(TempIn[Count], SizeOf(TempIn) - Count, 0);

 

应更正如下：

FillChar(TempIn[Count], SizeOf(TempIn) - Count, SizeOf(TempIn) - Count);