自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(7)
  • 收藏
  • 关注

转载 MSHTML 各种接口的转换过程收集

1、IHTMLWindow2-> IWebBrowser2 var wd:IHTMLWindow2; iw:IWebBrowser2; begin (wd as IServiceProvider).QueryService(IID_IWebBrowserApp,IWebBrowser2,Iw); end; 2、IHTMLDocument2.fra...

2013-01-18 11:11:00 107

转载 枚举当前所有窗口

//声明: GetWindow( hWnd: HWND; {指定的窗口句柄} uCmd: UINT {指定的关系选项} ): HWND; {失败返回0; 成功返回符合的窗口句柄} //uCmd 可选值: GW_HWNDFIRST = 0; {同级别第一个} GW_HWNDLAST = 1; {同级别最后一个} GW_HWNDNEXT = 2...

2013-01-08 16:18:00 297

转载 鼠标移过获取控件句柄、类名、坐标

procedure TForm1.Timer1Timer(Sender: TObject); var H:HWND; arr:array[0..254] of char; Rt:TRect; pt:TPoint; ca:TCanvas; begin ca:=TCanvas.Create ; ca.Handle :=GetDc(0); ...

2013-01-08 16:11:00 344

转载 指针

指针,是一个无符号整数(unsigned int),它是一个以当前系统寻址范围为取值范围的整数。指针对应着一个数据在内存中的地址,得到了指针就可以自由地修改该数据。指针的指针就是用来存放指针所在的内存地址的。 @:取址运算符; ^:指针的引用解析操作符; ////////////////// 1,类型指针的定义。对于指向特定类型的指针varptr : ^Integer;ptr ...

2012-05-13 15:02:00 150

转载 虚方法与动态方法

方法来到类中, 以前的特点基本都在;因为类一般是存在于一个继承链中, 所以就有了一些新的概念, 譬如: 继承、覆盖;也有了很多新名称, 譬如: 静态方法、虚方法、动态方法、抽象方法、类方法、消息方法.先从虚方法与动态方法开始吧 //下面的类中就定义了两个虚方法(virtual)、两个动态方法(dynamic) TMyClass = class procedure Proc1...

2012-05-13 11:30:00 135

转载 Delphi的抽象方法与抽象类

//抽象方法类似与接口; 在没有接口的年代 Delphi 是用抽象方法来模拟接口的; 我想它最终会被接口替代. {下面就定义了两个抽象方法} TMyClass = class(TObject)  procedure Proc1; virtual; abstract;   {抽象方法首先应该是一个虚方法或动态方法}  function Fun: string; dy...

2012-05-13 11:18:00 469

转载 一个简单的控制台程序

programProject1;{$APPTYPECONSOLE}usesSysUtils;varstr:String;beginWriteln('请输入:');Readln(str);Writeln('您输入的内容是:'+str);readkey;end.{-----------------------------Writeln是输出语句,输出语句有三种...

2012-04-11 19:52:00 211

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除