求施行文件里嵌入其他执行文件方法

求执行文件里嵌入其他执行文件方法。
我这里有a.exe文件是别人做的。
我想把它嵌入到我的窗体里面成为窗体的一部分不知道怎样做呢？
求解答。
[解决办法]

var
  Form1: TForm1;

implementation

{$R *.dfm}
var
  hwndOldParent,hwndCalc:HWND;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  Windows.SetParent(hwndCalc,hwndOldParent);//恢复计算器的原有宿主
end;

procedure TForm1.Button1Click(Sender: TObject);//绑架计算器
begin
  hwndCalc:=FindWindow(nil,'计算器'); //找计算器窗体
  if hwndCalc=0 then winexec('calc.exe',SW_SHOWNORMAL);//如果未找到就运行计算器
  hwndCalc:=FindWindow(nil,'计算器'); //再找计算器窗体
  hwndOldParent:=GetParent(hwndCalc);//获取它的宿主（待进程结束时恢复它的原有宿主）
  Windows.SetParent(hwndCalc,Handle);//将计算器绑架入自己的窗体
end;

end.