减小Delphi XE 以上版编译出来的程序体积

显示行号 | 选择喜欢的代码风格

看完哪些著名程序用 Delphi 开发之后，我们回顾第一节的内容示例，Debug 编译生成的 EXE 可执行文件，大家可能会发现，竟然有 11Mb 大！这里着重讲解下如何减小 Exe 的体积 - Delphi Reduce exe size。

一般用两个方法可以很大程度上减少程序体积

1.在工程中用编译指令禁用 RTTI

禁用的方法很简单（点中 EXE，按 Ctrl + V 或者单击鼠标右键，点 View Source），一般在工程的 Uses 语句前添加下面的定义：

{ Reduce EXE size by disabling as much of RTTI as possible Delphi}

{$IF CompilerVersion >= 21.0}

{$WEAKLINKRTTI ON}

{$RTTI EXPLICIT METHODS([]) PROPERTIES([]) FIELDS([])}

{$IFEND}

完整的 Delphi 代码示例如下：

program NotePad;

{ Reduce EXE size by disabling as much of RTTI as possible Delphi}

{$IF CompilerVersion >= 21.0}

{$WEAKLINKRTTI ON}

{$RTTI EXPLICIT METHODS([]) PROPERTIES([]) FIELDS([])}

{$IFEND}

uses
  Vcl.Forms,
  FormMain in 'FormMain.pas' {frmMain};

{$R *.res}

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TfrmMain, frmMain);
  Application.Run;
end.