2015年12月2日
强大的DELPHI RTTI–兼谈需要了解多种开发语言
一月 27th, 2005 by 猛禽风焱在《“18般武艺”？》中说到他碰上的被多种语言纠缠的问题。我在回复里说：很多语言只要能看懂几分就行了，没必要每一种都精通但是如果只会很少的一两种语言也是不行的。因为看了一些关于JAVA的反射技术的应用，忽然想到DELPHI的RTTI也很强，于是试着拿数据集下... Read More
posted @ 2015-12-02 06:54 findumars Views(872) Comments(0) Diggs(0)
使WEBBROWSER 可编辑
procedureTForm1.CheckBox1Click(Sender: TObject);begin{这里是让整个页面可编辑, 也可以单独编辑某个元素} WebBrowser1.OleObject.document.body.contentEditable := CheckBox1.Check... Read More
posted @ 2015-12-02 06:51 findumars Views(409) Comments(0) Diggs(0)
使用TWebBrowser组件保存网页为html和mht文件 收藏
一、保存为HTML文件uses ActiveX;...procedure WB_SaveAs_HTML(WB : TWebBrowser; const FileName : string) ;var PersistStream: IPersistStreamInit; Stream: IStream... Read More
posted @ 2015-12-02 06:51 findumars Views(532) Comments(0) Diggs(0)
鼠标进入与离开的消息（覆盖CM_MOUSEENTER与CM_MOUSELEAVE消息）——Windows本身没有这样的消息
unit Unit1;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Label1: T... Read More
posted @ 2015-12-02 06:45 findumars Views(496) Comments(0) Diggs(0)
线程中的异常处理——怪不得所有的语句，都用try catch包的严严实实，甚至每个小步骤还要单独包起来
答案是：在线程中出现没处理的异常时，线程会自动终止。以前刚看到别人的代码时候，十分惊讶，try catch几乎成了最主要的语句了，还以为是因为代码风格，或者更严谨一些的原因。到今天才明白，原来还不是这个原因，是因为线程出现异常，满盘出错（线程的一个执行步骤分为整整28步，有些步骤甚至还包含一些小的步... Read More
posted @ 2015-12-02 06:43 findumars Views(937) Comments(0) Diggs(0)