- 1、本文档共3页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
cbuide记事本程序
int change_ flag=0;
? /*保存*/
??? if(this-SaveDialog1-FileName.IsEmpty()??? )
??? {
??????? if(this-SaveDialog1-Execute()? )
??????? {
??????????????? Memo1-Lines-SaveToFile(this-SaveDialog1-FileName??? );
??????????????? change_flag=0;
??????? }
? ???}
???? else
???? {
???????? Memo1-Lines-SaveToFile(this-SaveDialog1-FileName??????? );
???? }
?
? /*另存*/
??????? if(this-SaveDialog1-Execute()????? )
??????? {
??????????????? Memo1-Lines-SaveToFile(this-SaveDialog1-FileName???? );
??????????? ????change_flag=0;
??????? }
?
/*新建*/
??????? if(change_flag)
??????? {
??????????????? ShowMessage(文档未保存,是否要继续?);
??????????????? N2Click(this);
??????????????? Memo1-Text=;
??????? }
??????? else
??????? {
??????????????? Memo1-Text=;
??????? }
/*撤销*/
??????? Memo1-Undo();??????
-/*删除*/
??????? Memo1-ClearSelection();???????
/*转到*/
??????? Form2-ShowModal();
/*时间日期*/
??????? Memo1-Lines-Add(FormatDateTime(yyyy*mm0dd dddd hh:nn:ss,Now()));?
/*自动换行*/
??????? if(Memo1-ScrollBars==ssVertical)
??????? {
?????????????? Memo1-ScrollBars=ssBoth;
??????? }
??????? else
??????? {
??????????????? Memo1-ScrollBars=ssVertical;
??????? }
/*转到第几行 */
?? ?????????????????
??????? int line_number=Edit1-Text.ToInt()-1;
??????? int sel_pos=0;
?????? ?for(int i=0;iline_number;i++)
??????? {
?????????????? sel_pos+=Form1-Memo1-Lines-Strings[i].Length()+2;
??????? }
??????? Form1-Memo1-SelStart=sel_pos;
??????? Form1-Memo1-SelLength=0;
??????? this-Close();
/*复制到剪切板 */
??????? Memo1-CopyToClipboard();???????
/*粘贴到剪贴板 */
??????? Memo1-PasteFromClipboard();???????
/*剪切到 */
??????? Memo1-CutToClipboard();???????
/*查找 */
???? if(this-FindDialog1-Execute())
??????? return;???????
/*替换 */
??????? if(this-ReplaceDialog1-Execute())
??????? return;
/*清空 */
??????? Memo1-Text=;???????
/*背景颜色 */
??????? if(this-ColorDialog1-Execute())
??????? Memo1-Color=ColorDialog1-Color;
/*全选 */
??? Memo1-SelectAll();
/*字体设置 */
???? if(this-FontDialog1-Execute())
??????? this-Memo1-Font=FontDialog1-Font;
/*打印设置 *
您可能关注的文档
- 卧龙山镇中心小学听课方案.doc
- 烤烟生产综合标准体系编制说明.doc
- 数控机床控制技术基础期末试卷.doc
- 8、口译中的视译.doc
- 坏帐准备讲义例题详细分录及要点分析.doc
- 教育专题会议.doc
- 技改井主斜井及井底大巷掘进作业规程.doc
- 拍摄优秀作品风景.doc
- 三亚市语文骨干教师高级研修班(广州2011)学习汇报.ppt
- ch11电磁场和电磁波.ppt
- 2025年高校教师资格证之高等教育心理学考试题库含答案(模拟题).docx
- 2025年高校教师资格证之高等教育心理学考试题库含答案(名师推荐).docx
- 2025年高校教师资格证之高等教育心理学考试题库含答案(考试直接用).docx
- 2025年高校教师资格证之高等教育心理学考试题库含答案(满分必刷).docx
- 2025年高校教师资格证之高等教育心理学考试题库含答案(典型题).docx
- 2025年高校教师资格证之高等教育心理学考试题库含答案(精练).docx
- 2025年高校教师资格证之高等教育心理学考试题库含答案【突破训练】.docx
- 儿内科(医学高级)《十神经肌肉系统疾病试题预测》模拟卷_0.doc
- 2025年高校教师资格证之高等教育心理学考试题库含答案【综合题】.docx
- 2025年高校教师资格证之高等教育心理学考试题库完整参考答案.docx
文档评论(0)