有關開發習慣的一些想法,如鲠在喉,不吐不快。究其發貼動機,當然不排除有騙取參與分的可能,但另一方面,也希望能給同行(念Xing)者提供一些建議,或者參考(希望不是誤人子弟)。同時,也希望各位能夠就我的這些陋習,發表一點看法,給出批評和指正的意見。謝謝。
一.建立工程目錄
首先,第一步要做的,當然是給新項目建一個單獨的目錄(別笑)。目錄名稱與項目名稱同名,或者另取一個也可,只要清楚、簡練。然後,在此目錄中創建以下各個目錄:
<Doc>:用來存放該項目相關的開發文檔(需求說明,概要設計,詳細設計等等等等);
<Source>:用來存放Delphi源程序中的”.Dpr”,”.Pas”,”.Dfm”等文件;
<Dcu>:該目錄中存放”.Dcu”文件,將’.Pas’與’.Dcu’文件分開存放只是為了讓Source目錄的內容更加清楚一些;
<Bin>:存放工程的輸出文件,比如”.Exe”,”.Dll”或者”.Ocx”等等;
<Log>:用來存放日志文件;通常在這個目錄中我會放一個”<項目名稱>程序員日志.Txt”文件。
<Images>:當然是存放工程中用到的圖片的目錄了。一般情況下,這個目錄是少不了的。假如還用到其他資源,那麼也一樣建立各自的目錄,比如Wav,比如Avi等等。
二.設置工程選項
在Delphi中創建一個新的工程,將此工程保存到Source目錄中,同時:
a. 選一個耐看的,與項目有些聯系的圖標作為這個工程的圖標。當然,這個圖標可能只是臨時用用的,但是總要比Delphi默認的那個難看的要好才行,要不然,怎麼對得起自己?
b. 將Project Options -> Directories/Conditionals頁面中的Output Directory設置為Bin目錄;
c. 將Unit output Directory設置為Dcu目錄。
三.添加常量單元
添加一個新的Unit,另存為“unt<工程名> Consts.Pas”,用來保存工程中用到的常量。
四.有關窗體(Form)及單元(Unit)
按照匈牙利命名法則給Form命名,則一個用來登錄的窗體可以命名為’FrmLogin’,而其單元名可以為’untLogin’。通常,兩個對應的Form和Unit的名稱在除去’Frm’或’unt’的縮寫後應當保持一致。
在Unit的頭部添加本單元的注釋,注釋的格式可以參照Delphi的源碼,但是至少應當包含以下幾項:功能描述;作者;版權;創建時間;最後修改時間;修改歷史等等。
將新創建好的Form的Caption設置為該Form類的名稱,而不是使用Delphi默認的。比如,將Form1更名為FrmLogin後,此時我們獲得了TFrmLogin這個新的窗體類,並且Delphi自動將窗體的Caption更新為’FrmLogin’。依我看,該Caption應當為’TFrmLogin’才是,因為我們在設計的是一個窗體類TFrmLogin,而不是僅僅對FrmLogin進行操作。
向TFrmLogin這樣功能明確的窗體類,許多人都有在設計期就將其Caption設置為諸如“操作員登錄”這種名稱的習慣。我的習慣是,象“操作員登錄”這樣的常量,通常存放在unt<工程名>Consts.Pas中,用ResourceString來定義,或者用Const來定義。至於窗體的Caption的命名,應當屬於運行期的工作。所以,我往往在TForm.OnCreate事件觸發之時才對Caption進行操作,比如:
procedure TFrmLogin.FormCreate(Sender: TObject);
begin
Caption := csLoginTitle;
....
end;
五.關於Format函數的使用
有iYear,iMonth,iDay三個數據,要顯示諸如“生日:1976/3/18”這樣的信息,你通常怎麼做?使用s := ‘生日:’+IntToStr(iYear)+’.’+IntToStr(iMonth)+’.’+IntToStr(iDay); 嗎?這樣實在是太累了。我的習慣是,在unt<工程名>Consts.Pas中增加一個常量csBirthDayFormat = ‘生日:%d/%d/%d’來保存顯示格式,然後使用s := Format(csBirthDayFormat, [iYear, iMonth, iDay]);這樣的語句完成數據的拼裝。這麼做的好處顯而易見,那就是你只需在一個地方維護數據的顯示格式。
Format函數功能強大,我對它很是推崇,你呢?
六.關於注冊表或者Ini文件的存儲
原先訪問注冊表我通常使用TRegistry,而訪問Ini文件通常使用TIniFile。這兩個類的使用方法各不相同,因此想要使用相同的代碼既能訪問注冊表又能訪問Ini文件幾乎是不可能的。真頭疼啊!
終於我發現了救星!那就是TRegistryIniFile類。查看Registry單元,我們發現,TRegistryIniFile繼承自TCusomIniFile。而TIniFile也是繼承於TCusomIniFile。因此,使用抽象類TCusomIniFile來實現對注冊表或者Ini文件的訪問便是一舉兩得了。比如:
var
csmIniFile: TCusomIniFile;
begin
if blUseIniFile then//如果使用Ini文件
csmIniFile:= TIniFile.Create(csRootKey)
else
csmIniFile:= TRegistryIniFile.Create(csRootKey);
//接著就可以使用csmIniFile對Ini文件進行訪問,
//或者用類似訪問Ini文件的方式訪問注冊表。
七.關於TStream流以及TFileStream,TMemoryStream等等
TFileStream和TMemoryStream都繼承自抽象類TStream,這意味著我們可以使用一套代碼完成對文件和內存的存取操作。因此,定義一些接口的時候,我往往傾向於將參數的類型定義為抽象類,而不是具體類。比如,要完成保存功能的一個函數,定義成
function Save(AStream: TStream): Boolean;
就比定義成
function Save(AStream: TFileStream): Boolean;
要靈活的多。
前一個定義是具有前瞻性的,因為它可以適用於以後可能出現的新型態的流。而後一個定義只適用於TFileStream這種流(當然包括TFileStream的子類),呆板多了。
我的習慣:如果存在抽象類,那麼盡量將參數定義為抽象類的類型,畢竟,我們無法預見未來。
八.多使用TAction
Delphi 4以後引入了Action的概念,並且在Standard組件欄中增加TActionList組件。使用Action的好處是,控件狀態同步的煩惱從此一掃而空!