如何把EXE放到资源文件中？

Question

如何把EXE放到资源文件中？又如何查找，运行这个EXE，象在VC中一样。

Answer 1

新建一个文本文件head.rc, 内容为: head exefile head.exe, 然后把它们拷贝到Delphi的BIN目录下，执行Dos命令Brcc32.exe head.rc.
ExtractRes它的作用是把head.exe从资源文件中取出来。
  function ExtractRes(ResType, ResName, ResNewName: string): boolean;
var
  Res: TResourceStream;
begin
  try
    Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
    try
      Res.SavetoFile(ResNewName);
      Result := true;
    finally
      Res.Free;
    end;
  except
    Result := false;
  end;
end;