delphi课程设计文本编辑器

上传人:ni****g 文档编号:432910166 上传时间:2023-12-08 格式:DOC 页数:20 大小:383KB
返回 下载 相关 举报
delphi课程设计文本编辑器_第1页
第1页 / 共20页
delphi课程设计文本编辑器_第2页
第2页 / 共20页
delphi课程设计文本编辑器_第3页
第3页 / 共20页
delphi课程设计文本编辑器_第4页
第4页 / 共20页
delphi课程设计文本编辑器_第5页
第5页 / 共20页
点击查看更多>>
资源描述

《delphi课程设计文本编辑器》由会员分享,可在线阅读,更多相关《delphi课程设计文本编辑器(20页珍藏版)》请在金锄头文库上搜索。

1、 前 言delphi课程设计是计算机科学与技术专业学生的专业实践必修课程,是学习delphi应用程序课程非常重要的综合性实践教学环节。课程设计是检验学生是否掌握相关专业课程知识的重要手段,同时课程设计应充分体现“教师指导下的以学生为中心”的教学模式,以学生为认知主体,充分调动学生的积极性和能动性,重视学生实践应用能力和自学能力的培养。1 、设计的目的与要求(1)设计的目的: 课程设计是计算机科学与技术专业学生的专业实践必修课程,是学习delphi应用程序设计课程非常重要的综合性实践教学环节。课程设计是检验学生是否掌握相关专业课程知识的重要手段,同时课程设计应充分体现“教师指导下的以学生为中心”

2、的教学模式,以学生为认知主体,充分调动学生的积极性和能动性,重视学生实践应用能力和自学能力的培养。通过设计文本编辑器并实现其功能来熟练掌握delphi语言基础,初步掌握软件开发中系统分析、系统设计、系统实现和系统测试等阶段的基本方法与技术,培养学生的创新意识,提高实践应用能力,为培养应用型人才服务。(2)做文本编辑器的要求:菜单要求: 要求有新建 、保存、另存为、退出 、拷贝、剪切、粘贴、帮助等功能。要求其操作简单、界面清晰、灵活、实用、方便。要求程序须经调试,并添加异常处理和代码注释,同时在功能实现后,要将代码进行优化。最好能响应键盘和鼠标事件,同时可添加快捷键。 2 、设计进度及完成情况日

3、 期内 容2011年5月22日准备和审题、接受任务,开发环境配置等2011年2月2324日查找相关资料,系统调查,需求分析2011年5月25日系统建模2011年5月26日概要设计2011年5月2728日详细设计2011年5月2931日编码测试2011年6月01日部署、配置、运行2011年6月0203日撰写课程设计报告2011年6月04日课程设计总结2011年6月05日正式提交课程设计报告和系统源程序目 录前 言I1 、设计的目的与要求II2 、设计进度及完成情况III目 录I1引言12设计任务与目的13. 需求分析24 系统设计34.1 总体设计34.1.1 系统功能34.2详细设计35 系统

4、实现65.1 系统主要用例的实现65.1.1运行用例运行效果65.1.2 打开文档用例运行效果75.1.3 关于用例运行效果86 结束语9致谢10参考文献11附录A:系统源程序121 引言计算机的普及发展,软件行业在社会占着举足轻重的作用。现今市场中存在的文本编辑器已不是少数几种,而且功能已相对齐全,但我们作为未来从事软件行业的专业人士,借着软件发展的周期,研究这个课题,在学习过程掌握文本编辑器以及JAVA的相关知识很有必要,既随科技发展的前沿,又方便了我们的生活。事实上,因为暂时知识的限制性,我们只能做一个比较简单的文本编辑器,通过一学期对delphi的了解和课程设计培训,以及对文本编辑器主

5、要功能的详细研究,我们将其功能转化为了程序代码。主要分为编辑区、输入区等,此文本编辑器含有保存、 退出、查找、拷贝、剪切、粘贴等简要功能,其操作简单、界面清晰、灵活、实用、方便等优点,适用于简便的存档及撰写文稿。2 设计任务与目的1)设计一个简单的文本编辑器,可以实现以下功能: 1:文件的新建,打开,保存和另存; 2:对文件的编辑,如全选,复制,剪切,粘贴; 3:执行完操作后,能够顺利关闭记事本。4;能对文本进行格式修改5:可以改变文本的对齐方式6:有简单的搜索定位功能 2)通过这次设计,可以帮助学生:1:提高对delphi语言设计的掌握能力; 2:理论联系实际,进一步提高学生的软件开发技术;

