由於Delphi採用了真正的完全物件導向方法、當今世界最快的編譯器以及領先的資料庫技術，特別是她對Windows API的完全相容，出色的程式碼自動產生能力…人們已經看到，在短短的幾年當中，Delphi已在眾多的開發工具中脫穎而出！正是Delphi的許多優秀品質，讓程式設計師能在很短的時間內開發出極具專業水準的運用軟體，而所做的工作卻是相當的少！
正所謂Let's us make better!我們該怎樣充分利用Delphi的優勢來更加快速地進行程式設計程式呢？
一、充分利用程式碼完全共享(句檳)：
我們這樣做的目的不僅僅是為了“偷懶”，這也是優化程式碼的一種方法。當然，首先要考慮的是能不能共享（這很簡單，看看是否包含在該事件的下拉集合中），其次是要注意的是共享後有沒有“麻煩”，因為正確是第一步，在要確保正確的情況下才有必要去追求優化！
例如：我們在用戶刪除資料前給予一確認訊息：
PRocedure TForm1.Table1BeforeDelete(DataSet: TDataSet);
begin
//確認刪除記錄
if MessageBox(handle,'確實要刪除目前記錄嗎？','確認',MB_IconQuestion+MB_YesNo)=IDNO then
Abort;
end;
那麼，你只要願意讓使用者在刪除資料記錄前進行確認均可在TDataSet.BeforeDelete事件（Table2的BeforeDelete，Table3的BeforeDelete…）中完全共用這段程式碼。好運不會天天有，在有的時候就不這麼直接、簡單了…
「As」這個字不只在英文中用處極大，在Delphi中亦然！當我們想為數個「同類」元件共享程式碼時，即可發揮她的巨大作用：我們只需為其中一個元件編寫程式碼即可。
例如：想讓一組文字編輯框在得到輸入焦點時背景顏色變為茶色，失去焦點是恢復系統顏色，我們可以如此共享程式碼（讓每個文字編輯框的事件公用以下程式碼）：
procedure TForm1.Edit1Enter(Sender: TObject);
begin
(Sender as TEdit).color:=ClTeal; //得到輸入焦點
end;
procedure TForm1.Edit1Exit(Sender: TObject);
begin
(Sender as TEdit).color:=ClWindow; //失去輸入焦點
end;
上面的例子似乎有點太特殊了，萬一我只對其中某些組件特別關照怎麼辦？仍以上面的為例，例如其中有兩個文字輸入框需要輸入數字，為引用戶注意，得到焦點時顏色變為蘭色，但我仍然然不想為每個組件分別寫代碼。
要解決這個問題可利用組件的Tag屬性，先為要特別處理的組件分配非零、不等的Tag（必須說明的Delphi不會檢查Tag值是否相等，設計時自己掌握）；然後如下編寫程式碼，就可依然實現共享：
procedure TForm1.Edit1Enter(Sender: TObject);
begin
case (Sender as TEdit).Tag of
10,20:(Sender as TEdit).Color:=clBlue //輸入數字的文字框
else
(Sender as TEdit).Color:=clTeal; //其餘文字框
end;
end;
（以下言論均假設在Delphi的預設條件之下）
1、利用Self關鍵字：
也許有人以為我搞錯了！其實，這裡要向大家介紹的是筆者（因記性太差）「慣犯」的又一「伎倆」。在有的時候，我們可能記不準組件的確切名字（Name）了，這時你要是再返回窗體表格去確認一遍的話（大多數的朋友應該是這樣的）未免有點太對不起時間了，此時你要是利用Self就特別省力，因為Self在Delphi中是明確地引用該組件所在的窗體，因此，我們可以輸入Self後加一逗號以此激活Delphi的Code Completion，此時系統會立即為你顯示一包含該窗體所有組件及窗體本身屬性的下拉列表，你從中選擇所需組件即可。這樣，就避免了來回切換窗體表格的這項工作量。
2、利用程式碼補缺（Code Completion）：
我們現在再也沒有必要讓自己記憶太多的參數細節了，因為有了Delphi的程式碼補缺功能。在具體解釋之前，還要囉嗦一點，Delphi的Code Completion預設的快捷鍵會與我們已使用的某些快捷鍵衝突（如Ctrl+Space就與我們開啟、關閉漢字輸入法的快捷鍵衝突），因此請先解決這個問題。
當然，Code Completion一般會自動激活，但是不要以為就萬事大吉了，本人認為Delphi的此項技術應向VB學習，此言怎講？舉例來說：當你輸入StrToint(edit1.後，Delphi不會自動顯示edit1的屬性，此時你就將用Ctrl+Space來啟動Code Completion，特別是嵌套很深的時候，Delphi似乎也糊塗了。
3、利用程式碼參數（Code Parameters）：
啟動快速鍵是Ctrl+Shift+Space。這項功能也是Delphi自動實現的，正如上述所言，當我們來回切或是遊標移走時，這項功能也就隨之消失了，當我們需要確認該函數的具體參數時即可以此快捷鍵打開。
4.利用程式碼模板（Code Templates）：
這項技術再次體現了Inprise公司Delphi開發團隊的工程師們高超的技術及處處為用戶著想的高尚品德！ （只是不希望再聽到又有人被微軟挖走的消息）
啟動快捷鍵是Ctrl+J。此項功能實現機制與程式碼補缺的差不多，只是她不是自動的，當然最另令人興奮的一面是使用者可以定義自己的模板。例如筆者定義的一個範本：快速-〉「msg」；程式碼-〉「MessageboxMessageBox(
handle,'|',',MB_Icon...+MB_...);”，只要一輸入msg然後按Ctrl+J整個代碼“脫穎而出”，並把遊標幫我移到我該補充輸入的地方，簡直爽呆了！
註：如果你為自己定義了很多可愛的模板捨不得丟掉的話，不妨把...Delphi4Bin目錄下的Delphi32.dci檔案備份,重新安裝Delphi後以此檔案覆蓋即可。
這個話題本來不該寫在這裡，但還是忍不住…
1.能利用物件觀察器直接設定且不會影響程式正常運作的就沒有必要去寫程式碼：
由於這個主題涉及面太廣，此處僅舉一例說明：例如要在Delphi4中實現在狀態列上的自動提示，又沒有太「苛
刻」的條件時，我們沒有必要再像以前一樣，先定義一個過程（ShowMyHint(...)），然後在程式初始化的地方
把她賦值給Tapplication的OnHin事件。因為只要將狀態條的AutoHint屬性設為True即可！當然，她似乎只能在
第一個Panel上顯示（這就是沒有太“苛刻”的條件時）。當然，怪我囉嗦，有的朋友居然不知道Delphi的Hint
屬性由兩部分組成，此處不是說話之地，有興趣請到筆者的個人主頁上去遛遛www.zg169.net/~delphiok（剛開
張，東西還不多）。
2、節省代碼：
能夠少寫程式碼就沒有必要多寫程式碼，能夠精煉就不要冗餘：
例如，以下的兩段程式碼實現的功能完全相同，你喜歡用哪一段？
程式碼段一：
if ToolButton1.Down=true then
begin
Dbgrid1.show;
DelBtn.Enabled:=true;
end
else
begin
Dbgrid1.Hide;
DelBtn.Enabled:=false;
end;
程式碼段二：
Dbgrid1.Visible:=ToolButton1.Down;
DelBtn.Enabled:=ToolButton1.Down;
因此，我們寫完程式後，不要只追求程式調通，不妨也給程式碼炸炸油。
3、節省變數：
有的程式設計師在不需要變量的地方定義了變量，在需要變量的地方定義了多餘的變量，我個人認為這都不是好的
習慣，特別是動不動就定義全域變數更是值得商榷。有的讀者可能認為我是個守財奴，現在的處理器速度都
什麼年代了……但我只簡單的給你展示一段程式碼你就明白了：
procedure TForm1.Button1Click(Sender: TObject);
Var s1,s2:String;
begin
s1:=Inputbox('資料','請輸入使用者姓名',');
if s1<>' then
begin
Btn_Name.Enabled:=True;
s2:=Inputbox('資料','請輸入使用者住址',');
if s2<>' then
Btn_Adress.Enabled:=True;
end;
end;