2015年11月26日
Delphi中的消息截获（六种方法：Hook,SubClass,Override WndProc,Message Handler,RTTI,Form1.WindowProc:=@myfun）good
Windows是一个基于消息驱动的系统，因此，在很多时候，我们需要截获一些消息然后自己进行处理。而VCL系统又有一些特定的消息。下面对我所了解的delphi环境中截获消息进行一些总结。 就个人了解，共有6种方法来截获/处理消息。 1. 消息钩子（Message Hook） 特点：可以针对所有有句柄的 Read More
posted @ 2015-11-26 21:35 findumars Views(1981) Comments(0) Diggs(0)
Delphi下获取IE的UserAgent的方法
方法一：使用SHDocVw, MSHtml单元提供的一些方法利用浏览器的特性来获取。uses SHDocVw, MSHtml;function GetUserAgent: string;varDoc: IHTMLDocument2;win: IHTMLWindow2;wb: TWebBrowser;... Read More
posted @ 2015-11-26 21:33 findumars Views(733) Comments(0) Diggs(0)
Delphi使用Windows API函数AnimateWindow实现窗体特效
{**********************************************************************API函数 AnimateWindow 使用：函数功能：窗体显示和隐藏时产生特殊的动画效果；可以产生两种类型的动画效果：滚动动画 和 滑动动画函数原型：BOO... Read More
posted @ 2015-11-26 21:32 findumars Views(803) Comments(0) Diggs(0)
Delphi下URL汉字编码解码的两个函数
//汉字URL编码函数function URLEncode(const S: string; const InQueryString: Boolean): string;varIdx: Integer; //逐个字符循环直至字符串结束beginResult := '';for Idx := 1 to... Read More
posted @ 2015-11-26 21:31 findumars Views(589) Comments(0) Diggs(0)
Delphi2007下CIS的clHttp使用
Delphi组件Clever Suite Internet是一款优秀的网络组件，唯一让我感觉不足的是ClHttp竟然使用了断言，当程序遇到问题的时候就会弹出一个对话框，并显示问题是出在了那个单元里。好了，言归正传，发一个Delphi2007下使用ClHttp的例程。procedure TForm1.... Read More
posted @ 2015-11-26 21:30 findumars Views(774) Comments(0) Diggs(0)