delphi实例笔记本的制作SAVE功能实现

来源：百度知道 编辑：UC知道 时间：2024/05/10 07:56:04
提问
做保存功能了.我想实现笔记本那样的保存.
我的思路是这样的.
1.如果是第一次保存,将会打开保存对话框进行.
2.如果是在第一次的基础上做了修改进行保存则直接保存不打开对话框
3.如果用户没有点保存直接点退出.那么是新文档的话则就会弹出那个是否要保存的对话框.
暂时就想到这么多.请各位大虾写下代码给点思路.我就是不会写这个代码愁- -
能麻烦您写的详细一些吗谢谢

首先每新建一个记事本的页面的时候,就将一个变量save path设置空,
在保存的时候就判断save path是不是空,是空就saveDialog.execute,否则直接将RichEdit.lines.savetofile(savePath);这样就解决你前面2个问题.
至于第三个问题.
首先你编辑区域要用RichEdit不要用Memo.
然后在窗体的OnClose中写上
if RichEdit.modified then
弹出一个提示框..

好3个问题解决了.
有空可以看看我的博客.
哈哈
huangjacky.blog.163.com