实验四文件与Windows窗体设计VIP免费

实验四文件与Windows窗体设计一、实验目的：1、了解与文件处理相关属性、方法、事件。2、掌握windows窗体应用程序创建的一般过程。3、掌握常见windows控件的使用。二、实验内容：编制小型的“记事本”程序，要求如下：（1）记事本的界面如图1所示，其中文本框为RichTextBox对象。图1主菜单（2）设计“文件”的各子菜单项如图2所示，并为各子菜单项编写相应的事件过程代码。图2“文件”菜单项（3）设计“编辑”的各子菜单项如图3所示，为各子菜单项编写相应的事件过程代码，具体要求如下：1）编写“撤销”、“剪切”、“复制”、“粘贴”、“删除”、“全选”的Click事件代码。2）编写“编辑”的DropDownOpening事件代码，以实现如下要求：当文本框中有选中内容时，“复制”、“剪切”和“删除”菜单项可用，否则不可用；当剪切板中有内容时，“粘贴”菜单项可用，否则不可用。3）编写“时间/日期”的Click事件过程代码，实现往光标处插入当前的时间和日期。4）编写“查找”的Click事件过程代码：单击“查找”菜单项时，将弹出如图4所示的“查找”对话框。5）当用户在“查找”对话框的文本框中查找内容后，单击“查找下一个”按钮，将完成相应的文本查找工作。单击“取消”按钮，将关闭“查找”对话框。图3“编辑”菜单项图4“查找”对话框（4）设计“格式”的各子菜单项如图5所示，并为各子菜单项编写相应的事件过程代码，具体要求如下：1）编写“自动换行”的Click事件代码：当“自动换行”菜单项被选中时，实现文本框内容的自动换行。（当文本框对象的WordWarp属性为true时，文本框对象实现自动换行。）2）编写“字体”的Click事件代码：弹出“字体”对话框，并为选中的文本设置相应的字体风格。3）编写“颜色”的Click事件代码：弹出“颜色”对话框，为选中的文本设置颜色。4）编写“背景色”的Click事件代码：弹出“背景色”对话框，为文本框设置背景色。图5“格式”菜单项（5）在实现基本功能完成的情况下可以自由发挥，可以添加新的功能；对于要求的功能也可以采取不同的实现方法。实验代码：usingSystem;usingSystem.ComponentModel;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.IO;namespaceTest4{publicpartialclassNotepad:Form{privateSearchsrhForm;//查找对话框privateconststringnewFileName="无标题";//默认新文件名privateconststringappName="记事本";//程序名privateboolchanged=false;//文本框改变标志privateboolisNew=true;//是否为新建文件标志privatestringcurrentFileName=newFileName;//当前打开文件名privatestringfilePath="";//打开文件的路径publicNotepad(){InitializeComponent();}privatevoidNotepad_Load(objectsender,EventArgse){this.Text=newFileName+"-"+appName;txtText.AllowDrop=true;txtText.DragEnter+=newDragEventHandler(txtText_DragEnter);txtText.DragDrop+=newDragEventHandler(txtText_DragDrop);编辑EToolStripMenuItem_DropDownOpening(sender,e);}privatevoidWriteText(stringpath)//文件写入{StreamWritersTmp=newStreamWriter(path,false,Encoding.Default);sTmp.Write(txtText.Text);sTmp.Flush();sTmp.Close();}#region文件privatevoid新建NToolStripMenuItem_Click(objectsender,EventArgse){if(isNew){if(txtText.Text!=""){switch(MessageBox.Show("是否保存文件到"+currentFileName+"?",appName,MessageBoxButtons.YesNoCancel)){caseDialogResult.Yes:sfdSave.Title="另存为";sfdSave.FileName=currentFileName;if(sfdSave.ShowDialog(this)==DialogResult.OK){filePath=sfdSave.FileName;WriteText(filePath);txtText.Clear();currentFileName=newFileName;this.Text=currentFileName+"-"+appName;isNew=true;changed=false;}break;caseDialogResult.No:txtText.Clear();currentFileName=newFileName;this.Text=currentFileName+"-"+appName;isNew=true;changed=false;break;}}else{changed=false;}}else{if(changed){switch(MessageBox.Show("是否保存修改到"+filePath+"?",appName,MessageBoxButto...