Delphi ActiveX Form的使用实例
Delphi ActiveX Form的使用实例
By knityster
1. ActiveX控件简介
ActiveX控件也就是一般所说的OCX控件，它是ActiveX技术的一部分。
ActiveX控件可以被集成到很多支持ActiveX的应用当中去，或者直接用来扩展应用的功能，这些支持ActiveX的应用包括C++ Builder、Delphi、Visual dBASE、 Visual Basic、Visual C++、Internet Explorer、Netscape Navigator等。
简单的说，ActiveX技术可以使多种编译器中众多的控件得到互用，比如说：我可以将Delphi中的控件打包为ActiveX控件后然后加载到Visual C++中进行使用，这样在VC中也可以使用Delphi中的这些控件来实现相应的功能了。
2. ActiveX控件相关知识
在Delphi中，一个ActiveX控件由如下几个部分组成：VCL(可视化构件库)控件、属性、方法、事件，以及一个或者多个相关的类型库。
2.1、VCL构件
在Delphi中，一个ActiveX控件是由一个或者多个VCL构件经过包装以后得到的。所以，要使用Delphi来开发ActiveX控件，必须先得开发出或者选择要进行包装的VCL构件。也正是由于这个原因，我们可以将Delphi里大量优秀的VCL构件包装成ActiveX控件，从而可以在别的不能够直接使用VCL构件的开发工具(如Visual Basic、Visual C++)里也能够使用到这些控件啦！
但是，在Delphi里可以用来做ActiveX控件的VCL构件必须是TWinControl的后代。如果想用一个TGraphiControl的子类做ActiveX控件，在大多数情况下只需要把它的基类变为TCustomControl即可。有的VCL构件是被注册成非ActiveX控件的，例如 EditControl，这些控件也不能做ActiveX控件。
2.2、类型库
类型库包含了控件的类型定义信息，提供了比接口更多的详细信息，是控件向它的宿主程序提供服务信息的一种途径。类型库的目的是为其他应用和编程工具提供关于它包含的构件对象的信息。开发ActiveX控件时，Delphi把类型库信息存入一个.TLB文件中及一个对应的Pascal文件.res(.TLB文件的Pascal语言版本)，编译时类型库将作为资源链入DLL或者EXE中。
类型库的元素包括：
(1)类型库信息：包括类型库的总体信息和特征、当前类型库引用的其它类型库信息；
(2)构件类：代表整个ActiveX控件，包含了提供给客户应用的接口；
(3)接口属性和方法、事件；
(4)枚举类型：一种用作数据类型的相关常量，可以用在类型库的其他地方定义属性和方法。
图1 类型库编辑器
Delphi提供了一个类型库编辑器，用于观察或修改类型库，见图1 (在Delphi中选择File->ope
相关文档：
我一开始以为，将表单设置为隐藏，可以在表单创建事件中即FormCreate(Sender:TObject)去设置
因此， 我在这个procedure TForm.FormCreate(Sender:TObject)中，
想用一下两种方式实现
即：
调用 from.Hi ......
作为delphi的铁杆，在正式Delphi2010推出后，我当然也要尝尝新鲜，用电驴下来以后安装。呵呵二十多分钟就搞定了，启动也特快，简单使用一下，棒棒！！看来Delphi（太阳神）又回来了，如是我决定抛弃delphi2007，用这个新家伙。我所用的第三方组件主要是RemObjects和reportbuilder，reportbuilder还没有找到安装forD2009 Ful ......
此文适合Delphi新手阅读，特别是连接数据库方面还一懂半懂甚至根本不懂的新手；
--------------------------但总体显得有点乱-------------------------
本文章以Delphi 7和SQL Server 2000为例，控件名均为系统默认，如Unit1,DataModule1,Edit1,ADOCommand1,ADODataS ......
有时需要使用透明控件用于捕获鼠标消息
1.调用Windows2000,xp新的API函数实现这一功能的过程。使用SetLayeredWindowAttributes
2.直接设置控件的alphablend,alphablendvalue，间接调用上述api.
3.使用TStaticText控件
procedure WMCtrlColor(var Message: TWMCtlColor); message WM_CTLCOLOR;
procedure TForm3.WMCtr ......
Delphi 的字符及字符串[1] - string、AnsiString、WideString、String[n]、ShortString
2008-10-17 14:57:17
//最常用的 string
var
str: string; {定义}
begin
str := '万一'; {赋值}
ShowMessage(IntToStr(Length(str))); {长度是: 4}
end;
//长字符串 AnsiString; 在当前版� ......
