C#文本编辑器

1、第四讲 Windows 界面程序设计简介本讲涉及的控件有：菜单、工具条、状态栏、分页控件、系统对话框（打开对话框、保存对话框、预览对话框、打印对话框、打印设置对话框、颜色对话框、字体对话框）、用户自定义对话框等。1 功能设计1.1 文件新建：新建一个编辑窗口；打开：弹出打开对话框，打开一个指定的文本文件；保存：如果当前有文件名，就保存当前编辑的文本文件，如果没有文件名，弹出保存对话框，保存当前编辑的文本文件；另存为：弹出保存对话框，将当前编辑的文本文件以指定的另一个文件名存盘；退出：结束当前编辑的文本文件，退出系统；1.2 编辑剪切：剪切选定内容，并放到剪切板；复制：复制选定内容，并放到剪切板

2、；粘贴：将剪切板的内容插入到当前位置；撤消：撤消上次操作；恢复：恢复上次操作；查找：？替换：？1.3 格式字体：弹出字体对话框，设置选定文本的字体；颜色：弹出颜色对话框，设置选定文本的颜色；左对齐：当前段文本左对齐；中对齐：当前段文本中对齐；右对齐：当前段文本右对齐；缩进：当前段文本悬挂缩进；1.4 打印预览：预览编辑器中的内容；打印：打印编辑器中的内容；设置：设置默认打印页面；2 功能实现2.1 建立项目解决方案 (ChA201 文本文件编辑器 ) ，项目名称 (Editor) ，窗体文件 (frmEditor) ；测试结果：2.2 设计窗体控件属性属性值说明FormNamefrmEdito

3、rText文本文件编辑器Font宋体，五号MenuStripNamemsEditor菜单条ToolStripMenuItemNamemnFile文件菜单Text文件ToolStripMenuItemNamemiText新建ToolStripMenuItemNamemiText打开ToolStripMenuItemNamemiText保存ToolStripMenuItemNamemiText另存为ToolStripMenuItemNamemiText退出ToolStripMenuItemNamemnEdit编辑菜单Text编辑ToolStripMenuItemNamemiEditCutText剪

4、切ToolStripMenuItemNamemiEditCopyText复制ToolStripMenuItemNamemiEditPasteText粘贴ToolStripMenuItemNamemiEditUnDoText撤消ToolStripMenuItemNamemiEditReDoText恢复ToolStripMenuItemNamemiEditFindText查找ToolStripMenuItemNamemiEditReplaceText替换ToolStripMenuItemNamemnStyle格式菜单Text格式ToolStripMenuItemNamemiStyleFontTex

5、t字体ToolStripMenuItemNamemiStyleColorText颜色ToolStripMenuItemNamemiStyleAlignLeftText左对齐ToolStripMenuItemNamemiStyleAlignCenterText中对齐ToolStripMenuItemNamemiStyleAlignRightText右对齐ToolStripMenuItemNamemiStyleIndentText缩进ToolStripMenuItemNamemnPrint打印菜单Text打印ToolStripNametsEditor工具条StatusStripNamessEdit

6、or状态条RichTextBoxNamertbEditor富格式文本编辑器DockFillOpenNamedlgOpen打开文件对话框PrintDocumentNamedocPrint打印文档控件测试：2.3 文件功能实现在 frmEditor类的开始定义一个数据成员_，用于保存当前正在编辑的文件名。publicpartialclassfrmEditor:Formprivatestring_;/编辑的当前文件名publicfrmEditor()InitializeComponent();.2.3.1退出实际上就是退出应用程序。privatevoidmi( objectsender,EventA

7、rgse)Application.Exit();2.3.2新建文件实际上就是将 rtbEditor中的内容清空，同时将当前正在编辑的文件名也设置为空。privatevoidmi( objectsender,EventArgse)rtbEditor.Text = ;_=;2.3.3打开文件设置文件打开对话框的过滤参数，即：Filter=文本文件 (*.txt)|*.txt|所有文件(*.*)|*.*，然后弹出一个打开对话框，用户指定一个文件，然后将文件的内容读入到rtbEditor中。privatevoidmi( objectsender,EventArgse)dlgOpen.Filter =

8、文本文件 (*.txt)|*.txt|富格式文件(*.rtf)|*.rtf|所有文件(*.*)|*.*;if(dlgOpen.ShowDialog() =DialogResult.OK)_ = dlgOpen.;if(Path.GetExtension(_) =.rtf)rtbEditor.Load,RichTextBoxStreamType.RichText);elsertbEditor.Load,RichTextBoxStreamType.PlainText);测试：选择菜单“文件|打开”时，弹出一个文件打开对话框，初始的路径为“我的文档”。思考题：？如何指定打开对话框默认的路径？2.3.

9、4保存文件文本编辑器类 frmEditor 有一个数据成员 _，用于保存当前正在编辑的文件名， 新建文件时，设置 _为空。选择“保存” 菜单时，如果 _为空，动态创建一个保存对话框 （默认扩展名、 默认文件夹、默认文件类型），由用户指定保存的文件名，将编辑器中的内容保存到指定的文件中，然后修改 _。privatevoidmi( objectsender,EventArgse)/ 如果文件名为空，表示是新文件，保存时需要用户指定文件名if(_ = )/ 动态创建一个文件保存对话框Save dlgSave =new Save();/ 设置保存对话框的默认参数dlgSave.InitialDirec

10、tory =c:tmp;dlgSave.Filter = 文本文件 (*.txt)|*.txt|富格式文件(*.rtf)|*.rtf|所有文件(*.*)|*.*;dlgSave.Title = 保存我的文件 ;/显示保存对话框if(dlgSave.ShowDialog() =DialogResult.OK)/表示按下 “确认 ”按钮_ = dlgSave.;/得到用户指定的文件名/如果扩展名为rtf格式，则以RTF格式保存文件，否则以普通文本格式保存文件if( Path .GetExtension(_) =.rtf)rtbEditor.Save,RichTextBoxStreamType.Ri

11、chText);elsertbEditor.Save,RichTextBoxStreamType.PlainText);/如果不是新文件，根据当前文件的格式保存当前文件elseif( Path .GetExtension(_) =.rtf)rtbEditor.Save,RichTextBoxStreamType.RichText);elsertbEditor.Save,RichTextBoxStreamType.PlainText);2.3.5另存为文件弹出一个文件保存对话框，用户指定保存的文件名，将当前的文件内容保存到用户的指定文件中，并修改当前文件名 _。（代码留给学生自己完成）测试：新建

12、一个文件，输入文件内容，保存（这时需要指定新文件名，扩展名为txt ），退出。打开一个文本文件，添加一行文本，修改部分内容，删除一些内容，保存（这时不需要指定新文件名），另存为一个新文件，扩展名为rtf ，退出。打开一个扩展名为rtf文件的文件，退出。2.4 编辑功能实现2.4.1剪切、复制、粘贴、撤消、恢复这几个功能都是RichTextBox 自身提供的，我们直接引用就可以了。以码如下：Cut为例，其代privatevoidmiEditCut_Click(objectsender,EventArgse)rtbEditor.Cut();测试：新建一个文件，输入文件内容，保存（这时需要指定新文件

13、名，扩展名为txt），退出。思考题：？可以实现查找和替换功能？2.5 格式功能实现2.5.1字体创建一个字体对话框 (dlgFont) ，弹出字体对话框，选择字体。根据是否有选择文本，若有，修改选择文本的字体，否则，修改整个文本的字体。privatevoidmiStyleFont_Click(objectsender,EventArgse)/ 创建字体对话框FontDialogdlgFont =new FontDialog();dlgFont.ShowColor =true ;dlgFont.Sho =true ;/ 设置字体对框的默认字体，/ 如果已经有选择文本，则设置为选择文本的字体和颜色

14、/ 否则设置为全文的字体和姿色if(rtbEditor.SelectionLength 0)dlgFont.Font = rtbEditor.SelectionFont;dlgFont.Color = rtbEditor.SelectionColor;elsedlgFont.Font = rtbEditor.Font;dlgFont.Color = rtbEditor.ForeColor;/ 显示字体对话框，且用户按下了 if (dlgFont.ShowDialog() =“确认 ”按钮DialogResult.OK)/ 如果有选择文件，刚修改选择文本的字体和颜色if(rtbEditor.Se

15、lectionLength 0)rtbEditor.SelectionFont = dlgFont.Font;rtbEditor.SelectionColor = dlgFont.Color;/ 否则修改整个文本的字体和颜色 elsertbEditor.Font = dlgFont.Font;rtbEditor.ForeColor = dlgFont.Color;2.5.2颜色创建一个颜色对话框 (dlgColor) ，设置颜色对话框的当前颜色（没有选定，就为编辑器的颜色，若有选定，就为选定文本的颜色），弹出颜色对话框，选择颜色。测试：首先打开一个文件，然后选择菜单“格式 | 字体”，弹出字体

16、对话框，选择一种字体，然后确认对话框，观察编辑器中的字体变化。选择菜单“格式 |颜色”，弹出颜色对话框，选择一种颜色，然后确认对话框，观察编辑器中的颜色变化。？在字体对话框中怎么没有字体的颜色？如何只改变选择部分的字体？= 答案设置字体对话框的一些属性（ShowColor, Sho ）；只改变选择部分的字体 ( SelectionFont) 和颜色 ( SelectionColor2.5.3左、中、右对齐) ；改变当前段的对齐方式，是RichEditBox自带的属性SelectionAlignment，下面的代码是实现了当前段的左对齐。privatevoidmiStyleAlignLeft_C

17、lick(objectsender,EventArgse)rtbEditor.SelectionAlignment =HorizontalAlignment.Left;2.5.4缩进改变当前段的缩进方式， 是 RichEditBox 自带的属性 SelectionHangingIndent（悬挂），SelectionIndent（左缩进）， SelectionRightIndent（右缩进），下面的代码指定了当前段的左缩进。privatevoidmiStyleIndent_Click(objectsender,EventArgse)rtbEditor.SelectionIndent = 20;

18、测试：首先打开一个文件，然后选择菜单“格式 | 左对齐”，可以设置光标所在行左对齐，还可设置中对齐、右对齐、左缩进。思考题：？如何设置首行缩进、悬挂缩进？首行缩进和悬挂缩进均采用 SelectionHangingIndent 进行设置，设置值为负值时， 设置首行缩进，设置值为正值时，设置悬挂缩进。2.6 打印功能实现无论是预览还是打印，主要还是要依赖 PrintDocument 控件来完成的，响应该控件的 PrintPage 事件，在该事件响应中真正输出每页的内容。下面几个功能的实现，有些内容是相互关系，如：要显示或打印的内容、当前显示或打印的字体、当前的打印机设置和页面设置，所以，添加四个数

19、据成员如下：/ 下面几个数据成员用于打印private StringReader _srPrint = null ; / 打印的内容 private Font _printFont; / 打印字体 PrinterSettings _printerSettings = new PrinterSettings PageSettings _pageSettings = new PageSettings ();();/打印机设置页面设置2.6.1预览创建打印预览对话框， 将当前编辑器中的文本读到一个文本流 StringReader 中，设置打印字体与文件编辑器中的字体相同，设置 PrintDocume

20、nt 控件的页面设置为用户设置的值，将 PrintDocument 控件与预览对话框关联起来，调用预览对话框，即可预览文本编辑器中的内容。2.6.2打印创建打印对话框， 将当前编辑器中的文本读到一个文本流 StringReader 中，设置打印字体与文件编辑器中的字体相同，设置 PrintDocument 控件的页面设置为用户设置的值，将 PrintDocument 控件与打印对话框关联起来，调用打印对话框，即可打印文本编辑器中的内容。2.6.3设置打印机和设置页面这两个功能是关联的，以设置页面为主，在设置页面中包含了设置打印机功能。创建页面设置对话框，设置对话框的当前打印机参数和页面参数，显

21、示对话框，用户可以修改打印机或页面的参数，确认后，即可保存当前的设置。privatevoidmiPrintPrinterSetup_Click(objectsender,EventArgs e)/ 创建页面设置对话框/ 使用用户指定的打印机设置：这里需要既设置打印机设置，还要设置页面设置 dlgPageSetup.PrinterSettings = _printerSettings;dlgPageSetup.PageSettings = _pageSettings;/ 显示页面设置对话框if(dlgPageSetup.ShowDialog() =DialogResult.OK)_printer

