摘要: 所以演示完程序后,就准备修改下字体的颜色。从网上搜索了一下,发现在C#中实现很简单,只需要几行代码即可实现。 阅读全文
posted @ 2013-07-02 17:02 imlion 阅读(3231) 评论(6) 推荐(2) 编辑
摘要: 企业有很多的科室,科室的每个人或多或少都会写一些文档,有些文档领导需要浏览,解决的办法是将编辑的文档打印出来,供领导浏览,或是为了节约企业成本,文档就在人与人这间或部门之间copy过来,copy过去。如果员工或领导不善于管理文档,就会造成有很多的版本,或者是在以后无法轻松的找到相关的文档。所以企业专门找到一个人(文档管理员),让这个人负责文档的管理。而文档的管理的方式有两种形式,第一种是doc形式的(即word文档),第二种是分享形式的。对于第一种文档管理方式,只涉及到这个文档管理员,收集各部门的文档,将部门规划成一种如下图的形式:然后在部门中再规划人员,如下图:通过第一种形式,那么文档的管理 阅读全文
posted @ 2013-06-24 17:28 imlion 阅读(6233) 评论(12) 推荐(4) 编辑
摘要: 以前对json的了解并不是很清楚,因为使用很少,所以也没有特意的研究。只知道json是轻量级的数据交换格式,可以被多种语言方便的处理,也是大型门户站接口使用的主要数据格式。而最近做了个项目,涉及到json数据的操作。发现json其实挺简单。本文是自己在开发过程中对json的理解及使用,有错误的地方,也请大家多多指正。在学习处理json数据之前,需要对js中的数组和静态对象的定义了解一下。js中数组的定义//定义1维数组,包含三个元素var arr = new Array(“1″, “2″, “3″);//或var arr2 = ["1","2",&quo 阅读全文
posted @ 2013-06-07 17:58 imlion 阅读(2550) 评论(5) 推荐(3) 编辑
摘要: 很简单的实例,读写txt文件。读txt文件1 var2 Reader: TStreamReader;3 begin4 Reader := TStreamReader.Create( 'txt路径',TEncoding.UTF8); //utf8 编码读写text1.txt5 6 edtTitle.Text := Reader.ReadLine(); //读取一行7 mmText.Text := Reader.ReadToEnd(); //读取全部8 Reader.Free(); //关闭和释放9 end;写txt文件1 var2 Writer: TStream... 阅读全文
posted @ 2012-02-06 18:58 imlion 阅读(636) 评论(0) 推荐(0) 编辑
摘要: 1 Imports System.Text 2 Imports System.Security.Cryptography 3 4 Function getMD5Hash(ByVal strToHash As String) As String 5 Dim md5Obj As New Security.Cryptography.MD5CryptoServiceProvider 6 Dim bytesToHash() As Byte = System.Text.Encoding.ASCII.GetBytes(strToHash) 7 by... 阅读全文
posted @ 2012-02-05 13:55 imlion 阅读(365) 评论(0) 推荐(0) 编辑
摘要: 引用三个单元,分别是:IdHashMessageDigest,IdGlobal, IdHash; 1 uses IdHashMessageDigest,IdGlobal, IdHash; 2 3 vars:string; 4 MyMD5: TIdHashMessageDigest5; 5 Digest: T4x4LongWordRecord; 6 begin 7 s:='123456'; 8 MyMD5 := TIdHashMessageDigest5.Create; 9 Digest := MyMD5.HashValue(s);10 s:=MyMD5.AsHex(Digest 阅读全文
posted @ 2012-02-04 08:45 imlion 阅读(846) 评论(0) 推荐(0) 编辑
摘要: 测试环境:VS2008+VB.net 1 Public Shared Function GetWebContent(ByVal sURL As String) As String 2 Try 3 Dim request As Net.WebRequest 4 Dim response As Net.WebResponse 5 request = Net.WebRequest.Create(sURL) 6 response = request.GetResponse() 7 ... 阅读全文
posted @ 2012-02-04 08:32 imlion 阅读(463) 评论(0) 推荐(0) 编辑