Delphi中的容器類(15)

保存一下文件，使用VIEw As Text右鍵菜單命令察看一下DFM文件，我們會看到我們設計的車廂類的屬性確實都被寫到了DFM文件中，並且Carriages屬性的父親就是Train1：

object Train1: TTrain
　　Carriages = <
　　　item
　　　　CarriageNum = 1
　　　　SeatCount = 100
　　　　CarriageType = ctHard
　　　　ServerName = '陳省'
　　　end
　　　item
　　　　CarriageNum = 2
　　　　SeatCount = 200
　　　　CarriageType = ctHard
　　　　ServerName = 'hubdog'
　　　end>
　　Left = 16
　　Top = 8
　End

TOwnedCollection

從Delphi4開始，VCL增加了一個TOwnedCollection類，它是TCollection類的子類，如果我們的TCarriageCollection類是從TOwnedCollection類繼承的，這時我們就不再需要向上面重載GetOwner方法並返回父控件給IDE，以便TCarriageCollection屬性能出現在Object Inspector中了。

總結

本章中我介紹了幾乎所有VCL中重要的容器類，其中TList及其子類相當於通用的容器類，雖然不如C++和Java功能那麼強大，但是用好了已經足以滿足我們90%的開發需要，而TStrings及其子類，還有TCollection則是實現所見即所得設計的關鍵類，對於開發靈活強大的自定義組件來說是必不可少的。