22、Settings = dlgPageSetup.PrinterSettings;privatevoidmiPrintPageSetup_Click(objectsender,EventArgse)/ 创建页面设置对话框PageSetupDialogdlgPageSetup =new PageSetupDialog();/使用用户指定的页面设置dlgPageSetup.PageSettings = _pageSettings;/显示页面设置对话框if(dlgPageSetup.ShowDialog() =DialogResult.OK)_pageSettings = dlgPageSetup.P

23、ageSettings;测试：首先打开一个文件，然后选择菜单“打印|预览”，可以看到预览效果，如下图。选择菜单“打印 | 打印”，会弹出选择打印机对话框，确认打印机后，即可打印当前编辑器中的内容。选择菜单“打印 | 设置打印机” ，绘弹出页面设置对话框， 其中包含选择打印机对话框，如下左图。选择菜单“打印 | 设置页面”，绘弹出页面设置对话框，但其中不包含选择打印机对话框，如上右图。思考题：？如何设置打印机？如何设置打印文档的名称？如果是富文本格式（不同段落不同文字都可能有不同的字体和大小）怎样实现打印？2.7 工具栏实现2.7.1制作图标每个按钮做一个图标文件，大小为16*16 ，参见。2.

24、7.2制作按钮在工具栏添加按钮并装入每个按钮的图象，图标命名：tsb, tsb, tsb, tsbEditCut,tsbEditCopy, tsbEditPaste控件属性属性值说明ToolStripButtonNametsb新建文件ImageimageTransparentColorOliveToolStripButtonNametsb打开文件ImageimageTransparentColorOliveToolStripButtonNametsb保存文件ImageimageTransparentColorOliveToolStripButtonNametsbEditCut剪切ImageEd

25、itCut.bmpimageTransparentColorOliveToolStripButtonNametsbEditCopy编辑ImageEditCopy.bmpimageTransparentColorOliveToolStripButtonNametsbEditPaste粘贴ImageEditPaste.bmpimageTransparentColorOlive设计完成后的效果如下图：响应每个按钮的Click消息，分别选择对应菜单项的消息响应。测试：测试六个工具条按钮的功能是否与对应菜单项的功能一致。添加每个按钮的ToolTipText ；每个按钮的响应对应相应菜单的功能。2.8 状

26、态栏实现希望象 Word等软件一样，当光标移到某个菜单项上或工具条的某个工具上时， 在状态栏显示对应菜单项或工具的功能说明。此外，还可以显示光标当前行号、列号，键盘的当前状态信息：是否按下插入键、数字锁定键、大小写转换键、滚动锁定键等。2.8.1确定信息区在状态栏添加五个 ToolStripStatusLabel，其属性设置如下表。控件属性属性值说明ToolStripStatusLabelNametsslMenuTip显示菜单项功能Text就绪SpringTrue其宽度随对话框的宽度变化而变化TextAlignMiddleLeftToolStripStatusLabelNametsslRowN

27、o显示行号Text行:TextAlignMiddleLeftToolStripStatusLabelNametsslColNo显示列号Text列:TextAlignMiddleLeftToolStripStatusLabelNametsslInsert显示插入键Text(3 个空格 )BorderSidesAllBorderStyleSunkenToolStripStatusLabelNametsslNumLock显示数字锁定键Text(3 个空格 )BorderSidesAllBorderStyleSunkenToolStripStatusLabelNametsslCapsLock显示大写锁

28、定键Text(4 个空格 )BorderSidesAllBorderStyleSunkenToolStripStatusLabelNametsslScrolLock显示滚动锁定键Text(6 个空格 )BorderSidesAllBorderStyleSunken设计完成后的效果如下图：2.8.2 显示菜单项和工具的提示信息如果要实现当鼠标移到菜单项上或工具上时，实时显示菜单项或工具的提示信息，首先要给这些菜单项和工具添加提示信息，即设置ToolTipText 属性值，各菜单项和工具的ToolTipText 属性设置如下表。控件属性属性值说明mnFileToolTipText文件管理miToo

29、lTipText建立一个新文件miToolTipText打开一个指定文件miToolTipText保存当前文件miToolTipText另存为一个指定文件miToolTipText退出系统mnEditToolTipText编辑功能miEditCutToolTipText剪切选择内容到剪切板miEditCopyToolTipText复制选择内容到剪切板miEditPasteToolTipText粘贴剪切板的内容到当前光标处miEditUndoToolTipText撤消上次操作miEditRedoToolTipText恢复上次撤消的操作.tsbToolTipText建立一个新文件tsbToolTi

30、pText打开一个指定文件tsbToolTipText保存当前文件tsbEditCutToolTipText剪切选择内容到剪切板tsbEditCopyToolTipText复制选择内容到剪切板tsbEditPasteToolTipText粘贴剪切板的内容到当前光标处测试：运行程序，当光标移到菜单项或工具上时， 可以看到该菜单项或工具的小提示，如下图。2.8.3在状态栏实时显示菜单和工具的提示信息所有要在状态栏显示菜单项小提示的菜单项，均响应MouseEnter 和 MouseLeave消息，使用同一个消息响应程序，如下代码，则可实现当鼠标移到菜单项上时，状态栏标签显示菜单项的 ToolTipT

31、ext 值，离开时，显示为空。同样，响应工具栏按钮的 MouseEnter 和 MouseLeave消息，当鼠标移到工具栏按钮上时，状态栏标签显示工具栏按钮的 ToolTipText 值，离开时，显示为空。privatevoidMenuItem_MouseEnter(objectsender,EventArgse)ToolStripMenuItemmenuItem = senderas ToolStripMenuItem;tsslMenuTip.Text = menuItem.ToolTipText;privatevoidMenuItem_MouseLeave( objectsender,Ev

32、entArgse)tsslMenuTip.Text = 就绪 ;privatevoidToolButton_MouseEnter(objectsender,EventArgse)ToolStripButtontoolButton = senderas ToolStripButton;tsslMenuTip.Text = toolButton.ToolTipText;privatevoidToolButton_MouseLeave(objectsender,EventArgse)tsslMenuTip.Text = 就绪 ;测试：运行程序，当光标移到菜单项或工具上时，可以看到该菜单项或工具的小提

33、示出现在状态栏中，如下图。2.8.4在状态栏实时显示光标的位置响应文本编辑器 rtbEditor 的 MouseDown消息，得到光标的位置，进而得到光标的行号和列号。响应文本编辑器rtbEditor的 KeyUp消息，得到光标的位置，进而得到光标的行号和列号。privatevoidrtbEditor_MouseDown(objectsender,MouseEventArgs e)/ 根据光标所在象素位置，得到字符索引号intnCharIndex = rtbEditor.GetCharIndexFromPosition(new Point (e.X, e.Y);/ 根据字符索引号，得到所在行号

34、和列号intnRowNo = rtbEditor.GetLineFromCharIndex(nCharIndex);int nFirstCharIndex = rtbEditor.GetFirstCharIndexFromLine(nRowNo); int nColNo = nCharIndex - nFirstCharIndex;/ 在状态栏上显示行号和列号tsslRowNo.Text =string.Format( 行： 0 , nRowNo + 1);tsslColNo.Text =string.Format( 列： 0 , nColNo);privatevoidrtbEditor_Ke

35、yUp(objectsender,KeyEventArgse)/ 根据光标所在位置，得到字符索引号intnCharIndex = rtbEditor.SelectionStart;/ 根据字符索引号，得到所在行号和列号intnRowNo = rtbEditor.GetLineFromCharIndex(nCharIndex);int nFirstCharIndex = rtbEditor.GetFirstCharIndexFromLine(nRowNo); int nColNo = nCharIndex - nFirstCharIndex;/ 在状态栏上显示行号和列号tsslRowNo.Tex

36、t =string.Format( 行： 0 , nRowNo + 1);tsslColNo.Text =string.Format( 列： 0 , nColNo);测试：运行程序，打开一个文档，移到光标到不同的位置，观察状态条中显示当前光标所在的位置的变化，如下图。2.8.5在状态栏实时显示键盘的状态在窗体的构造函数frmEditor()中添加如下语句：Application.Idle +=new EventHandler(Application_Idle)然后定义 Application_Idle()方法，见程序。publicfrmEditor()InitializeComponent()

37、;Application.Idle +=new EventHandler(Application_Idle);privatevoidApplication_Idle(objectsender,EventArgse)if( Control.IsKeyLocked(Keys .Insert)tsslInsert.Text =Ins;elsetsslInsert.Text =;if( Control.IsKeyLocked(Keys .NumLock)tsslNumLock.Text =Num;elsetsslNumLock.Text =;if( Control.IsKeyLocked(Keys .

38、CapsLock)tsslCapsLock.Text =Caps ;elsetsslCapsLock.Text =;if( Control.IsKeyLocked(Keys .Scroll)tsslScrollLock.Text =Scroll;elsetsslScrollLock.Text =;测试：运行程序，打开一个文档，按下插入键、数字锁定键、大写锁定键、滚动锁定键，测试状态条显示的改变，如下图。2.9文本查找和替换2.9.1添加一个新的窗体文件控件属性属性值说明FormNamefrmFindAndReplace查找与替换Text查找和替换Font宋体，五号TopMostTrue总显示在

39、最上面TabControlNametabControl1卡片控制TabPageNametabFind卡片页：查找Text查找TabPageNametabReplace卡片页：替换Text替换TextBoxNametxtFindFind查找页：查找文本CheckBoxNamecbFindWholeWord查找页：全字匹配Text全字匹配CheckBoxNamecbFindMatchCase查找页：区分大小写Text区分大小写ButtonNamebtnFindFindNext查找页：查找下一个Text查找下一个ButtonNamebtnFindCancel查找页：取消Text取消TextBoxNa

40、metxtReplaceFind替换页：查找文本TextBoxNametxtReplaceReplace替换页：替换文本CheckBoxNamecbReplaceWholeWord替换页：全字匹配Text全字匹配CheckBoxNamecbReplaceMatchCase替换页：区分大小写Text区分大小写ButtonNamebtnReplaceFindNext查找页：查找下一个Text查找下一个ButtonNamebtnReplaceReplace查找页：替换Text替换ButtonNamebtnReplaceReplaceAll查找页：全部替换Text全部替换ButtonNamebtnRe

41、placeCancel查找页：取消Text取消设计完成后的窗口如下：2.9.2数据成员和属性设计为了便于功能实现，设计了四个数据成员和属性，如下：/ 要查找的字符串 string _findStr;publicstringFindStrgetreturn_findStr;set_findStr =value ;txtFindFind.Text = _findStr;txtReplaceFind.Text = _findStr;/ 要替换的字符串 string _replaceStr;publicstringReplaceStrgetreturn_replaceStr;set_replaceSt

42、r =value ;txtReplaceReplace.Text = _replaceStr;/ 查找或替换选项RichTextBoxFinds _findOption;publicRichTextBoxFindsFindOptiongetreturn_findOption;set_findOption =value ;cbFindWholeWord.Checked = (_findOption &RichTextBoxFinds.WholeWord) 0;cbReplaceWholeWord.Checked = (_findOption & cbFindMatchCase.Checked =

43、 (_findOption & cbReplaceMatchCase.Checked = (_findOption &RichTextBoxFinds.WholeWord) 0;RichTextBoxFinds.MatchCase) 0;RichTextBoxFinds.MatchCase) 0;/ 文本编辑器 frmEditor _editor;publicfrmEditorEditorset_editor =value ;2.9.2实现“查找页”的功能在 frmEditor.cs 中添加 Find 方法，如下：publicvoid Find(stringfindStr,RichTextBo

44、xFindsfindOption)_findStr = findStr;_findOption = findOption;_nCharIndex = rtbEditor.Find(_findStr, _nCharIndex, _findOption) + _findStr.Length; this .Activate();在 frmEditor.cs 中添加 “查找”菜单项的响应，将当前的查询和替换参数传到查找替换对话框，并以非模态对话框的形式显示查找替换对话框，如下：privatevoidmiEditFind_Click(objectsender,EventArgse)frmFindAndReplacedlgFind =dlgFind.FindStr = _findStr;dlgFind.FindOption = _findOption;dlgFind.Editor =this;dlgFind.SetFindOrReplace(dlgFind.Show();new frmFindAndReplace true );();在 frmFindAndReplace.cs 中响应“查找下一个”和“取消”二个按钮的消息，获取当前对话框的参数后，调用 frmEditor.cs 中定义的 Find 方法，如下：/ 查找页：查找下一个，使用非模态对话框实现查找pr