?? 012.htm
字號:
<HTML><HEAD><meta http-equiv="Content-Type" content="text/html; charset=GB2312"><TITLE>-->DELPHI基礎教程-->第四章 文本編輯器的設計（一）</TITLE>
<META NAME="keywords" CONTENT=" DELPHI基礎教程 第四章 文本編輯器的設計（一）">
<META NAME="description" CONTENT=" - DELPHI基礎教程 - 第四章 文本編輯器的設計（一）">
<style>
<!--
#page {position:absolute; z-index:0; left:0px; top:0px}
.tt3 {font: 9pt/12pt "宋體"}
.tt2 {font: 12pt/15pt "宋體"}
a {text-decoration:none}
a:hover {color: blue;text-decoration:underline}
-->
</style>
</HEAD>
<body text="#000000" aLink=#9900ff link=#006699 vLink=#006699 background="bg.gif" leftmargin="3" topmargin="3" marginheight="3" marginwidth="3">
<TR>
<TD CLASS="tt3" VALIGN="top" width="8%" background="bg.gif"><strong><A HREF="013.htm" ><FONT style="FONT-SIZE: 9pt">后一頁</font></A><BR>
<A HREF="011.htm" ><FONT style="FONT-SIZE: 9pt">前一頁</font></A><BR>
<A HREF="index.html" ><FONT style="FONT-SIZE: 9pt">回目錄</font></A><BR>
<A HREF="../../../../../index.htm"><FONT style="FONT-SIZE: 9pt">回首頁</font></A><BR>
</strong>
</TD>
<TD class="tt2" background="bg.gif" width="84%"><center><B><FONT style="FONT-SIZE: 16.5pt" COLOR="#FF6666" FACE="楷體_GB2312">第四章 文本編輯器的設計（一）</FONT></B></center>
<hr color="#EE9B73" size="1" width="94%">
<p> 本章介紹多文本界面</font>(MDI)<font face="宋體" lang="ZH-CN">、多頁面界面</font>(MPI)<font
face="宋體" lang="ZH-CN">技術；</font>VCL<font face="宋體" lang="ZH-CN">庫中</font>TMemo<font
face="宋體" lang="ZH-CN">，</font>TEdit <font face="宋體" lang="ZH-CN">控件以及有關文本編輯的常用對話框的使用。我們開發的</font>MPIEdit.dpr<font
face="宋體" lang="ZH-CN">是一個文本編輯的實用程序，可實現如下功能：</p>
<p> ●</font> MDI<font face="宋體" lang="ZH-CN">的編輯環境</p>
<p> ●</font> MPI<font face="宋體" lang="ZH-CN">的編輯環境</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創建打開、編輯、保存文件</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">查找、替換文件中指定的字符串</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">復制、粘貼、剪切字符串</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">設置文件字體大小</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">打印文件 </p>
<p> 本章將通過</font>MPIEdit<font face="宋體" lang="ZH-CN">實用程序逐一介紹在</font>Delphi<font
face="宋體" lang="ZH-CN">中如何實現上述功能。</p>
<p> 文本編輯器是一種常用的應用程序。用戶在編輯器中編輯多種文件，在多個文件之間進行數據交換，對文件進行各種屬性設置，并按自己要求打印文件?！?lt;/p>
</font><p>4.1 <font face="宋體" lang="ZH-CN">多文本界面 </p>
<p> 多文本界面是一種在一個應用程序中同時打開兩個或更多文件的界面形式。例如在字處理程序可同時打開多個文件，用戶可在多個文件中方便地進行切換.</font></p>
<p>MDI<font face="宋體" lang="ZH-CN">應用程序提供了一種方便的方式，使得用戶在同一工作區域內對多個文檔進行觀察和交換數據。</font>MDI<font
face="宋體" lang="ZH-CN">工作區域可分為父窗體和子窗體，在</font>Dephi<font
face="宋體" lang="ZH-CN">的</font>MDI<font face="宋體" lang="ZH-CN">應用程序中，父窗體通常是程序的主窗體。</p>
<p> 在</font>MDI<font face="宋體" lang="ZH-CN">中，父窗體之外的窗體稱為子窗體，文檔或其它數據在子窗體打開。這些文檔可以是相同的文件格式，或在應用程序支持下也可以是不同的文件格式。</p>
<p> 在設計階段，可創建</font> MDI <font face="宋體" lang="ZH-CN">父窗體作為應用程序主窗體，</font>
<font face="宋體" lang="ZH-CN">亦可創建子窗體樣板。</font>Delphi<font
face="宋體" lang="ZH-CN">允許創建多個子窗體類型，但</font>MDI<font
face="宋體" lang="ZH-CN">應用程序只支持其中的一種。</p>
<p> 本節講述創建</font>MDI<font face="宋體" lang="ZH-CN">應用程序的基本步驟：</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創建主窗口</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創建子窗口</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創建主窗口菜單</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">融合菜單</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">運行時創建子窗口 </p>
</font><p>4.1.1 <font face="宋體" lang="ZH-CN">創建父窗口 </p>
<p> 在</font>MDI<font face="宋體" lang="ZH-CN">應用程序中，主窗口為應用文檔提供一個工作區域。這個區域可打開一個或多個子窗口，創建父窗口是建立</font>MDI<font
face="宋體" lang="ZH-CN">應用程序的第一步。</p>
<p> 創建父窗口與其它窗口類似，不同之處在于設置窗體的</font>FormStyle<font
face="宋體" lang="ZH-CN">屬性。</p>
<p> </font>FormStyle<font face="宋體" lang="ZH-CN">屬性可決定一個窗體是父窗口還是子窗口，或不是</font>MDI<font
face="宋體" lang="ZH-CN">類型。</font> <font face="宋體" lang="ZH-CN">只能在設計階段確定</font>FormStyle<font
face="宋體" lang="ZH-CN">。在</font>Object Inspector<font face="宋體" lang="ZH-CN">窗口中將</font>FormStyle<font
face="宋體" lang="ZH-CN">屬性設置成</font>fsMDIForm<font face="宋體" lang="ZH-CN">。值得注意的是應當把父窗口定義為應用程序的主窗體，否則程序編譯會出錯。 </p>
</font><p>4.1.2 <font face="宋體" lang="ZH-CN">創建子窗口 </p>
<p> 設計階段可創建子窗口的樣板，用戶在運行進使用樣板的實例。子窗口是缺省可見的，如果應用程序在運行進創建子窗口，不要讓</font>Delphi<font
face="宋體" lang="ZH-CN">自動地創建。</p>
<p> 創建子窗口時將窗體的</font>FormStyle<font face="宋體" lang="ZH-CN">屬性設置為</font>fsMDIChild<font
face="宋體" lang="ZH-CN">。如果程序在運行時創建子窗口，則</p>
<p> </font>1. <font face="宋體" lang="ZH-CN">選擇</font>OPtions|Project<font
face="宋體" lang="ZH-CN">菜單，系統彈出自動創建列表對話框；</p>
<p> </font>2. <font face="宋體" lang="ZH-CN">在自動創建列表中選中子窗口；</p>
<p> </font>3. <font face="宋體" lang="ZH-CN">單擊</font>><font face="宋體"
lang="ZH-CN">按鈕將子窗口移至可得到</font>(Available)<font face="宋體"
lang="ZH-CN">窗體列表；</p>
<p> </font>4. <font face="宋體" lang="ZH-CN">并單擊</font>OK<font face="宋體"
lang="ZH-CN">按鈕退出。</p>
</font><p>4.1.3 <font face="宋體" lang="ZH-CN">創建應用程序菜單與菜單融合 </p>
<p> 父窗口的菜單應作為應用程序主菜單。如果子窗口有菜單，</font>
<font face="宋體" lang="ZH-CN">則當子窗口在運行獲得焦點并最大化時，子窗口的菜單項將融合父窗口菜單。</font></p>
<font face="宋體" lang="ZH-CN"><p> 創建父窗口與子窗口菜單的方法與創建普通窗體菜單類似，</font>
<font face="宋體" lang="ZH-CN">詳細步驟見第一章。菜單融合是指程序運行過程中，子菜單與父窗口菜單的相互作用。</font>
<font face="宋體" lang="ZH-CN">如當子窗口獲得焦點時，子窗口的菜單或插入主窗口的菜單中，或將替換部分或全部的父窗口菜單。</p>
<p> 進行菜單融合需設置的兩個屬性：</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">窗體的</font>Menu<font
face="宋體" lang="ZH-CN">屬性</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">菜單項的</font>GroupIndex<font
face="宋體" lang="ZH-CN">屬性</p>
</font><p><font face="宋體" lang="ZH-CN"> Menu屬性定義窗體的活動菜單，而菜單融合只對活動菜單進行。
如果窗體有多個菜單部件，運行時可通過以下代碼進行改變： </p>
<p> Form1.Menu := SecondMenu; </p>
</font><p><font face="宋體" lang="ZH-CN">
GroupIndex屬性決定出現在菜單條中各菜單項的位置，在菜單融合中，GroupIndex
將</p>
<p>決定融合菜單是插入還是替換主窗體菜單條中的菜單。</p>
<p> GroupIndex的缺省值是0，可以用下規則確定其值：</p>
<p> 1. 數值越小，菜單的位置越靠左。</p>
<p> 例如：GroupIndex為0的菜單將出現在菜單條中的最左端。隨著GroupIndex數值的增大，菜單項依次向右排列。</p>
<p> 2. 若需替換主菜單中的某一菜單項，則將子菜單相應菜單項的GroupIndex設為與之相等的值。這條規則適合一個或多個菜單項。例如，主菜單中的"Edit"菜單項的GroupIndex
的值為1。將子菜單的一個或多個菜單項的GroupIndext的值設為1，則在運行時，這些菜單項替換主窗口的"Edit"菜單。</p>
<p> 將同一窗體的多個菜單項的GroupIndex設為相同值，
原有的排列順序在菜單融合時將保持</p>
<p>不變。</p>
<p> 3. 若要在菜單融合時插入菜單項，需在主菜單中預留數值“位置”。例如，主菜單的兩菜單項數值為0,5，則子菜單GroupIndex數值為1,2,3,4的菜單在融合時將插入其中。</p>
<p> 在使用MDI界面時，用戶通常會打開多個窗體。為了使用戶方便地進行窗體切換，常設有一個進行切換的菜單項.此菜單列出了打開窗體的名稱，當用戶選擇其中的一個時，程序進行相應的窗體切換。在</font>Delphi<font
face="宋體" lang="ZH-CN">的</font>MDI<font face="宋體" lang="ZH-CN">設計時，可非常方便地實現這一功能。方法是將父窗口的</font>WindowMenu<font
face="宋體" lang="ZH-CN">設置成該菜單項的名字即可。</font></p>
<p>4.2 <font face="宋體" lang="ZH-CN">多頁面界面 </p>
<p> 多頁面界面是一種非常友好的界面形式。它由一個窗體和多個頁面組成，</font>
<font face="宋體" lang="ZH-CN">關于每個頁面的信息列在窗體底部的標簽</font>(Tabs)<font
face="宋體" lang="ZH-CN">上，用戶可通過選擇標簽來進行頁面切換。</font>
<font face="宋體" lang="ZH-CN">每次只有一個頁面顯示在窗體中。</font>MPI<font
face="宋體" lang="ZH-CN">較</font>MDI<font face="宋體" lang="ZH-CN">使用更為方便，且切換速度更快。本章例程就是多頁面界面的例子。另外</font>Delphi<font
face="宋體" lang="ZH-CN">集成開發環境中的代碼編輯</font>(Code Editor)<font
face="宋體" lang="ZH-CN">窗體是</font>MPI<font face="宋體" lang="ZH-CN">應用在文本編輯中的實例。在</font>MPI<font
face="宋體" lang="ZH-CN">中，一個窗體內的多個文件可以方便地進行切換和交換數據。</font></p>
<p> 多頁面界面分為靜態MPI<font face="宋體"
lang="ZH-CN">和動態</font>MPI<font face="宋體" lang="ZH-CN">兩種形式。靜態</font>MPI<font
face="宋體" lang="ZH-CN">的標簽數量固定，用戶在事先設計好的多個頁面上進行切換。象選擇對話框</font>(Option
Dialog)<font face="宋體" lang="ZH-CN">就屬于靜</font>MPI<font face="宋體"
lang="ZH-CN">。動態</font>MPI<font face="宋體" lang="ZH-CN">的標簽數量不固定，由程序根據需要動態的產生或消除，象代碼編輯窗體就是動態</font>MPI<font
face="宋體" lang="ZH-CN">，程序可根據用戶的需要產生多個文本頁面，也可以動態地關閉頁面。利用</font>Delphi<font
face="宋體" lang="ZH-CN">的</font>TNotebook<font face="宋體" lang="ZH-CN">和</font>Ttabset
<font face="宋體" lang="ZH-CN">可十分方便地設計靜態</font>MPI<font
face="宋體" lang="ZH-CN">。設計動態</font>MPI<font face="宋體" lang="ZH-CN">則需要編寫專門的代碼。</font></p>
<p>4.2.1 <font face="宋體" lang="ZH-CN">靜態多頁面界面 </p>
<p> </font>TNotebook,TTabSet<font face="宋體" lang="ZH-CN">可用來開發靜態多頁面界面。</font>TNotebook<font
face="宋體" lang="ZH-CN">部件能顯示多頁，</font> <font face="宋體"
lang="ZH-CN">每頁都有相應的控制。通常</font>TNotebook<font face="宋體"
lang="ZH-CN">與</font>TTabset<font face="宋體" lang="ZH-CN">配合進行控制。</font>TTabset
<font face="宋體" lang="ZH-CN">有一組水平的標簽</font>,<font face="宋體"
lang="ZH-CN">每個標簽可通過創建字符串列表進行某種控制。</p>
<p> </font>MPIEDit<font face="宋體" lang="ZH-CN">例程中的主窗體中有一個</font>TNotebook
<font face="宋體" lang="ZH-CN">部件和</font> TTabSet <font face="宋體" lang="ZH-CN">部件。</font>
<font face="宋體" lang="ZH-CN">把兩個部件的</font>Aglin<font face="宋體"
lang="ZH-CN">屬性設置成</font>bsTop<font face="宋體" lang="ZH-CN">和</font>bsBotton<font
face="宋體" lang="ZH-CN">，使它們分別處在窗體的上下兩部分。為了使</font>TTabSet<font
face="宋體" lang="ZH-CN">與</font>TNotebook<font face="宋體" lang="ZH-CN">配合工作，使用下代碼： </p>
<p> </font>TabSet1.Tabs := Notebook1.Page; </p>
<p><font face="宋體" lang="ZH-CN"> 另外，在</font>TabSet<font
face="宋體" lang="ZH-CN">的</font>OnClick<font face="宋體" lang="ZH-CN">事件中定義下如下代碼，可使用戶在選擇標簽時開打相應的頁?！?lt;/p>
<p> </font>procedure TEditForm.TabSetClick(Sender : TObject);<font face="宋體"
lang="ZH-CN">…</font></p>
<font face="宋體" lang="ZH-CN"><p> </font>begin</p>
<p>Notebook1.PageIndex := TabSet1.TabIndex;</p>
<p><font face="宋體" lang="ZH-CN">…</font></p>
<p>end; </p>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -