为什么我用delphi写的ActiveX,里面的方法和过程序怎么在VB中找不到呢?JS也调不到!(20分)

  • 主题发起人 主题发起人 amwtdkj
  • 开始时间 开始时间
A

amwtdkj

Unregistered / Unconfirmed
GUEST, unregistred user!
TActiveFormX = class(TActiveForm, IActiveFormX)
Button1: TButton;
procedure Button1Click(Sender: TObject);safecall;
public
procedure Initialize;
override;
function runactiveX(username,userpsw,courseID:string):integer;safecall;
end;

Button1Click和runactiveX在VB中都找不到!这是为什么?哪位老大能给我指点一下吗?谢谢谢谢谢谢
 
帮个忙了@!
 
老大们!!
 
Button1Click和RunActiveX在IActiveFormX里面有声明吗?没有就看不见。另外,Button1Click不能公开,因为别的语言没有TObject这个类型(即使有,名称一致但结构不一样),会出错的。
 
IActiveFormX是个接口!
IActiveFormX = interface(IDispatch)
function runactiveX(username,userpsw,courseID:string):integer;safecall;
function Frunact:string;safecall;
procedure Setrunact(Value: string);safecall;
property RunActive :string read Frunact write Setrunact;
我是这样作的!
还在TActiveFormX中作了实现!
 
可是在编写代码时候在view explorer中可以看到!编译完成后,可是重新打开一个工程加入activeX后却看不到!!
 
我也正在写Active控件有没有谁知道详细开发过程和注意事项
 
你是作关于哪方面的activeX?
 
你不会只是直接添加源代码吧?这样别的程序根本看不到,因为你的声明没有写到TLB里面!如果没有TLB的声明,其他程序导入了ActiveX也只能引用一个空Inteface.

你添加任何方法和属性的时候,都需要点View菜单,选Type Library菜单项,在弹出的Type Library窗口中,点击上面的按钮来增加接口方法和成员数据.
 
谢谢!我的问题已经解决!!谢谢谢谢!!
 
多人接受答案了。
 
后退
顶部