李文小

积少成多,水滴石穿...

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

2012年2月28日

摘要: unitUnit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 =class(TForm)Button1: TButton;Button2: TButton;procedureButton1Click(Sender: TObject);procedureButton2Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses 阅读全文
posted @ 2012-02-28 17:57 李文进 阅读(301) 评论(0) 推荐(0) 编辑

摘要: 1、MD5String、MD5File、MD5Print、MD5Match这四个函数是供调用的。其他是用来辅助这几个函数的子函数。2、MD5String为加密字符串。3、MD5File为加密这个文件。4、MD5Print是将加密后的密文转换成字符串。5、MD5Match是用来比较密文是否一致。unitMd5;interfaceusesWindows;typeMD5Count=array[0..1]ofDWORD;MD5State=array[0..3]ofDWORD;MD5Block=array[0..15]ofDWORD;MD5CBits=array[0..7]ofByte;MD5Diges 阅读全文
posted @ 2012-02-28 16:45 李文进 阅读(188) 评论(0) 推荐(0) 编辑

2012年2月22日

摘要: 调用GlobalAlloc函数分配一块内存,该函数会返回分配的内存句柄。调用GlobalLock函数锁定内存块,该函数接受一个内存句柄作为参数,然后返回一个指向被锁定的内存块的指针。 您可以用该指针来读写内存。调用GlobalUnlock函数来解锁先前被锁定的内存,该函数使得指向内存块的指针无效。调用GlobalFree函数来释放内存块。您必须传给该函数一个内存句柄。GlobalAlloc说明分配一个全局内存块返回值Long,返回全局内存句柄。零表示失败。会设置GetLastError参数表参数 类型及说明wFlags Long,对分配的内存类型进行定义的常数标志,如下所示: GMEM_FIX 阅读全文
posted @ 2012-02-22 12:50 李文进 阅读(146) 评论(0) 推荐(0) 编辑

2012年2月20日

摘要: 第一,房子不见光。 所谓不见光的房子,是指不管是白天太阳有多好,能照到房内的阳光始终很少很少,像这样的情况就导致了阴气加重,阴气加重直接导致的结果就是脾气不好,容易夫妻之间产生矛盾,另一个也是最不利财。 第二,右高左低的房子 风水上讲,左青龙,右白虎。如果你居住的屋子右边有很高很高的房子,那么你的健康情况就要当心了,像遇上这样的房子,第一,不利财,第二,不利健康。如果在住这个屋子之前你的运气一般,那么住进去之后你的运气则会更差。像这样的房子是必须极早化解的,否则非常不利的。 第三、卫生间或是厨房以着门 有句老话说的好,流水财留不住。像卫生间或是厨房对着门的就形成了“上水”直通“下水... 阅读全文
posted @ 2012-02-20 13:32 李文进 阅读(195) 评论(0) 推荐(0) 编辑

2012年2月16日

摘要: DELPHI常见属性说明:ALIGN 设置组件对齐(同其父容器)方式BORDERSTYLE 设置组件边框形状CAPTION 设置组件标题CTL3D 设置组件边框是否为3D模式,若BORDERSTYLE设置为BSNONE则此属性无效COLOR 设定组件背景颜色CURSOR 设定鼠标经过组件时光标所显示的形状ENABLED 设定组件是否能使用,当设为FALSE时组件会呈灰色FONT 设定组件内文字的字型、字体大小、颜色等HEIGHT 设定组件高度HELPCONTENT 用来为帮助说明文件中的索引值建立关联LEFT 设定组件与父组件左边框间的距离POPUPMENU 设定鼠标右键(弹出式)快捷菜单TA 阅读全文
posted @ 2012-02-16 18:21 李文进 阅读(538) 评论(0) 推荐(0) 编辑

摘要: 利用内存流来判断文件的格式,其实判断文件的前几个字节就可以简单的判断这个文件是什么类型的文件。procedure TFrm.CheckImgType(Sender: TObject);var //声明变量 MyImage:TMemoryStream; //内存流对象 Buffer:Word; i:integer;begin if OpenDialog1.Execute then //OpenDialog1是一个文件打开对话框 begin MyImage:=TMemoryStream.Create; //建立内存流对象 try MyImage.LoadFromFile(OpenDialog1.. 阅读全文
posted @ 2012-02-16 18:15 李文进 阅读(350) 评论(0) 推荐(0) 编辑

2012年2月15日

摘要: http://www.sqlite.org/lang.html可查询语法格式。 阅读全文
posted @ 2012-02-15 16:23 李文进 阅读(478) 评论(0) 推荐(0) 编辑

摘要: 1.返回最后插入的标识值 返回最后插入的标识值sql server用@@IDENTITY sqlite用标量函数LAST_INSERT_ROWID() 返回通过当前的 SQLConnection 插入到数据库的最后一行的行标识符(生成的主键)。此值与 SQLConnection.lastInsertRowID 属性返回的值相同。2.top n 在sql server中返回前2行可以这样: select top 2 * from aa order by ids desc sqlite中用LIMIT,语句如下: select * from aa order by ids desc LIMIT 23 阅读全文
posted @ 2012-02-15 15:56 李文进 阅读(254) 评论(0) 推荐(0) 编辑