delphi 释放资源文件中的exe文件并运行

制作资源文件我就不用说了吧，下面是怎样释放并运行文件

Res := TResourceStream.Create(Hinstance, 'aaa.exe', 'aaa');
Res.SavetoFile('aaa.exe');
winexec('aaa.exe',sw_Normal);