Hizo una Insterfave llamada IBaseRemote.En esta Interface, crie una property llamada RDMServer. El que pasa es que en mi RDM_Principal, yo no consigo llamar la property. Da error de Undeclared Identifier. El error estás en la linea
Result.RDMServer := Self;
Código Delphi
[-]function TRDM_Principal.Get_RDM_Cadastros: IRDM_Cadastros;
begin
Result := RDM_CadastrosFactory.CreateComObject(nil) as IRDM_Cadastros;
Result.RDMServer := Self;
SetarConexao(Result, IRDM_Cadastros, TIRDM_Cadastros);
TIRDM_Cadastros(GetObject(Result, IRDM_Cadastros, TIRDM_Cadastros)).CriaComponentes;
end;
Que tengo que hacer?