您的位置：首页 > 编程语言 > Delphi

制作简单的 COM 范例 (for Delphi)

2008-04-30 22:59 369 查看

COM" target=_blank>制作简单的 COM 范例 (for Delphi)

一. 打开 Delphi 5.0 程序

二. 关闭所有单元

三. 单击“File”在菜单下的“New”子菜单，弹出“New Item”对话框，选择“ActiveX”下的“ActiveX Library”，单击“OK”。（此操作，创建一个“库工程”）

COM:vml" />COM:office:office" />
四. 把“此工程”另存为“COMProgramExaP”。
五. 单击“File”在菜单下的“New”子菜单，弹出“New Item”对话框，选择“ActiveX”下的“COM Object”，单击“OK”。（此操作，创建一个“COM 对象”）
弹出，“COM Object Wizard”对话框，输入类（Class）名称—“z_COMProExaCLA”，单击“OK”。弹出，“COMProgramExaP.Tlb”对话框，选择“Iz_COMProExaCLA”,在此下面添加, “属性，方法”，添加“方法1”—“z_MethodAdd” 给此“z_MethodAdd”方法，输入参数刷新参数完成，单击刷新。添加，方法的内容，方法内容最后，给COM 注册，注册
六. 制作结束。
forE: always; TEXT-ALIGN: center">应用（for Delphi）
一. 新建一个工程
二. 加入界面
三. 单击“Project”在菜单下的“Import Type Library”子菜单，弹出“Import Type Library”对话框，选中“COMProgramExaP Library”,单击“Create Unit”按钮。
四. “uses COMProgramExaP_TLB;”单元
五. 制作应用程序
应用程序
六. 结果展示
forE: always; TEXT-ALIGN: center">应用（for VB）
七. 新建一个工程
八. 加入界面
九. 单击“Project”在菜单下的“references”子菜单，弹出“references-project1.vbp”对话框，选中“COMProgramExaP Library”,单击“OK”按钮。
十. 制作应用程序
Private Sub COMmand1_Click()类接口(不能声明工程) ' 声明-< COM 接口 >-变量 Dim z_COMTest As New z_COMProExaCLA Dim a, b As Integer ' 应用 a = Text1 b = Text2 Text3 = z_COMTest.z_MethodAdd(a, b)End Sub
十一. 结果展示

内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理

标签：

相关文章推荐

新的分享

章节导航