X
xingkong97
Unregistered / Unconfirmed
GUEST, unregistred user!
请大家看一下这几句程序:
IDataSet=interface
...
end;
TMYADOQuery=class(TInterfacedObject, IDataSet)
...
end;
TFactory=class
...
CreateDataSet :IDataSet;
...
end;
function TFactory.CreateDataSet : IDataSet;
begin
Result := TMYADOQuery.Create ;
end;
那么在这个方法执行过以后,Result 指的是什么?是IDtaSet的实例?IDtaSet是接口能这样用吗?为什么?谢谢!
IDataSet=interface
...
end;
TMYADOQuery=class(TInterfacedObject, IDataSet)
...
end;
TFactory=class
...
CreateDataSet :IDataSet;
...
end;
function TFactory.CreateDataSet : IDataSet;
begin
Result := TMYADOQuery.Create ;
end;
那么在这个方法执行过以后,Result 指的是什么?是IDtaSet的实例?IDtaSet是接口能这样用吗?为什么?谢谢!