1,221
社区成员
发帖
与我相关
我的任务
分享
第一步、编写Res.rc文件并加入工程,Res.rc文件内容如下:
资源名 资源类型 资源文件
f1 exe "NOTEPAD.EXE"
资源名首位不能是数字,同时.rc文件保存时直接保存既可,不能使用TEncoding::Unicode或TEncoding::ASCII等指定格式。
第二步、在工程中加入如下代码:
void __fastcall TForm1::Button1Click(TObject *Sender)
{//释放文件
TResourceStream *rs=new TResourceStream((int)HInstance,"f1","exe");
//rs->Position=0;//当资源流TResourceStream被使用一次后下次使用必须返回开头,否则没有数据
rs->SaveToFile("C:\\1.exe");
delete rs;
}