2009年3月24日
DELPHI实现摄像头拍照
摘要： procedure Tfrm1.Button2Click(Sender: TObject); Var jpeg: TJPEGImage; bmp: TBitmap; MyStm:TMemoryStream; strfilename,strcard:String; begin inherited; strfilename:=extractfilepath(Applicatio... 阅读全文
posted @ 2009-03-24 01:14 阿拉密斯 阅读(456) 评论(0) 推荐(0) 编辑
浅谈Delphi如何控制Excel操作
摘要： 1 创建Excel文件 要在Delphi中控制Excel，就必须用到OLE自动化。现在一般采用OLE2来创建OLE对象，当激活一个OLE对象时，服务器程序仅在容器程序内部激活，这就是所谓的“就地激活”(in-place activation)。 创建Excel文件时，先创建一个OLE对象，然后在对象中建立工作表worksheet，如函数createExcel所示： function create... 阅读全文
posted @ 2009-03-24 01:14 阿拉密斯 阅读(328) 评论(0) 推荐(0) 编辑
将应用程序11M内存占用，降至500K Delphi
摘要： 好多天没有写BLog了，最近解决了一个问题-减少内存占用。不过是有条件的，只能在WinXp,Win2K中应用此方法，不显示主窗体一直运行的程序最佳。以前程序占用11M内存，我用动态创建窗口的方法只能减少不到100K，应用此方法后内存占用只有496K。把下面的过程放到一个Timer中，每隔一段时间执行一次，如5秒。 { ************************************ * C... 阅读全文
posted @ 2009-03-24 01:13 阿拉密斯 阅读(886) 评论(6) 推荐(0) 编辑