关于delphi xe5 重载的疑惑

zhu_jiang 2013-11-11 10:52:01
1.我有一父类,方法声明如下,实现忽略
protected
function BeginTransaction:ITransaction;overload;
function BeginTransaction(contextID:String):ITransaction;overload;
function BeginTranscation(contextID:String;isolationLevel:TIsolationLevel):ITransaction;overload;
function BeginTransaction(isolationLevel:TIsolationLevel):ITransaction;overload;
procedure Commit;
procedure Rollback;
procedure Synchronize(trans:ITransaction);

子类集成与该父类,声明如下
TObjectBLL = class(TBusiness)

问题,在子类方法中调用BeginTransaction(没有输入参数的那个方法),只有BeginTranscation(contextID:String;isolationLevel:TIsolationLevel)能够调用,其它重载方法调用时全部编译不通过,提示[dcc32 Error] Business.pas(100): E2250 There is no overloaded version of 'BeginTranscation' that can be called with these arguments
我到底问题出在那里?请各位大神帮忙解答!!
调用方法如下
function TObjectBLL.Insert(entity: TJSONValue; AutoPK:Boolean): Boolean;
var
dal:TObjectDAL;
tran:ITransaction;
begin
dal := TObjectDAL.Create;
try

tran:= BeginTranscation();
finally
dal.Free;
dal:=nil;
end;
end;
...全文
213 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhu_jiang 2013-11-13
  • 打赏
  • 举报
回复
的确是自己大意了
sololie 2013-11-12
  • 打赏
  • 举报
回复
function BeginTransaction:ITransaction;overload; function BeginTransaction(contextID:String):ITransaction;overload; function BeginTranscation(contextID:String;isolationLevel:TIsolationLevel):ITransaction;overload; function BeginTransaction(isolationLevel:TIsolationLevel):ITransaction;overload;

16,748

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 语言基础/算法/系统设计
社区管理员
  • 语言基础/算法/系统设计社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