摘要：
http://blog.csdn.net/csm2432/article/details/7692443 阅读全文
posted @ 2016-04-13 10:29 ╰★张志峰★╮ 阅读(1837) 评论(0) 推荐(0)
摘要：
//导出Wordprocedure TFrm_Computing.ExportWord(aFileName: string; aFileType: string);var wordApp, WordDoc, WrdSelection, wrdtable, wrdtable1, cell: varia 阅读全文
posted @ 2016-04-13 10:16 ╰★张志峰★╮ 阅读(726) 评论(0) 推荐(0)
摘要：
“四点半课堂”活动方案 活动背景： 关爱流动人口子女，我们一直没有停止过。学生一般下午4时30分就放学，而家长要到下午6时左右才能下班，如何让孩子安全度过这90分钟的“管理真空”？江南区在新屋村委开设的“关爱落户江南”工作室中筹办了“四点半课堂”，组织了素质较高的志愿者及青少年宫的专业老师等辅导孩子 阅读全文
posted @ 2016-04-12 13:08 ╰★张志峰★╮ 阅读(12412) 评论(0) 推荐(0)
摘要：
对于多数双职工家长来说，上小学的孩子下午4点半放学时，他们还在单位里忙活着，孩子放学后去哪儿成了“难题”。大同城区华北星城社区开办的公益“四点半课堂”解除了家长的后顾之忧，也为“四点半的困惑”找到了一条新思路。 “放羊”的孩子有人管 19日下午5点20分，家住大同城区华北星城的王建敏像往常一样，从本 阅读全文
posted @ 2016-04-12 13:06 ╰★张志峰★╮ 阅读(405) 评论(0) 推荐(0)
摘要：
http://jingyan.baidu.com/article/ab0b5630d4d4f9c15afa7da6.html 阅读全文
posted @ 2016-04-12 12:01 ╰★张志峰★╮ 阅读(139) 评论(0) 推荐(0)
摘要：
unit InsertRichEditUnit;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, RichEdit, UHISRichEd;type TE 阅读全文
posted @ 2016-04-12 10:34 ╰★张志峰★╮ 阅读(696) 评论(0) 推荐(0)
摘要：
这个给你一个简单的代码，仅提供思路。 uses Clipbrd; //引用单元 procedure TForm1.Button1Click(Sender: TObject); var Bmp: TBitmap; begin Bmp := TBitmap.Create; Bmp.SetSize(Ima 阅读全文
posted @ 2016-04-12 10:30 ╰★张志峰★╮ 阅读(895) 评论(0) 推荐(0)
摘要：
procedure TForm1.Button1Click(Sender: TObject);var jpg: TJPEGImage; // 要use Jpeg单元begin // 显示jpg大图片的方式 jpg := TJPEGImage.Create; jpg.LoadFromFile(getc 阅读全文
posted @ 2016-04-12 10:22 ╰★张志峰★╮ 阅读(514) 评论(0) 推荐(0)
摘要：
wDoc := docapp1.Documents.open(ExtractFilePath(Paramstr(0)) + 'abc.doc'); wDoc.SaveAs(ExtractFilePath(Paramstr(0)) + 'tmp\2.rtf', wdFormatRTF); wDoc.c 阅读全文
posted @ 2016-04-12 09:49 ╰★张志峰★╮ 阅读(545) 评论(0) 推荐(0)
摘要：
文件关联为我们带来很多的方便。Delphi自带有注册表对象TRegistry，可以通过它取得或改变注册表相关键值的内容。 Function GetAssociatedExec(FileExt: String; var FileDescription, MIMEType: String): Strin 阅读全文
posted @ 2016-04-11 10:41 ╰★张志峰★╮ 阅读(1240) 评论(2) 推荐(0)
浙公网安备 33010602011771号