您现在的位置：程式碼之家 >> 編程語言 > >> 更多程式語言 >> Delphi

Delphi Program 與 Unit 架構詳解：程式入口、單元結構、引用關係與循環依賴處理

編輯：Delphi

Delphi 程式由專案檔（.dpr）與單元檔（.pas）組成。本文詳細解析 program 與 unit 的標準結構、uses 子句的多種引用形式、單元間接/巢狀引用、循環引用的編譯器處理機制與最佳實踐。

1. 專案檔（Program）標準結構

program Editor;

uses
  Forms,
  REAbout,   { "關於" 對話框單元 }
  REMain;    { 主視窗單元 }

{$R *.res}   { 資源檔指令 }

begin
  Application.Title := 'Text Editor';
  Application.CreateForm(TMainForm, MainForm);
  Application.Run;
end.

uses 列出專案直接依賴的單元，編譯器按順序編譯並鏈接。
Application 是 Forms 單元提供的全域 VCL 應用程式物件。
CreateForm 會自動建立、顯示並註冊主視窗。

2. 單元檔標準結構

unit Unit1;

interface
uses
  { 介面區依賴：其他單元的類型/常數/函數在此可見 }
implementation
uses
  { 實作區依賴：僅實作細節需要，減少介面區耦合 }
  { 類別方法、過程、函數的具體實作 }
initialization
  { 單元初始化代碼：載入資源、註冊類別、啟動執行緒等 }
finalization
  { 單元終結代碼：釋放資源、註銷、停止執行緒等 }
end.

關鍵區塊說明

區塊	執行時機	典型用途
`interface`	編譯期（型別檢查）	類型聲明、常數、公開函數原型
`implementation`	編譯期/連結期	私有型別、函數實作
`initialization`	程式啟動，單元載入時	資源載入、單例建立、註冊
`finalization`	程式結束，單元卸載前	資源釋放、註銷、清理

3. 引用單元的多種形式

單行/多行列舉

uses Forms, Main;
uses
  Forms,
  Main;
uses Windows, Messages, SysUtils, Strings, Classes, Unit2, MyUnit;

專案檔引用指定路徑單元

uses
  Windows, Messages, SysUtils,
  Strings in 'C:\Classes\Strings.pas',  { 指定完整路徑 }
  Classes;

注意：in 'path' 僅能用於專案檔（.dpr），單元檔內 uses 不支援路徑指定。

4. 單元間接引用

program Prog;
uses Unit2;
const a = b;

unit Unit2;
interface
uses Unit1;
const b = c;

unit Unit1;
interface
const c = 1;

Prog 僅直接 uses Unit2，但透過 Unit2 → Unit1 間接可見 c。
介面區 uses 形成「傳遞性可見性」；實作區 uses 不傳遞。

5. 單元巢狀/循環引用

unit Unit1;
interface
uses Unit2;  { Unit1 介面區引用 Unit2 }

unit Unit2;
interface
uses Unit1;  { Unit2 介面區引用 Unit1 }

編譯器規則：

介面區循環引用允許，前提是至少一方在 implementation 區引用另一方，或雙方僅在介面區使用對方的「不完整類型」（指標/類別引用）。
若雙方介面區都需要對方的「完整類型」（如繼承、字段類型），會導致編譯錯誤 Circular unit reference。

解決循環引用的標準模式

{ Unit1.pas }
unit Unit1;
interface
uses Unit2;  { 僅需 Unit2 的類別引用/指標 }
type
  TClass1 = class
    Ref: TClass2;  { 指標/引用，不需完整定義 }
  end;

{ Unit2.pas }
unit Unit2;
interface
uses Unit1;
type
  TClass2 = class
    Ref: TClass1;
  end;

或將共用類型抽離至第三個單元 UnitCommon，雙方同時 uses UnitCommon。