Problemas com DLL Delphi

[Marcos Guedes]

Pessoal, estou criando uma DLL em Delphi a qual precisa utilizar funções existentes em outra DLL, também feita em Deplhi.

O problema está exatamente em utilizar estas funções pois não estou conseguindo.
Alguém poderia me ajudar?

Desde já, agradeço a atenção dos colegas.

[talysson_22]

Coloca sua dll junto com a dll que esta sendo criada, e utiliza as funcoes utilizando o stdcall no final de cada função.

[talysson_22]

Caso não funcione utilize o recurso de acesso a DLL do LoadLibrary.

Código de Exemplo:

Código:

var
  HDll: THandle;
  MinhaFuncao: procedure (X: Integer); {$IFDEF WIN32} stdcall; {$ENDIF}
begin
  HDLL := LoadLibrary('MinhaDLL.dll'); // carrega a dll na variavel
  if HDLL > 0 then begin // se carregou com sucesso
    @MinhaFuncao := GetProcAddress(HDLL,'MinhaFuncao'); // procura o metodo na dll

    if @MinhaFuncao = nil then begin // se encontrou o metodo na dll
      Application.MessageBox('Não foi possível carregar o método "MinhaFuncao" em MinhaDLL.dll.', 'Atenção', MB_OK + MB_ICONERROR);
    end;


    MinhaFuncao(1); // chama o metodo pela variavel que por sua vez irá chamar o método na dll

    FreeLibrary(HDll); // libera da memoria a dll
  end else begin
    Application.MessageBox('Não foi possível carregar a DLL "MinhaDLL.dll", Verifica se a DLL está junto ao executável do sistema.', 'Atenção', MB_OK + MB_ICONERROR);
  end;

[Marcos Guedes]

Obrigado, Talysson!
Problema resolvido!