|
rta
Hola a todos: bueno me respondo yo, para quea alguie le sirva...
El problema era que no estaba haciendo bien la instanciación de los RDM, ahy que una propoedad get_rdmCHILD en la interface de MainRDM, y el codigo:
function TrdmMain.Get_rdmChild: IrdmChild;
begin
Result := rdmChildObjectFactory.CreateCOMObject(nil) as IrdmChild;
end;
donde rdmChildObjectFactory es una var global que va a estar en la Unit de rdmChild, en la parte de interface. Tambien vamos a necesitar el siguiente codigo en la parte de
initialization
...
rdmChildObjectFactory := TComponentFactory.Create(ComServer, TrdmChild, CLASS_rdmChild, ciInternal, tmApartment);
...
eso es todo...
Saludos
Julieta
|