Delphi 2007 Updata3 安装纪要

 1.官方下载路径：

http://altd.codegear.com/akdlm/download/radstudio2007/CodeGearRADStudio2007_v11.0.2804.9245.5.iso

用迅雷下载速度非常快

 

 2.安装序列号：3AKS-S46LXF-5W7LSF-52CN

 

 3.安装帮助文件需要很长的时间

如果安装帮助文件不能结束，可能安装程序有问题，安装无法结束时，直接在任务管理器中结束：Help_Setup.exe 这个任务，就会提示结束了。然后手动安装帮助：
进入：C:/Documents and Settings/All Users/Application Data/{6AF0EFC6-B937-4704-A430-319EB93F4C12}/help system installer/mFileBagIDE.dll/bag这个目录，执行Help_Setup.exe这个安装程序就可以了。

 

 4.破解

 用LY的方法，用UE修改【BDS.EXE】如下：
原来
0000b420h: F8 C6 43 25 00 8B 45 14 50 8B 45 10 50 8B 45 0C
0000b430h: 50 8B 45 08 50 6A 00 6A 00 8B 4D FC 8B D6 8B C3
0000b440h: E8 FB 10 00 00 88 45 FB 80 7D FB 00 75 6B 8D 45
修改为：
0000B420h: F8 C6 43 25 00 90 90 90 90 90 90 90 90 90 90 90
0000B430h: 90 90 90 90 90 90 90 90 90 90 90 90 90 90 90 90
0000B440h: 90 90 90 B0 01 88 45 FB 80 7D FB 00 75 6B 8D 45

 5.TEdit等组件可能没有右键菜单的问题

解决delphi2007 for win 和CB2007的TEdit等组件右键菜单没有的问题，只要修改源码Controls.pas中第7319行改为if Result <> 0 then Exit;
，并将修改后的Controls.pas拷贝到Lib目录就可以了。delphi for .net暂时无办法解决。

procedure TWinControl.DefaultHandler(var Message);
begin
  if FHandle <> 0 then
  begin
    with TMessage(Message) do
    begin
      if (Msg = WM_CONTEXTMENU) and (Parent <> nil) then
      begin
        Result := Parent.Perform(Msg, WParam, LParam);
//        Exit;//将此行的Exit改为if Result <> 0 then Exit;
        if Result <> 0 then Exit;
      end;