心 心心 Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-25 #1 用DELPHI程序修改另一个EXE程序，例74改为EB等的操作，各位高手有何高见 能否给一至二个例子，谢谢。
A Another_eYes Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-25 #2 就当那个exe是个普通文件不就行了. 打开, 定位, 写, 关闭. 当然, 前提是那个exe没在 运行
D delphisnail Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-26 #3 f:file of byte; a:byte; while not eof(f) do begin //blockread if a=$74 then begin //前移一位 //blockwrite end; end; 看一下blockwrite的帮助就会明白了
f:file of byte; a:byte; while not eof(f) do begin //blockread if a=$74 then begin //前移一位 //blockwrite end; end; 看一下blockwrite的帮助就会明白了
心 心心 Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-27 #4 对不起，我的信箱收不到大富翁的信， 二位，还有其它的例子吗？
T tasam Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-27 #6 var sFileName:string;//filename hcs, //head checksum fcs :dword //file checksum fdw :file of dword; begin . . . MapFileAndCheckSumA(Pchar(sFileName),hcs,fcs) AssignFile(fdw, sFileName); Reset(fdw); seek(fdw,70); write(fdw,fcs); CloseFile(fdw); end;
var sFileName:string;//filename hcs, //head checksum fcs :dword //file checksum fdw :file of dword; begin . . . MapFileAndCheckSumA(Pchar(sFileName),hcs,fcs) AssignFile(fdw, sFileName); Reset(fdw); seek(fdw,70); write(fdw,fcs); CloseFile(fdw); end;
I iie Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-28 #9 单改几个字节就拿它当普通文件操作没问题， 要是想修改重定位信息，就要研究PE结构。
B beta Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-28 #12 var f: file of byte; b: byte; begin assignfile(f, 'c:/abc.exe'); reset(f); seek(f, $3F);//$3F是偏移量 3FH write(f, $5A);//$5A是你要修改的字节 closefile(f); end;
var f: file of byte; b: byte; begin assignfile(f, 'c:/abc.exe'); reset(f); seek(f, $3F);//$3F是偏移量 3FH write(f, $5A);//$5A是你要修改的字节 closefile(f); end;
心 心心 Unregistered / Unconfirmed GUEST, unregistred user! 2000-08-28 #13 结束了，不问了，谢谢大家。我不是用来写什么病毒----没那么坏。 谢谢大家。
龙 龙丹 Unregistered / Unconfirmed GUEST, unregistred user! 2000-09-04 #14 我还想来挣点分，你怎么就结束了呢，我可是有一整套修改PE、NE、DFM的东东呀!
