delphi的物件導向之路1 (轉)

delphi的物件導向之路1 (轉)[@more@]

  規則一：為每一個類建立一個單元（One Class,One Unit）
  請始終牢記這一點：類的私有(private)和保護(protected)的部分只對於其他單元中的類和過程（procedure）才是隱藏的.因此，如果你想得到有效的封裝性，你應該為每一個類使用一個不同的單元。對於一些簡單的類，比如那些繼承其他類的類，你可以使用一個共享的單元。不過共享同一個單元的類的數目是受到限制的：不要在一個簡單的單元裡放置超過20個複雜的類
規則二：為命名（Name Components）
為元件使用帶有描述性的名字同樣十分重要。最常見的命名方式是使用類的小寫字母開頭，再加上元件的功能，如BtnAdd 或者editName。
規則三：為事件命名（Name Events）
  對於事件處理方法給出合適的名字更加重要。如果你對於元件給出了一個合適的名字，那麼預設的名字ButtonClick將變成BtnAddClick。雖然從這個名字中我們可以猜到這個事件處理的功能，但是我認為使用一個能夠描述該方法的作用的名字，而不是採用附加的名字是一種更好的方式。例如，BtnAdd按鈕的OnClick事件可以命名成AddToList。這會使得你的程式可讀性更強，特別是當你在這個類的其他方法中這個事件處理程式時，而且這會幫助程式設計師為類似的事件或是不同的元件選用相同的方法。
規則四：使用窗體方法（Use FoMethods）
  窗體都是一些類，因此窗體的程式碼是以方法組織的。你可以向窗體中新增事件處理程式，這些處理程式完成一些特別的功能，而且他們能被其他方法呼叫。除了事件處理方法外，你還可以向窗體新增完成動作的特別定義的方法以及訪問窗體狀態的方法。在窗體中新增一些公共的（Public）方法供其他窗體呼叫要比其他窗體直接操作他的元件要好。
 
規則5：新增窗體構造器（Add Form Constructors）
  在執行時建立的第二個窗體除了一個預設的構造器（從Tcomponent 類繼承而來）外還會提供其他特殊的構造器。
我建議你過載（Overload）Create方法，新增必要的初始化引數。具體程式碼可參見下面的程式碼:

Public
  Constructor Create(Text:string): reintroduce ; overload;
Constructor TformDialog.Create(Text:string);
Begin
  Inherited Create(Application);
  Edit1.Text:=Text;
End;

規則6：避免全域性變數（Avoid Global Variables）
  應該避免使用全域性變數（就是那些在單元的interface 部分定義的變數）。下面將會有一些建議幫助你如何去做。
  如果你需要為窗體額外的資料，你可以向窗體類中新增一些私有資料。這種情況下，每一個窗體例項都會有自己的資料副本。你可以使用單元變數（在單元的implementation部分定義的變數）宣告那些供窗體類的多個例項共享的資料。
如果你需要在不同型別的窗體之間共享資料，你可以把他們定義在主窗體裡來實現共享，或者使用一個全域性變數，使用方法或者是屬性來獲得資料。

規則7：永遠不要在Tform1類中使用Form1
你應該避免在類的方法中使用一個特定的名稱，換句話說，你不應該在TForm1類的方法中直接使用Form1.如果你確實需要使用當前的物件，你可以使用Self關鍵字。
規則11：顯示元件屬性（Expose Components Properties）
  當你需要訪問其他窗體的狀態時，你不應該直接訪問它的元件。因為這樣會將其他窗體或其它類的程式碼和介面結合在一起，而使用者介面往往是一個應用程式中最容易發生改變的部分。最好的方法是，為你需要訪問的元件屬性定義一個窗體屬性。要實現這一點，可以透過讀取元件狀態的Get方法和設定元件狀態的Set方法實現。
假如你現在需要改變使用者介面，用另外一個元件替換現有的元件，那麼你只需做的是修改與這個元件屬性相關的Get方法和Set方法，而不必查詢，修改所有引用這個元件的窗體和類的原始碼。詳細實現方法請參見下面的程式碼：

private
  function GetText:String;
  procedure SetText(const Value:String);
public
  property Text:String;
  read GetText write SetText;
 function TformDialog.GetText:String;
 begin
  Result:=Edit1.Text;
 end;
 procedure TformDialog.SetText(const Value:String);
 begin
  Edit1.Text;=Value;
 end;
 

規則16：視覺化窗體繼承（Visual Form Inheritance）
  如果應用得當，這將是一個強大的工具。根據我的，你所開發的專案越大，越能體現它的價值。在一個複雜的程式中，你可以使用窗體的不同等級關係來處理一組相關窗體的多型性（polymorphism）。
  視覺化窗體繼承允許你共享多個窗體的一些公共的動作：你可以使用共享的方法，公用的屬性，甚至是事件處理程式，元件，元件屬性，元件事件處理方法等等。
更多請見：/">