Delphi 组件

组件可编译为 OCX 类型，注册后在其他程序载入。建立方法：

1. 启动 Delphi 6 --> 新建 --> Active Form --> 输入名称 --> "OK"。
2. View --> Type Library --> 展开左侧树图，在 IActiveFormX 中添加属性、方法等，按刷新按钮。
3. 在 ActiveFormImpl1 中相应属性、方法的过程，输入处理代码。
4. 可再添加窗口，完成后按注册按钮。

注：

1. 添加属性后，其输入、输出过程已经自动建立。
2. 一般都用 OleVariant 类型作为参数，传址用 OleVariant *，选择 Variant 即可。
3. 窗口使用前用 Application.CreateForm(TForm, FormVar) 建立，使用后用 FormVar.Free 消毁。
4. TActiveFormFactory.Create 方法的第 5 个参数为组件在组件工具箱中显示的图标位于资源文件中的 ID 号，整数。
5. 如果建立运行时不可见组件，将 TActiveFormFactory.Create 方法的第 7 个参数，从 "OLEMISC_SIMPLEFRAME or OLEMISC_ACTSLIKELABEL" 修改为 "OLEMISC_INVISIBLEATRUNTIME"。
6. 组件在工具箱的图标如何确定？
7. 不可见组件如何固定其尺寸？
8. CLSID 为 ActiveFormImpl1 窗口中的展开的第三项中的 GUID。
9. 作为 IE 插件使用时，在 IE 中的代码示例如下：

<object classid="clsid:EE24E90B-2D05-4B83-98E6-2E187BD8E0E2" codebase="http://tc/TestActProj1.ocx#version=1,0,0,0"  width="770" height="100" hspace="0" vspace="0" > </object>