如何将两个可执行文件变成那个样......(100分)

  • 主题发起人 主题发起人 wcwcw
  • 开始时间 开始时间
W

wcwcw

Unregistered / Unconfirmed
GUEST, unregistred user!
写一个可执行文件 C, 将两个可执行文件(A, B)打包在一起, 执行可执行文件C 当中有
2 个按钮, 点击ButtonA 执行程序A , 点击ButtonB 执行程序B!
注意: 当执行C 时, 不需要文件A, B!
ThankS!!!
 
都放在资源文件里,运行时释放出来,运行完删除。
 
用资源文件呀.
 
用资源文件是一个可行的笨办法
 
api速度比较慢!
我也不知道!
期待中!
 
ThankS To All!!!

现在可以把程序A, B 作为程序C 的资源, 但如何在运行程序C的时候把程序A,B 释放出来呢?
现在有些软件可以读取可执行文件的资源! 不知道他们的工作原理?
请大家谈谈看法!
 
这个容易
var
rs: TResourceStream;
begin
rs:=TResourceStream.Create(HInstance,ResName,RT_RCDATA); // ResName就是你的资源名
rs.SaveToFile('A.exe');
rs.Free;
end;
 
Step 5:从资源文件中还原有关文件。

  变量:

  var

  res:tresourcestream;

  resname,resnewname:string;

  RegFile:TRegIniFile;

  begin

  //从资源文件中还原数据库文件

  resnewname:=trim(FrmPathSelect.EdtDir.Text)+'/mynbdb.mdb';

   resname:='MYDBSRC';

   res:=tresourcestream.Create(hinstance,resname,pchar('mydbsrcfile'));

   res.savetofile(resnewname);

   res.free;

  //从资源文件中还原主程序文件

  resnewname:=trim(FrmPathSelect.EdtDir.Text)+'/Tnbdemo.exe';

   resname:='MYDBAPP';

   res:=tresourcestream.Create(hinstance,resname,pchar('mydbappfile'));

   res.savetofile(resnewname);

   res.free;
 
我的想法是可不可以把这些资源调入内存, 并执行, 不需要把他这些资源还原成文件然后再
执行文件!
可行吗?
ThankS!!!
 
多人接受答案了。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
867
DelphiTeacher的专栏
D
后退
顶部