Delphi

解决Listview中获取程序图标“毛边儿”（黑边儿）问题

xxmc01@gmail.com(pfeng) — Wed, 28 Dec 2011 17:32:10 +0000

PF-blog | 我的在线生活志-pfeng.org ( http://www.pfeng.org/ ) :

取得含程序图标的程序列表时，一般的思路都是将图标用 API函数SHGetFileInfo获取图标ico句柄，并加载到imagelist中，供Listview调用，这样固然可以出效果：

[attach=81]

但看着图标毛刺儿一样的黑边儿心里很不爽，网上搜了一番，有反映是imagelist的问题，那么就试着直接把图标绑定到Listview上：

首先要自己写一个小图标集：

		uses ShellApi,CommCtrl
...
var  S_ImageListHandle: THandle;//小图标集句柄
     FileInfo: SHFILEINFO;
...

阅读全文

分享一下自己用的SQLite数据库密码操作小工具（含源码）

xxmc01@gmail.com(pfeng) — Thu, 08 Dec 2011 19:19:35 +0000

PF-blog | 我的在线生活志-pfeng.org ( http://www.pfeng.org/ ) :

SQLite(http://www.hwaci.com/sw/sqlite/download.html)的优势以及wxsqlite(http://wxcode.sourceforge.net/components/wxsqlite3/)的特点就不多说了，可以自己查资料。

Unidac3.6以上版本已经支持带密码的Sqlite数据库操作了，但是加密、修改密码和清空密码仍然需要用WxSQLIte的Sqlite3.dll扩展的API来实现，而一般情况下，我们并没必须在项目中频繁地做数据库密码的操作，更多的是在项目结束时把数据库加密后一并发布，因此，这个小工具对你来说就比较顺手了，代码注释的比较详细，供新手学习参考吧。

阅读全文

UniDAC 的 RecordCount 属性注意事项

xxmc01@gmail.com(pfeng) — Wed, 08 Jun 2011 16:43:23 +0000

PF-blog | 我的在线生活志-pfeng.org ( http://www.pfeng.org/ ) :

一直以来都是用UniDAC作为数据库查询组件，而一般的写法都是这样：

UniQuery_sqlite.close;
      UniQuery_sqlite.SQL.Clear;
      UniQuery_sqlite.SQL.Add('SELECT * FROM TABLE');
      try
        UniQuery_sqlite.Open;
      except
        { TODO : 异常捕获 }
      end;
      //循环出所有记录
      for i := 0 to UniQuery_sqlite.RecordCount - 1 do
      begin
         //....
         UniQuery_sqlite.Next;
      end;

阅读全文

利用spcomm进行串口通讯

xxmc01@gmail.com(pfeng) — Wed, 26 May 2010 14:40:53 +0000

PF-blog | 我的在线生活志-pfeng.org ( http://www.pfeng.org/ ) :

学习串口通讯，自己写了一个简单的demo，分享给大家：

首先，需要下载安装spcomm控件：spcomm.rar ；这里提供下载的spcomm支持地D2007以上版本，即通讯用Pansichar。

安装控件的方法就不在累述，新建一个package，引入spcomm单元，编译安装即可。

阅读全文

OCX控件数字签名图文教程（个人总结）

xxmc01@gmail.com(pfeng) — Wed, 28 Apr 2010 20:05:00 +0000

PF-blog | 我的在线生活志-pfeng.org ( http://www.pfeng.org/ ) :

这段时间做了一个B/S下套打的控件（过几天整理一下放到博客上来），控件测试完成，但是因为没有数字证书，IE如果不设置信任区域和等级的话，会直接被阻止下载安装（我不期望客户能熟练地改IE设置），但是数字证书价格昂贵，暂不考虑，看到cnblogs上一篇文章后深受启发，照着搞了一个测试用的数字签名，但是这篇文章上的OS貌似是win 2000，IE5，我有必要在win7下给大家做个演示：

阅读全文

Try...except...end;和try...finally...end;的区别（总结）

xxmc01@gmail.com(pfeng) — Sun, 18 Apr 2010 14:18:35 +0000

PF-blog | 我的在线生活志-pfeng.org ( http://www.pfeng.org/ ) :

TRY    
TRY    
EXCEPT    
//如果自己想说明具体的错误原因就可以用EXCEPTION,进行区别,否则所有错误都可以抓住,并处理    
END;    
FINALLY    
//无论是否出错,都会执行    
SHOWMESSAGE('OK');    
END;

阅读全文