加个接口过程不就行了吗
如:
procedure TTestDataModule.Open(var vStr : OleVariant);
begin
//
//根据进来的参数对Database和Dataset做设定
//
Database.Open ;
Dataset.Open ;
end;
如:
procedure TTestDataModule.Open(var vStr : OleVariant);
begin
//
//根据进来的参数对Database和Dataset做设定
//
Database.Open ;
Dataset.Open ;
end;
TO Raptor(猛禽),但是TTable组件好象不可以.