一位 Delphi 開發者的專案組織與編碼習慣指南

前言

良好的開發習慣是專業工程師的基石。本文分享一套經實戰驗證的 Delphi 專案目錄結構、專案設定、命名規範、常用技巧與架構思維，供同好參考交流。

一、標準化專案目錄結構

新專案建立專屬目錄，內含：

• <Doc>：需求、設計、測試等文件
• <Source>：.dpr、.pas、.dfm 原始碼
• <Dcu>：編譯產出的 .dcu，與原始碼分離
• <Bin>：最終輸出 .exe/.dll/.ocx
• <Log>：開發日誌 (專案名_程式設計師日誌.txt)
• <Images>、<Wav>、<Avi> 等資源目錄

二、專案選項關鍵設定

• 設定專案圖示 (別用預設醜圖示)
• Output Directory → <Bin>
• Unit Output Directory → <Dcu>

三、常數集中管理單元

新增 unt<專案名>Consts.pas，集中定義：

• 字串常數 (ResourceString 或 Const)：視窗標題、訊息文字、SQL 陳述式、格式字串
• 數值常數：預設值、上限、超時時間
• 好處：單一維護點、支援多語系、格式統一

四、視窗與單元命名規範

單元檔名去除前綴後與 Form 類別名一致。單元標頭加入標準註解區塊：功能、作者、版權、建立/修改時間、修改歷程。

五、視窗 Caption 於執行期指派

設計期 Caption 設為類別名 (TFrmLogin) 利於識別；執行期 OnCreate 從常數單元載入使用者友善標題：

procedure TFrmLogin.FormCreate(Sender: TObject);
begin
  Caption := csLoginTitle;  // 定義於 Consts 單元
  // ...
end;

六、善用 Format 函式組裝字串

在常數單元定義格式字串：

csBirthDayFormat = '生日：%d/%d/%d';

使用時：

s := Format(csBirthDayFormat, [iYear, iMonth, iDay]);

優點：格式集中維護、避免重複 IntToStr、支援對齊/精度格式化。

七、統一存取登錄表與 INI 檔：TCustomIniFile 多型

TRegistryIniFile 與 TIniFile 同繼承自 TCustomIniFile，利用抽象基類實現程式碼複用：

var
  Ini: TCustomIniFile;
begin
  if UseIniFile then
    Ini := TIniFile.Create(FileName)
  else
    Ini := TRegistryIniFile.Create(RootKey);
  try
    Ini.WriteString('Section', 'Key', Value);
    // 同一套 API 同時支援 INI 與登錄表
  finally
    Ini.Free;
  end;
end;

八、面向抽象類別設計：TStream 範例

TFileStream、TMemoryStream 同繼承 TStream。定義介面/參數時使用抽象基類：

{ 彈性佳：支援檔案、記憶體、網路、壓縮等任意串流 }
function Save(Stream: TStream): Boolean;

{ 死板：僅限檔案串流 }
function Save(Stream: TFileStream): Boolean;

原則：參數類型盡量用抽象基類，面向未來擴充。

九、大量使用 TAction 簡化 UI 狀態同步

TActionList + TAction 統一管理命令啟用/停用、可見、執行邏輯，按鈕、選單、工具列自動同步，消除手動同步程式碼。

結語

習慣成就品質。這些慣例非一蹴而成，而是專案經驗沉澱。歡迎交流指正，共同精進。

1. 上一篇文章： Delphi Hook 技術實現 DLL 注入：原理與完整程式碼解析
2. 下一篇文章： Delphi 精確延遲函式：保持訊息迴圈回應的 Sleep 替代方案

Delphi

DelphiX 入門（1）：安裝測試與首個 DirectX 動畫範例

前言 DelphiX 是 Delphi 連結 DirectX

DBGrid 智慧型欄寬自適應演算法：依標題與資料內容動態分配寬度並支援水平捲軸

問題場景 TDBGrid 預設欄寬固定，資料過長被截斷、過短

Delphi 多邊形與折線繪製：Polygon、Polyline 完整指南

Canvas 多點繪圖兩大核心函數：Polygon (填充多

GDI+ 影像處理：使用 TGPImageAttributes 實現顏色替換

前言 GDI+ 的 TGPImageAttributes 提