儲存框

儲存框也是典型的視窗視覺化元件，同編輯框類似，可以輸入、顯示文字，但是和編輯框不同的是，編輯框只能編輯、顯示單行文字，而儲存框則可以對多行文字進行操作。儲存框的類定義如下：< xmlnamespace prefix ="o" ns ="urn:schemas-microsoft-com:office:office" />

TMemo = class(TCustomMemo)

property Lines: TStrings; read write;

property Alignment: TAlignment; read write;

property BorderStyle: TBorderStyle; read write;

property Color: TColor; read write;

property Font: TFont; read write;

property HideSelection: Boolean; read write;

property MaxLength: Integer; read write;

property ReadOnly: Boolean; read write;

property ScrollBars: TScrollStyle; read write;

property WantReturns: Boolean; read write;

property WantTabs: Boolean; read write;

property WordWrap: Boolean; read write;

property OnChange: TNotifyEvent; read write;

property OnClick: TNotifyEvent; read write;

property OnDblClick: TNotifyEvent; read write;

property OnKeyDown: TKeyEvent; read write;

property OnKeyPress: TKeyPressEvent; read write;

property OnKeyUp: TKeyEvent; read write;

end;

層次結構模型如下：

儲存框同編輯框一樣，都是繼承自TcustomEdit類，但是在Tmemo上還有一個TcustomMemo類，該類添加了一個屬性：Lines，即多行文字的操作。

下面的程式碼將演示編輯框的建立和屬性。

執行效果如下：

下面說說儲存框的屬性。

由於儲存框和編輯框許多屬性都相同，這裡就不再贅述了，主要說說編輯框的幾個特殊屬性。ScrollBar指明瞭儲存框的滾動條狀態，可選值有ssBoth、ssHorizonal、ssNone、ssVertical，其含義如值所描述。WantReturns屬性決定按Enter鍵之後是點選確認按鈕（對應屬性值為False）還是儲存框換行（對應屬性值為True），如果設定該值為False而又想在編輯框中換行時，必須按Ctrl+Enter鍵，這和QQ的傳送訊息框是一樣的。WantTabs屬性決定按下Tab鍵是切換視窗中元件的焦點（對應屬性值為False）還是在儲存框中移動游標（對應屬性值為True），如果設定該值為False而又想在編輯框中移動游標時，必須按Ctrl+Tab鍵。最後的一個屬性是WordWarp，該屬性決定儲存框文字輸入時是否自動換行，屬性值為True則自動換行，為False則不能自動換行。注意如果設定了ScrollBars屬性為ssBoth或者ssHorizonal，將不會自動換行，因為滾動條會自動調節寬度。

另外就是Lines屬性。該屬性其實本身也是一個類，屬於Tstring，該屬性主要用於操作儲存框中的一行文字，可用的函式有Add、Clear、Delete、Insert、Count等。