编程,是用流copy文件吗?
如果是在自己的程序中添加一个程序可以这样!
在程序中
{$R aaa.res}
if ExtractRes('exefile','aaa','c:/aaa.exe') then
showmessage('创建文件成功');
...................
Function ExtractRes(ResType, ResName,mFileName: String):boolean;
var
Res : TResourceStream;
begin
try
try
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));
Res.SaveToFile(mFileName);
Result:=true;
finally
Res.Free;
end;
except
Result:=false;
end;
end;
在aaa.hc中写:
aaa exefile aaa.exe
然后在命令行brcc32.exe aaa.hc