?? 012.htm
字號(hào):
<HTML><HEAD><meta http-equiv="Content-Type" content="text/html; charset=GB2312"><TITLE>-->DELPHI基礎(chǔ)教程-->第四章 文本編輯器的設(shè)計(jì)（一）</TITLE>
<META NAME="keywords" CONTENT=" DELPHI基礎(chǔ)教程 第四章 文本編輯器的設(shè)計(jì)（一）">
<META NAME="description" CONTENT=" - DELPHI基礎(chǔ)教程 - 第四章 文本編輯器的設(shè)計(jì)（一）">
<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 bgcolor="#FFFFFF" leftmargin="3" topmargin="3" marginheight="3" marginwidth="3">
<TABLE WIDTH="100%" CELLPADDING=10 CELLSPACING=0 BORDER=0>
<TR>
<TD CLASS="tt3" VALIGN="top" width="8%" bgcolor="#e0e0e0"><strong><A HREF="013.htm"><FONT style="FONT-SIZE: 9pt">后一頁(yè)</font></A><BR>
<A HREF="011.htm"><FONT style="FONT-SIZE: 9pt">前一頁(yè)</font></A><BR>
<A HREF="index.html"><FONT style="FONT-SIZE: 9pt">回目錄</font></A><BR>
<A HREF="../../../../index.htm"><FONT style="FONT-SIZE: 9pt">回首頁(yè)</font></A><BR>
</strong>
</TD>
<TD class="tt2" bgcolor="#F5F8F8" width="84%"><center><B><FONT style="FONT-SIZE: 16.5pt" COLOR="#FF6666" FACE="楷體_GB2312">第四章 文本編輯器的設(shè)計(jì)（一）</FONT></B></center>
<hr color="#EE9B73" size="1" width="94%">
<p> 本章介紹多文本界面</font>(MDI)<font face="宋體" lang="ZH-CN">、多頁(yè)面界面</font>(MPI)<font
face="宋體" lang="ZH-CN">技術(shù)；</font>VCL<font face="宋體" lang="ZH-CN">庫(kù)中</font>TMemo<font
face="宋體" lang="ZH-CN">，</font>TEdit <font face="宋體" lang="ZH-CN">控件以及有關(guān)文本編輯的常用對(duì)話框的使用。我們開(kāi)發(fā)的</font>MPIEdit.dpr<font
face="宋體" lang="ZH-CN">是一個(gè)文本編輯的實(shí)用程序，可實(shí)現(xiàn)如下功能：</p>
<p> ●</font> MDI<font face="宋體" lang="ZH-CN">的編輯環(huán)境</p>
<p> ●</font> MPI<font face="宋體" lang="ZH-CN">的編輯環(huán)境</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創(chuàng)建打開(kāi)、編輯、保存文件</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">查找、替換文件中指定的字符串</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">復(fù)制、粘貼、剪切字符串</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">設(shè)置文件字體大小</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">打印文件 </p>
<p> 本章將通過(guò)</font>MPIEdit<font face="宋體" lang="ZH-CN">實(shí)用程序逐一介紹在</font>Delphi<font
face="宋體" lang="ZH-CN">中如何實(shí)現(xiàn)上述功能。</p>
<p> 文本編輯器是一種常用的應(yīng)用程序。用戶在編輯器中編輯多種文件，在多個(gè)文件之間進(jìn)行數(shù)據(jù)交換，對(duì)文件進(jìn)行各種屬性設(shè)置，并按自己要求打印文件。 </p>
</font><p>4.1 <font face="宋體" lang="ZH-CN">多文本界面 </p>
<p> 多文本界面是一種在一個(gè)應(yīng)用程序中同時(shí)打開(kāi)兩個(gè)或更多文件的界面形式。例如在字處理程序可同時(shí)打開(kāi)多個(gè)文件，用戶可在多個(gè)文件中方便地進(jìn)行切換.</font></p>
<p>MDI<font face="宋體" lang="ZH-CN">應(yīng)用程序提供了一種方便的方式，使得用戶在同一工作區(qū)域內(nèi)對(duì)多個(gè)文檔進(jìn)行觀察和交換數(shù)據(jù)。</font>MDI<font
face="宋體" lang="ZH-CN">工作區(qū)域可分為父窗體和子窗體，在</font>Dephi<font
face="宋體" lang="ZH-CN">的</font>MDI<font face="宋體" lang="ZH-CN">應(yīng)用程序中，父窗體通常是程序的主窗體。</p>
<p> 在</font>MDI<font face="宋體" lang="ZH-CN">中，父窗體之外的窗體稱為子窗體，文檔或其它數(shù)據(jù)在子窗體打開(kāi)。這些文檔可以是相同的文件格式，或在應(yīng)用程序支持下也可以是不同的文件格式。</p>
<p> 在設(shè)計(jì)階段，可創(chuàng)建</font> MDI <font face="宋體" lang="ZH-CN">父窗體作為應(yīng)用程序主窗體，</font>
<font face="宋體" lang="ZH-CN">亦可創(chuàng)建子窗體樣板。</font>Delphi<font
face="宋體" lang="ZH-CN">允許創(chuàng)建多個(gè)子窗體類型，但</font>MDI<font
face="宋體" lang="ZH-CN">應(yīng)用程序只支持其中的一種。</p>
<p> 本節(jié)講述創(chuàng)建</font>MDI<font face="宋體" lang="ZH-CN">應(yīng)用程序的基本步驟：</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創(chuàng)建主窗口</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創(chuàng)建子窗口</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">創(chuàng)建主窗口菜單</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">融合菜單</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">運(yùn)行時(shí)創(chuàng)建子窗口 </p>
</font><p>4.1.1 <font face="宋體" lang="ZH-CN">創(chuàng)建父窗口 </p>
<p> 在</font>MDI<font face="宋體" lang="ZH-CN">應(yīng)用程序中，主窗口為應(yīng)用文檔提供一個(gè)工作區(qū)域。這個(gè)區(qū)域可打開(kāi)一個(gè)或多個(gè)子窗口，創(chuàng)建父窗口是建立</font>MDI<font
face="宋體" lang="ZH-CN">應(yīng)用程序的第一步。</p>
<p> 創(chuàng)建父窗口與其它窗口類似，不同之處在于設(shè)置窗體的</font>FormStyle<font
face="宋體" lang="ZH-CN">屬性。</p>
<p> </font>FormStyle<font face="宋體" lang="ZH-CN">屬性可決定一個(gè)窗體是父窗口還是子窗口，或不是</font>MDI<font
face="宋體" lang="ZH-CN">類型。</font> <font face="宋體" lang="ZH-CN">只能在設(shè)計(jì)階段確定</font>FormStyle<font
face="宋體" lang="ZH-CN">。在</font>Object Inspector<font face="宋體" lang="ZH-CN">窗口中將</font>FormStyle<font
face="宋體" lang="ZH-CN">屬性設(shè)置成</font>fsMDIForm<font face="宋體" lang="ZH-CN">。值得注意的是應(yīng)當(dāng)把父窗口定義為應(yīng)用程序的主窗體，否則程序編譯會(huì)出錯(cuò)。 </p>
</font><p>4.1.2 <font face="宋體" lang="ZH-CN">創(chuàng)建子窗口 </p>
<p> 設(shè)計(jì)階段可創(chuàng)建子窗口的樣板，用戶在運(yùn)行進(jìn)使用樣板的實(shí)例。子窗口是缺省可見(jiàn)的，如果應(yīng)用程序在運(yùn)行進(jìn)創(chuàng)建子窗口，不要讓</font>Delphi<font
face="宋體" lang="ZH-CN">自動(dòng)地創(chuàng)建。</p>
<p> 創(chuàng)建子窗口時(shí)將窗體的</font>FormStyle<font face="宋體" lang="ZH-CN">屬性設(shè)置為</font>fsMDIChild<font
face="宋體" lang="ZH-CN">。如果程序在運(yùn)行時(shí)創(chuàng)建子窗口，則</p>
<p> </font>1. <font face="宋體" lang="ZH-CN">選擇</font>OPtions|Project<font
face="宋體" lang="ZH-CN">菜單，系統(tǒng)彈出自動(dòng)創(chuàng)建列表對(duì)話框；</p>
<p> </font>2. <font face="宋體" lang="ZH-CN">在自動(dòng)創(chuàng)建列表中選中子窗口；</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">創(chuàng)建應(yīng)用程序菜單與菜單融合 </p>
<p> 父窗口的菜單應(yīng)作為應(yīng)用程序主菜單。如果子窗口有菜單，</font>
<font face="宋體" lang="ZH-CN">則當(dāng)子窗口在運(yùn)行獲得焦點(diǎn)并最大化時(shí)，子窗口的菜單項(xiàng)將融合父窗口菜單。</font></p>
<font face="宋體" lang="ZH-CN"><p> 創(chuàng)建父窗口與子窗口菜單的方法與創(chuàng)建普通窗體菜單類似，</font>
<font face="宋體" lang="ZH-CN">詳細(xì)步驟見(jiàn)第一章。菜單融合是指程序運(yùn)行過(guò)程中，子菜單與父窗口菜單的相互作用。</font>
<font face="宋體" lang="ZH-CN">如當(dāng)子窗口獲得焦點(diǎn)時(shí)，子窗口的菜單或插入主窗口的菜單中，或?qū)⑻鎿Q部分或全部的父窗口菜單。</p>
<p> 進(jìn)行菜單融合需設(shè)置的兩個(gè)屬性：</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">窗體的</font>Menu<font
face="宋體" lang="ZH-CN">屬性</p>
<p> ●</font> <font face="宋體" lang="ZH-CN">菜單項(xiàng)的</font>GroupIndex<font
face="宋體" lang="ZH-CN">屬性</p>
</font><p><font face="宋體" lang="ZH-CN"> Menu屬性定義窗體的活動(dòng)菜單，而菜單融合只對(duì)活動(dòng)菜單進(jìn)行。
如果窗體有多個(gè)菜單部件，運(yùn)行時(shí)可通過(guò)以下代碼進(jìn)行改變： </p>
<p> Form1.Menu := SecondMenu; </p>
</font><p><font face="宋體" lang="ZH-CN">
GroupIndex屬性決定出現(xiàn)在菜單條中各菜單項(xiàng)的位置，在菜單融合中，GroupIndex
將</p>
<p>決定融合菜單是插入還是替換主窗體菜單條中的菜單。</p>
<p> GroupIndex的缺省值是0，可以用下規(guī)則確定其值：</p>
<p> 1. 數(shù)值越小，菜單的位置越靠左。</p>
<p> 例如：GroupIndex為0的菜單將出現(xiàn)在菜單條中的最左端。隨著GroupIndex數(shù)值的增大，菜單項(xiàng)依次向右排列。</p>
<p> 2. 若需替換主菜單中的某一菜單項(xiàng)，則將子菜單相應(yīng)菜單項(xiàng)的GroupIndex設(shè)為與之相等的值。這條規(guī)則適合一個(gè)或多個(gè)菜單項(xiàng)。例如，主菜單中的"Edit"菜單項(xiàng)的GroupIndex
的值為1。將子菜單的一個(gè)或多個(gè)菜單項(xiàng)的GroupIndext的值設(shè)為1，則在運(yùn)行時(shí)，這些菜單項(xiàng)替換主窗口的"Edit"菜單。</p>
<p> 將同一窗體的多個(gè)菜單項(xiàng)的GroupIndex設(shè)為相同值，
原有的排列順序在菜單融合時(shí)將保持</p>
<p>不變。</p>
<p> 3. 若要在菜單融合時(shí)插入菜單項(xiàng)，需在主菜單中預(yù)留數(shù)值“位置”。例如，主菜單的兩菜單項(xiàng)數(shù)值為0,5，則子菜單GroupIndex數(shù)值為1,2,3,4的菜單在融合時(shí)將插入其中。</p>
<p> 在使用MDI界面時(shí)，用戶通常會(huì)打開(kāi)多個(gè)窗體。為了使用戶方便地進(jìn)行窗體切換，常設(shè)有一個(gè)進(jìn)行切換的菜單項(xiàng).此菜單列出了打開(kāi)窗體的名稱，當(dāng)用戶選擇其中的一個(gè)時(shí)，程序進(jìn)行相應(yīng)的窗體切換。在</font>Delphi<font
face="宋體" lang="ZH-CN">的</font>MDI<font face="宋體" lang="ZH-CN">設(shè)計(jì)時(shí)，可非常方便地實(shí)現(xiàn)這一功能。方法是將父窗口的</font>WindowMenu<font
face="宋體" lang="ZH-CN">設(shè)置成該菜單項(xiàng)的名字即可。</font></p>
<p>4.2 <font face="宋體" lang="ZH-CN">多頁(yè)面界面 </p>
<p> 多頁(yè)面界面是一種非常友好的界面形式。它由一個(gè)窗體和多個(gè)頁(yè)面組成，</font>
<font face="宋體" lang="ZH-CN">關(guān)于每個(gè)頁(yè)面的信息列在窗體底部的標(biāo)簽</font>(Tabs)<font
face="宋體" lang="ZH-CN">上，用戶可通過(guò)選擇標(biāo)簽來(lái)進(jìn)行頁(yè)面切換。</font>
<font face="宋體" lang="ZH-CN">每次只有一個(gè)頁(yè)面顯示在窗體中。</font>MPI<font
face="宋體" lang="ZH-CN">較</font>MDI<font face="宋體" lang="ZH-CN">使用更為方便，且切換速度更快。本章例程就是多頁(yè)面界面的例子。另外</font>Delphi<font
face="宋體" lang="ZH-CN">集成開(kāi)發(fā)環(huán)境中的代碼編輯</font>(Code Editor)<font
face="宋體" lang="ZH-CN">窗體是</font>MPI<font face="宋體" lang="ZH-CN">應(yīng)用在文本編輯中的實(shí)例。在</font>MPI<font
face="宋體" lang="ZH-CN">中，一個(gè)窗體內(nèi)的多個(gè)文件可以方便地進(jìn)行切換和交換數(shù)據(jù)。</font></p>
<p> 多頁(yè)面界面分為靜態(tài)MPI<font face="宋體"
lang="ZH-CN">和動(dòng)態(tài)</font>MPI<font face="宋體" lang="ZH-CN">兩種形式。靜態(tài)</font>MPI<font
face="宋體" lang="ZH-CN">的標(biāo)簽數(shù)量固定，用戶在事先設(shè)計(jì)好的多個(gè)頁(yè)面上進(jìn)行切換。象選擇對(duì)話框</font>(Option
Dialog)<font face="宋體" lang="ZH-CN">就屬于靜</font>MPI<font face="宋體"
lang="ZH-CN">。動(dòng)態(tài)</font>MPI<font face="宋體" lang="ZH-CN">的標(biāo)簽數(shù)量不固定，由程序根據(jù)需要?jiǎng)討B(tài)的產(chǎn)生或消除，象代碼編輯窗體就是動(dòng)態(tài)</font>MPI<font
face="宋體" lang="ZH-CN">，程序可根據(jù)用戶的需要產(chǎn)生多個(gè)文本頁(yè)面，也可以動(dòng)態(tài)地關(guān)閉頁(yè)面。利用</font>Delphi<font
face="宋體" lang="ZH-CN">的</font>TNotebook<font face="宋體" lang="ZH-CN">和</font>Ttabset
<font face="宋體" lang="ZH-CN">可十分方便地設(shè)計(jì)靜態(tài)</font>MPI<font
face="宋體" lang="ZH-CN">。設(shè)計(jì)動(dòng)態(tài)</font>MPI<font face="宋體" lang="ZH-CN">則需要編寫(xiě)專門的代碼。</font></p>
<p>4.2.1 <font face="宋體" lang="ZH-CN">靜態(tài)多頁(yè)面界面 </p>
<p> </font>TNotebook,TTabSet<font face="宋體" lang="ZH-CN">可用來(lái)開(kāi)發(fā)靜態(tài)多頁(yè)面界面。</font>TNotebook<font
face="宋體" lang="ZH-CN">部件能顯示多頁(yè)，</font> <font face="宋體"
lang="ZH-CN">每頁(yè)都有相應(yīng)的控制。通常</font>TNotebook<font face="宋體"
lang="ZH-CN">與</font>TTabset<font face="宋體" lang="ZH-CN">配合進(jìn)行控制。</font>TTabset
<font face="宋體" lang="ZH-CN">有一組水平的標(biāo)簽</font>,<font face="宋體"
lang="ZH-CN">每個(gè)標(biāo)簽可通過(guò)創(chuàng)建字符串列表進(jìn)行某種控制。</p>
<p> </font>MPIEDit<font face="宋體" lang="ZH-CN">例程中的主窗體中有一個(gè)</font>TNotebook
<font face="宋體" lang="ZH-CN">部件和</font> TTabSet <font face="宋體" lang="ZH-CN">部件。</font>
<font face="宋體" lang="ZH-CN">把兩個(gè)部件的</font>Aglin<font face="宋體"
lang="ZH-CN">屬性設(shè)置成</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">事件中定義下如下代碼，可使用戶在選擇標(biāo)簽時(shí)開(kāi)打相應(yīng)的頁(yè)。 </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>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -