Copie mis fuentes para otro directorio, todas las units, inclusive mi archivo GBL_Server_TLB. Criei un nuevo RemoteDataModule, del tipo:
RDM_PCP, Internal e taApartment(coClassName,Instancing y Threading Model). Quando criei, mi _TLB ok, sin problema. Fue hacia IRDM_Principal y criei un metodo ReadOnly, llamado RDM_PCP que es el nombre de mi RemoteDataModule que yo criei. Yo tengo un RDM_Principal, que es(RDM_Principal, Multiple Instance y Apartment). Este es el principal. Siempre que crio un otro RDM Internal, yo crio um metodo asi:
Código Delphi
[-]function Get_RDM_Pedidos: IRDM_Pedidos; safecall;
Y su implementacion es asi
Código Delphi
[-]function TRDM_Principal.Get_RDM_Pedidos: IRDM_Pedidos;
begin
Result := RDM_PedidosFactory.CreateComObject(nil) as IRDM_Pedidos;
Result.RDMServer := Self;
SetarConexao(Result, IRDM_Pedidos, TRDM_Pedidos);
TRDM_Pedidos(GetObject(Result, IRDM_Pedidos, TRDM_Pedidos)).RodaComponente;
end;
Que pasa es que con el nuevo RDM_PCP me lo da un error asi:
Undeclared Identifier "Get_RDM_PCP", pero no hay ningun Get_RDM_PCP en mi RDM_Principal declarado. So yo voy y pongo manualmente, me lo da un error asi:
Undeclared Identifier "RDM_Server", en este codigo
Código Delphi
[-]function TRDM_Principal.Get_RDM_PCP: IRDM_PCP;
begin
Result := RDM_PCPFactory.CreateComObject(nil) as IRDM_PCP;
Result.RDMServer := Self;=>Error aqui
SetarConexao(Result, IRDM_PCP, TRDM_PCP);
TRDM_PCP(GetObject(Result, IRDM_PCP, TRDM_PCP)).RodaComponente;
end;
Que devo hacer, para resuelver esto?