奇怪的问题(100分)

  • 主题发起人 主题发起人 first
  • 开始时间 开始时间
F

first

Unregistered / Unconfirmed
GUEST, unregistred user!
我在delphi6中建一个事务对象,又加入一个本地数据模块。
但是在事务对象中动态创建数据模块时报"不支持此接口"的错误,非常奇怪。
代码如下:
MyInterface= class(TMtsAutoObject, Iree)
private
MyDataMod: TDataModule1;//本地数据模块
public
procedure Initialize;
end;
procedure MyInterface.initialize
begin
MyDatMod := TDataModule1.Create(Forms.Application);//创建数据模块
end;
 
你那个初始函数要重载
public
procedure Initialize override;
end;
这样就没有问题了
 
to shuszj
我已经重载了
 
难到没人知道吗?我再加100
 
接受答案了.
 
后退
顶部