vms Postado Agosto 30, 2009 Denunciar Share Postado Agosto 30, 2009 olá pessoal, tenho essa dll feita em c++ builder que preciso usar no projeto em Delphi, mas não estou conseguindo usar. alguém pode dar uma ajuda?esse é o codigo da dll feita em C++builder#include <vcl.h> #include <windows.h> #pragma hdrstop #pragma argsused int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved) { return 1; } extern "C" __declspec(dllexport)String VMSCriptografar(String Senha) { int x,y; String NovaSenha, result,Chave; Chave = "mykey" ; for (x = 1; x <= (Chave.Length()); x ++) { NovaSenha = ""; for(y = 1; y <=(Senha.Length()); y ++) NovaSenha = NovaSenha + char( ((int)(Chave[x]) ^ (int)(Senha[y]))); Senha = NovaSenha; } return Senha; } tentando usar a função VMSCriptografar //chamando a função procedure VMSCriptografar (Senha : String);cdecl; external 'VMScpp.dll' name '@VMSCriptografar$qi'; //usando a função Edit4.Text := VMSCriptografar(Edit4.Text); dar esse erro [Error] UOS.pas(308): Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter' tentei assim basiada na dica do Jhonas http://scriptbrasil.com.br/forum/index.php...5540&hl=dll Edit1.Text := VMSCriptografar(PChar(Edit2.Text));e dar o mesmo erroalgem pode da uma ajuda? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 rickayron Postado Agosto 31, 2009 Denunciar Share Postado Agosto 31, 2009 olá pessoal, tenho essa dll feita em c++ builder que preciso usar no projeto em Delphi, mas não estou conseguindo usar. alguém pode dar uma ajuda?esse é o codigo da dll feita em C++builder#include <vcl.h> #include <windows.h> #pragma hdrstop #pragma argsused int WINAPI DllEntryPoint(HINSTANCE hinst, unsigned long reason, void* lpReserved) { return 1; } extern "C" __declspec(dllexport)String VMSCriptografar(String Senha) { int x,y; String NovaSenha, result,Chave; Chave = "mykey"; for (x = 1; x <= (Chave.Length()); x ++) { NovaSenha = ""; for(y = 1; y <=(Senha.Length()); y ++) NovaSenha = NovaSenha + char( ((int)(Chave[x]) ^ (int)(Senha[y]))); Senha = NovaSenha; } return Senha; } tentando usar a função VMSCriptografar //chamando a função procedure VMSCriptografar (Senha : String);cdecl; external 'VMScpp.dll' name '@VMSCriptografar$qi'; //usando a função Edit4.Text := VMSCriptografar(Edit4.Text); dar esse erro [Error] UOS.pas(308): Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter' tentei assim basiada na dica do Jhonas http://scriptbrasil.com.br/forum/index.php...5540&hl=dll Edit1.Text := VMSCriptografar(PChar(Edit2.Text));e dar o mesmo erroalgem pode da uma ajuda?olade uma olhada nesse post talvez te ajude.http://www.devmedia.com.br/articles/viewcomp.asp?comp=7902ate mais Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 vms Postado Agosto 31, 2009 Autor Denunciar Share Postado Agosto 31, 2009 olade uma olhada nesse post talvez te ajude.http://www.devmedia.com.br/articles/viewcomp.asp?comp=7902ate maisA minha DLL foi criada no C++Builder e preciso usa-la no delphi.Essa dica é para uma DLL criada no delphi. Não é o meu caso. Mas obrigado pela atenção.Fico espenrando outras dicas. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 rickayron Postado Agosto 31, 2009 Denunciar Share Postado Agosto 31, 2009 olade uma olhada nesse post talvez te ajude.http://www.devmedia.com.br/articles/viewcomp.asp?comp=7902ate maisA minha DLL foi criada no C++Builder e preciso usa-la no delphi.Essa dica é para uma DLL criada no delphi. Não é o meu caso. Mas obrigado pela atenção.Fico espenrando outras dicas.a criaçao de dll é para exportar determinados codigos em linguagens para serem usadas em outras linguagens nesse caso não há diferente uso uma do vb no delphi nessa mesma sintese ate mais Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 vms Postado Setembro 1, 2009 Autor Denunciar Share Postado Setembro 1, 2009 tentei fazer por aquele tutorial mas dar esse erro---------------------------CM.exe - Ponto de entrada não encontrado---------------------------Não foi possível localizar o ponto de entrada do procedimento VMSCriptografar na biblioteca de vínculo dinâmico VMScpp.dll. ---------------------------OK --------------------------- Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
vms
olá pessoal, tenho essa dll feita em c++ builder que preciso usar no projeto em Delphi, mas não estou conseguindo usar. alguém pode dar uma ajuda?
esse é o codigo da dll feita em C++builder
tentando usar a função VMSCriptografar dar esse erro [Error] UOS.pas(308): Incompatible types: 'String' and 'procedure, untyped pointer or untyped parameter' tentei assim basiada na dica do Jhonas http://scriptbrasil.com.br/forum/index.php...5540&hl=dlle dar o mesmo erro
algem pode da uma ajuda?
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.