6、 3:培养学生分析、解决问题的能力。3. 需求分析 在科学技术飞速发展的今天,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着越来越重要的作用。应用DELPHI技术实现学生学习实践是可行而必要的工作 。在社会生活中我们经常需要用电脑编写一些文档来保存文件,本课程设计是运用了delphi软件开发工具开发的应用软件。适合编写记录文件。 训练学生灵活应用所学Delphi语言的基本知识,熟练的完成问题分析、算法设计、编写程序,求解出指定的问题;训练用系统的观点和软件开发一般规范进行软件开发,巩固、深化学生的理论知识,提高编程水平,并在此过程中培养严谨的科学态度和良好

7、的工作作风; 提高综合运用所学的理论知识和方法独立分析和解决问题的能力运行要求: 由于本程序是运用DELPHI语言编成的,所以首先必须在电脑上安装DELPHI开发软件,并在delphi7.0中进行编程。 4 系统设计4.1 总体设计4.1.1 系统功能1:文件的新建,打开,保存和另存;2:对文件的编辑,如全选,复制,剪切,粘贴;3:执行完操作后,能够顺利关闭记事本。4;能对文本进行格式修改5:可以改变文本的对齐方式6:有简单的搜索定位功能4.2 详细设计 文本编辑器各功能的实现代码如下1.新建procedure TForm1.FileNewExecute(Sender: TObject);/新

8、建部分beginRichEdit1.Clear;FileName:=未命名文件.txt;StatusBar1.Panels0.Text:=FileName;end;2.打开procedure TForm1.FileOpen1Accept(Sender: TObject);/打开部分beginRichEdit1.Lines.LoadFromFile(FileOpen1.Dialog.FileName);FileName:=FileOpen1.Dialog.FileName;Form1.Caption:=FileName;StatusBar1.Panels0.Text:=FileName;end;

9、3.保存procedure TForm1.FileSaveExecute(Sender: TObject);/保存beginif FileName=未命名文件.txtthen FileSaveAs1.Execute else RichEdit1.Lines.SaveToFile(FileName);end;4.帮助 contents菜单procedure TForm1.HelpContents1Execute(Sender: TObject);/帮助const HELP_TAB=15; CONTENTS_ACTIVE=-3;begin Application.HelpCommand(HELP_

10、TAB,CONTENTS_ACTIVE);end;5.帮助indes菜单procedure TForm1.HelpIndexExecute(Sender: TObject);Const HELP_TAB=15; INDEX_ACTIVE=-2;begin Application.HelpCommand(HELP_TAB,INDEX_ACTIVE);end;6.关于部分procedure TForm1.HelpAboutExecute(Sender: TObject);beginwith TAboutBox.Create(Self) do try showModal; finally Free;

11、 end;end;7.显示字体procedure TForm1.ShowHint(Sender: TObject);begin if Length(Application.Hint) 0 then begin StatusBar1.SimplePanel := True; StatusBar1.SimpleText := Application.Hint; end else StatusBar1.SimpleText := 欢迎使用本软件!; end;8.窗体建立procedure TForm1.FormCreate(Sender: TObject);begin Application.Hel

12、pFile:=ExtractFilePath(Application.ExeName)+TextEditor.hlp;end;另存为procedure TForm1.FileSaveAs2Execute(Sender: TObject);/另存为begin RichEdit1.Lines.SaveToFile(FileName);end;9.字体名称procedure TForm1.FontNameChange(Sender: TObject);/字体名称begin if FontName.Text=ANSI_CHARSET then RichEdit1.Font.Charset:=ANSI_

13、CHARSET; if FontName.Text=ARABIC_CHARSET then RichEdit1.Font.Charset:=ARABIC_CHARSET; if FontName.Text=BALTIC_CHARSET then RichEdit1.Font.Charset:=BALTIC_CHARSET;end;10.更改字体大小procedure TForm1.FontSizeChange(Sender: TObject); /字体大小改变begin RichEdit1.Font.Size:= StrToInt(FontSize.Text);end;end.5 系统实现5.

14、1 系统主要用例的实现5.1.1运行用例运行效果 图5-1 运行用例运行效果图5.1.2 打开文档用例运行效果图5-2 打开文件用例运行效果图5.1.3 关于用例运行效果居中对齐如下加粗、倾斜、下划线效果 图5-3 用例演示运行效果6 结束语作为计算机科学与技术的学生,我觉得能做类似的课程设计是十分有意义,而且是十分必要的。在已度过的时间里我们大多数接触的是专业基础课。我们在课堂上掌握的仅仅是专业基础课的理论面,如何去锻炼我们的实践面?如何把我们所学到的专业基础理论知识用到实践中去呢?我想做类似的大作业就为我们提供了良好的实践平台。在做本次课程设计的过程中,我感触最深的当数查阅大量的书籍了。为了让自己的设计更加完善,更加符合软件工程标准,一次次翻阅各种参考资料是十分必要的,同时也是必不可少的。我们是在作设计,但我们不是艺术家。他们可以抛开实际,尽情在幻想

展开阅读全文
相关资源
相关搜索

当前位置:首页 > 办公文档 > 工作计划

电脑版 |金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号