Delphiのコードのコンパイル方法

Question

Delphiコンパイラはどのようにして次のコードをコンパイルしますか。

uses a_big_unit; 


procedure TForm1.Button1Click(Sender: TObject); 
var 
acompont : T_a_big_component ; 
begin 

if (true = false) then // or   if false then 
begin 
    bc := Tbig_component.create(self) 

end; 

このコードでtrue = falseは起こらないので、コンポーネントacompontは決して作成されません。

Delphiが最適化されたモードでコンパイルされたこれらの未使用のユニットとコードがあなただけのXPManユニットを使用している場合でも、

を省略とDelphi 7で単位

を使用してWHENれます。 （それが持っているコンポーネント（TXPManifest1）を使用せず）、それでもユニットが使用され、すべてのコンポーネントがテーマで表示されます。

と言われています。必要がない場合、Delphiは単位を省略します。

だから、Delphiはユニットが、それは私はもうデルファイを使用していない年だから、私はここでチェックすることはできませんが、私はユニットをコンパイルして含まれることを期待呼び出すか

Answer 1

参照：コードをコンパイルし、デバッガで実行します。 if false thenブロック内のステートメントにブレークポイントを設定することはできず、他のユニットのTbig_componentクラスのコンストラクターでブレークポイントを設定することはできません。どうして？これらのステートメントのコードは存在しないためです。

コンパイラで生成されたマシンコードは、IDEの逆アセンブリビューを開いて表示することもできます。各ソース行のマシンコードが表示されます。 if false thenブロック用に生成されたマシンコードがないことがわかります。

Answer 2

ユニットに影響を与えるかどうかを識別する方法結局のところ、彼らはコード内に存在するからです。しかし、（少なくともそこに）呼び出すコードはありません。 代わりに、条件付きの$ IFがそのトリックを行うべきです。

Answer 3

this paragraphを読んでください。コンパイル時に条件式が解決されるため、オプティマイザはthenの文をすべて破棄します。ただし、ユニット全体が除外されることはありません。私は、Delphi 2009年のTTableコンポーネントを使用して、いくつかのテストを行った

Answer 4

：

1）

unit Unit5; 

interface 

uses 
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
    Dialogs, DB, DBTables, StdCtrls; 

type 
    TForm5 = class(TForm) 
    Button1: TButton; 
    procedure Button1Click(Sender: TObject); 
    end; 

var 
    Form5: TForm5; 

implementation 

{$R *.dfm} 

procedure TForm5.Button1Click(Sender: TObject); 
var 
    T: TTable; 

begin 
    if False then 
    T:= TTable.Create(nil); 
end; 

end. 

実行ファイルサイズ= 820736バイト。

procedure TForm5.Button1Click(Sender: TObject); 
var 
    T: TTable; 

begin 
    if True then 
    T:= TTable.Create(nil); 
end; 

実行可能ファイルサイズ= 844288バイト：

は、今私は少し上記のコードを変更しました。

だから、デルファイリンカーは約24Kの死んだTTableコードを除去するのに十分なほどスマートです。

Answer 5

Delphiコンパイラは、使用されていないコードを削除するほどスマートです。ただし、コードがユニットの内容を直接参照していない場合でも、使用されているユニットは最終的な実行ファイルにサイズを追加できます。

ユニットに初期化-sectionsがある場合、そのセクションで参照されているすべてのコードが含まれます。

ユニットにというリンクされたリソース（XPManユニットのようなもの）がある場合、そのリソースもあなたのexeファイルに含まれます。あなたはあなたにそれをしたい時にユニットが除外されていることを絶対に確認するために

は、このような条件付きのディレクティブを使用する必要があります。usebigcomponent上記の例では

uses 
    {$ifdef usebigcomponent} 
    BigUnit, 
    {$endif} 
    SysUils; 

の中で「Conditinal定義」に定義されていますプロジェクトオプションを使用するか、{$ define}ディレクティブを使用します。 usebigcomponentが定義されていない場合、ユニットは除外されます。条件付きのディレクティブは、コードを読みにくくするため、小さな実行可能ファイルの価値があるかどうかはあなた次第です。