我有一个Delphi7。
我使用这篇文章:http://www.delphidabbler.com/articles?article=22&part=2 /步骤2
现在,我用LoadTypeLib(未定义)创建了一个问题:
type
TMyClass = class(TAutoIntfObject, IMyIntf, IDispatch)
constructor Create();
protected
procedure helloWorld(); safecall;
end;
implementation
constructor TMyClass.Create();
var
TypeLib: ITypeLib;
s: WideString;
begin
s := ParamStr(0);
OleCheck(LoadTypeLib(PWideChar(s), TypeLib)); // ERR:LoadTypeLib is undefined.
inherited Create(TypeLib, IMyCallback);
end;
有什么建议?
最佳答案
在Delphi 7中,LoadTypeLib
函数在ActiveX
单元中声明。您必须在使用子句中包含该单元。
通过搜索源代码,您可以自己找到与我完全相同的方法。使用“在文件中查找”功能,搜索未声明的符号的名称,然后在Delphi安装的Source
目录下搜索。