| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3171 人关注过本帖
标题:用Delphi编写一个简单的记事本,另存为,撤销,全选的代码怎么写
只看楼主 加入收藏
小妖彬彬
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-10-28
收藏
 问题点数:0 回复次数:3 
用Delphi编写一个简单的记事本,另存为,撤销,全选的代码怎么写
用Delphi编写一个简单的记事本,另存为,撤销,全选的代码怎么写
搜索更多相关主题的帖子: 编写 代码 撤销 记事本 Delphi 
2008-10-30 13:23
ruanjian2110
Rank: 3Rank: 3
来 自:武汉
等 级:论坛游民
威 望:7
帖 子:486
专家分:50
注 册:2008-5-25
收藏
得分:0 
另存为代码:
begin
  with savedialog1 do
       if execute then
          begin
            richedit1.Lines.SaveToFile (filename);
            form1.Caption := '记事本|'+filename;
            opendialog1.FileName := filename;
          end;
end;

全选:
 richedit1.SelectAll;

撤消:
 richedit1.Perform(EM_UNDO,0,0);

武汉信控科技有限公司:http://www. 超越技术,本身就是一个美好技术。。。。。。
2008-10-30 14:45
小妖彬彬
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2008-10-28
收藏
得分:0 
谢谢哦
2008-11-02 14:46
zhanshi007
Rank: 2
等 级:论坛游民
帖 子:46
专家分:20
注 册:2009-7-10
收藏
得分:0 
非常好!!!!!!!!!!!
2009-07-25 13:32
快速回复:用Delphi编写一个简单的记事本,另存为,撤销,全选的代码怎么写
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.047928 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved