Delphi 字号修改之二

Delphi 字号修改之二

声明

个人可以自由转载本文，不过应保持原文的完整性，并通知我；商业转载先请和我联系。

本文没有任何明确或不明确地提示说本文完全正确，阅读和使用本文的内容是您自己的选择，本人不负任何责任。

如果您发现本文有错漏的地方，请您给我指出；如果有什么不理解的，请您给我提出。

意见、建议和提出的问题最好写在我的主页 http://llf.126.com 的留言版上。

Hint

在上次的 Delphi 消息框字体问题之后，又有汉化人提出 Hint 字体修正的问题，在说这一个问题之前，我们要再熟悉一下微软推荐的字体设置方法：

	nHeight = -MulDiv(PointSize, GetDeviceCaps(hDC, LOGPIXELSY), 72);

大家也看到了，最后一个参数是 72 ，也就是十六进制的 0x48 ，而且它是一个常数，所以这样的语句编译到可执行文件中的时候就会出现一个明显的 push 00000048 的语句，而且，因为 72 是最后一个参数，所以这个 push 语句是这一行程序的第一个 push 语句，这样，上次我们介绍的修改消息框的方法就可以用 push 00000048 作为辅助判断方法，据大宇说，用这种方法判断，迄今为止是百发百中的。 :)

而这一次的 Hint 的问题，因为在反编译出来的文件中找不到“push 00000008/n/n* Reference To: kernel32.MulDiv,”或上面几行没有“push 00000048”，所以无法找到需要修改的地方，我通过查找代码发现，对于 Hint 的字体设置，其中并不是直接压入 8 ，也就是说没有明显的 push 00000008 ，但是仍然是可以修改的。

以前 ChinEase 曾问过 iProtect SoHo 的字体问题，当时我并不熟悉，以为主界面是使用了枚举的方式设置的字体，觉得不能解决，不过现在才发现其实其主界面字体是可以自己设置的，所以所剩的字体问题仍然是 Hint 的问题，在这里就以 iProtect SoHo 为例说一下。

用 W32dasm 反编译 iprotect.exe ，生成 iprotect.alf ，打开它，查找 push 00000048 ，发现四个，其中后两个一个因为在 call MulDiv 之上的语句是 push 00000009 ，所以已经是 9 磅的字体，另一个后面根本没有 call MulDiv ，所以更不是我们所要找的语句了，剩下的两个如下：

	* Referenced by a CALL at Addresses:
	|:00412279   , :00416EAA   , :0041D93C   , :00425408   , :004BAFCA   
	|:004BB710   
	|
	:0041DB38 53                      push ebx
	:0041DB39 8BD8                    mov ebx, eax
	:0041DB3B 8B4314                  mov eax, dword ptr [ebx+14]
	:0041DB3E 50                      push eax
	:0041DB3F 6A48                    push 00000048
	:0041DB41 8BC3                    mov eax, ebx
	:0041DB43 E864FFFFFF              call 0041DAAC
	:0041DB48 50                      push eax

	* Reference To: kernel32.MulDiv, Ord:0000h
	                                  |
	:0041DB49 E8A67BFEFF              Call 004056F4
	:0041DB4E F7D8                    neg eax
	:0041DB50 5B                      pop ebx
	:0041DB51 C3                      ret


	:0041DB52 8BC0                    mov eax, eax

	* Referenced by a CALL at Addresses:
	|:00412298   , :00416EB9   , :0041AE0F   , :0041D945   , :00425417   
	|:0043CC63   , :0043D62A   , :00471F31   , :004914F4   , :0049CB09   
	|:004B6212   , :004BA4DA   , :004BA51E   , :004BB720   , :004D4955   
	|
	:0041DB54 53                      push ebx
	:0041DB55 56                      push esi
	:0041DB56 8BF2                    mov esi, edx
	:0041DB58 8BD8                    mov ebx, eax
	:0041DB5A 6A48                    push 00000048
	:0041DB5C 8B4314                  mov eax, dword ptr [ebx+14]
	:0041DB5F 50                      push eax
	:0041DB60 56                      push esi

	* Reference To: kernel32.MulDiv, Ord:0000h
	                                  |
	:0041DB61 E88E7BFEFF              Call 004056F4
	:0041DB66 8BD0                    mov edx, eax
	:0041DB68 F7DA                    neg edx
	:0041DB6A 8BC3                    mov eax, ebx
	:0041DB6C E843FFFFFF              call 0041DAB4
	:0041DB71 5E                      pop esi
	:0041DB72 5B                      pop ebx
	:0041DB73 C3                      ret

可以看到，在 call MulDiv 之上并不是压入的常数，而是寄存器值，而这两段代码其实是函数，所以它是通过别人调用来设置的，这需要跟踪才能知道究竟是谁在调用，我最近发现其实 W32dasm 也可以进行动态跟踪，因为不会中止其它进程，所以我现在比较喜欢用 W32dasm 来跟踪 —— 可以同时听 mp3 。 :) 不过 W32dasm 的跟踪界面有些零乱，我就不介绍了。在这里，跟踪到调用者：

	:0041ADFA BA38AE4100              mov edx, 0041AE38
	:0041ADFF 8B460C                  mov eax, dword ptr [esi+0C]
	:0041AE02 E8ED2C0000              call 0041DAF4
	:0041AE07 BA08000000              mov edx, 00000008
	:0041AE0C 8B460C                  mov eax, dword ptr [esi+0C]
	:0041AE0F E8402D0000              call 0041DB54

就是最后一个 call 0041DB54 调用了上面的设置字体的代码，我们发现很明显的上面有一个 mov edx, 00000008 ，我们尝试把它修改成 mov edx, 0000000F ，运行程序，发现 Hint 的字体真的变得很大了，也就是说，改对地方了。

另外，第一句的 mov edx, 0041AE38 其实压入的是字体名，所以最后的修改是：把 0x1a239 处的“MS Sans Serif”改成“宋体”，把 0x1a208 处的 08 改成 09 。（0x1a238 处是字体名的长度计数器，最好也修改成 04）

简单方法

上面的介绍只是为了让大家知道为什么要这样修改，其实是有一种简单的方法找到要修改的地方的。我说过，Delphi 程序员一般不会自己创建字体，所以这里的仍然是 VCL 的问题，而 VCL 编译出来的代码不会因为不同的程序而不同，所以仍然有规律可循。

不知道大家注意到没有，上面修改的地方相差不大，一个 0x1a239 ，一个 0x1a208 ，只相差 0x31 ，对于 UEdit 来说，就是三行多一个字符，其实这就是它的规律，我们可以先找到究竟是哪一个字体名的问题，再向上三行，找到一个“BA 08”，把它改成“BA 09”就可以了，我修改的几个程序用这种方法的成功率目前也是百分之百的。:)

至于怎么找到是哪一个字体名的问题，我就不说了 —— 顶多一个一个的改成“System”进行测试，一定可以找到的。 :)