|
DELPHI菜单:
File\New\Other…
var MyObject: OleVariant; begin MyObject:=CreateOleObject('MyCOM.MyObject'); try ShowMessage(MyObject.Test('黎明')); finally VarClear(MyObject); end; end; 执行.....并按Button1按键, 你会看到一个Message...那就是执行COM对象的Test方法的回传值。 |
正在阅读：图文并茂:delphi 编写你的com程序图文并茂:delphi 编写你的com程序
2005-06-13 10:01
出处：
责任编辑：moningfeng
按确定[ok]按钮
输入工程名MyCOM,按保存按钮
按[OK}按钮
在CoClassName打入MyObject，按OK
将RetVal打勾，按OK
