我有一个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目录下搜索。

10-08 04:48