2

Criei uma DLL COM em c# VS2010 para ser distribuída com outra aplicação em Delphi.

Esta DLL faz apenas consumo em WEB Services.

Na máquina onde foi construída a DLL não ocorre erro. Mas nas distribuição quando é executado os métodos da DLL é retornado a mensagem:

O sistema não pode encontrar o arquivo especificado.

Isso é alguma configuração que deve ser executada na configuração da DLL?

Código da DLL

    public string RecepcionarLoteRps(string AEnderecoWebService, string AXmlEntrada)
    {
        string Retorno = string.Empty;
        try
        {
            ServiceReferenceAbrasfV201.nfseClient wsClient = new ServiceReferenceAbrasfV201.nfseClient("nfseSOAP1", AXmlEntrada);
            Retorno = wsClient.RecepcionarLoteRps(Cabecalho(), AXmlEntrada);
        }
        catch (Exception e)
        {
            Retorno = e.Message;
        }
        return Retorno;
    }

Código em Delphi para enviar os parâmetros a dll.

var
  LClientWBAws: IAbrasfV201_Interface;
  LRetorno: string;
begin
    LClientWBAws := CoAbrasfV201.Create;
    if (Pos('ConsultarLoteRpsEnvio', LEnviaArqXml) > 0) then
    begin
      LRetorno := LClientWBAws.Getnfse(ALayout.Parametros['EnderecoWebService'], LEnviaArqXml);
    end
    else if (Pos('CancelarNfseEnvio', LEnviaArqXml) > 0) then
    begin
      LRetorno := LClientWBAws.CancelarNfse(ALayout.Parametros['EnderecoWebService'], LEnviaArqXml);
    end
    else
    begin
      LRetorno := LClientWBAws.RecepcionarLoteRps(ALayout.Parametros['EnderecoWebService'], LEnviaArqXml);
    end;

end;
12
  • 1
    Provavelmente você tem que colocar dentro da DLL o arquivo de configuração do webservice.
    – Makah
    20/02/2014 às 14:07
  • Mas isso já esta la as configurações dos WSDLs
    – Ricardo
    20/02/2014 às 15:02
  • Coloque mais informações sobre seu erro. Ocorre uma exceção? Para quem o erro ocorre?
    – lsalamon
    20/02/2014 às 15:32
  • A DLL é ActiveX? 20/02/2014 às 15:55
  • Caramba pode ser tanta coisa, algumas coisas que pensei aqui: - Verifique que a dll foi realmente distribuída e esta na pasta que a aplicação espera que ela esteja. - Outra coisa que pode acontecer eh se sua dll tiver alguma referencia e essa referencia não estiver marcada para ser distribuída junto, então a sua dll esta indo, mas alguma dependência dela não. tem uma opção na referencia que diz "Copy Local" 20/02/2014 às 16:52

2 Respostas 2

2

Utilize o seguinte comando para registrar a DLL na máquina em que o arquivo não é encontrado:

regasm minhaDll.dll /tlb:minhaDll.tlb
1
  • Isso é executado na instalação.
    – Ricardo
    21/02/2014 às 12:11
0

Eu achei esses dois post com informações.

1) Exclusivo para delpi Exemplo em Delphi

2) Para Magic XPA, porém a ideia é semelhante. Exemplo de Magic

Passos: 1) No arquivo AssemblyInfo.Cs (dentro de properties) alterar o código abaixo para true

[assembly: ComVisible(true)]

2) Criar uma interface

[Guid("917979B5-2DC2-419C-A38F-46C23D01E587")]
[InterfaceType(ComInterfaceType.InterfaceIsIDispatch)]
public interface INota
{
    string EnviarNota(string chave);
}

3) Criar a implementação da classe.

[Guid("EDABAB76-CF5B-4674-BA94-925A7D811869")]
[ClassInterface(ClassInterfaceType.None)]
public class Nota : INota
{
    public string EnviarNota(string chave)
    {            
        return "Chave: " + chave;
    }
}

4) Vai nas propriedades do projeto > build > output > marca o check Register for COM interop

5) Criar um strong name, novamente propriedade do projeto > Sgning > marcar o check "Sing the assembly" > new > preencha os dados ... depois aparecerá um arquivo *.pfx na solução.

Feito isso a DLL está pronta para ser usada.

Agora é só registrar

1) Registrar no GAC use o comandano GacUtil /i nome_dll.dll

2) Registrar com o RegAsm : regasm /tlb:nome_tlb.tlb nome_dll.dll

Agora é só usar nos projetos Delphi ou Magic XPA conforme os posts.

Abraços.

0

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .