如何用DELPHI编写补丁
编号：QA003820
建立日期: 2001年1月31日 最后修改日期：2001年1月31日
所属类别：
dgwzq:
操作系统: win9x
编程工具: delphi
问题: 我是一名DELPHI的初学者，请问如何用DELPHI编写补丁? 把EDIT1.TEXT的内容(如:06112233)转为16进制，然后写进ABC.EXE中，其偏移量为1234H,望解答，谢谢！
水平: 刚入门
回答:
如果你不了解Delphi的文件操作，可以参考QA000932 "Delphi4对文件如何读写操作"
针对你的情况，可以使用二进制方式打开文件，如。
var f:file;
......
AssignFile(f, 'ABC.EXE');
Reset(f, 1);
Seek(f, $1234);
这里需要注意：Delphi的Seek语句认为第一个字节的位置号为0，所以如果你的偏移量定义与此不同，注意调整一下。
你所说的把EDIT1.TEXT的内容(如:06112233)转为16进制，实际上是把字符串转换为数字，这可以使用StrToInt函数。如：
n := StrToInt('$' + Edit1.Text);
BlockWrite(f, n, SizeOf(n));
这里假设Edit中输入的是十六进制的。
此问题由李海回答。
| |
|
|
| |
|
|
