delphi版在内存中运行exe

用delphi实现在内存运行exe，可以用以exe的加密

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件       2784  2009-04-18 12:02  ExeEncode\Project2.dof

     文件        311  2008-09-03 22:10  ExeEncode\Unit1.pas

     文件        328  2008-09-03 22:10  ExeEncode\Unit1.dfm

     文件        455  2009-04-18 12:02  ExeEncode\Project2.cfg

     文件        517  2009-04-18 12:01  ExeEncode\Project2.dpr

     文件     368128  2008-10-22 16:34  ExeEncode\Project1.exe

     文件        696  2008-10-22 16:47  ExeEncode\Project3.dpr

     文件       2014  2008-10-22 16:47  ExeEncode\Project3.dof

     文件        434  2008-10-22 16:47  ExeEncode\Project3.cfg

     文件      13175  2008-10-22 16:49  ExeEncode\MemRun.pas

     文件      13335  2008-10-24 18:04  ExeEncode\PEUnit.pas

     文件      91648  2009-04-18 12:02  ExeEncode\Project2.exe

     目录          0  2008-09-03 22:10  ExeEncode

----------- ---------  ---------- -----  ----

               493825                    13