Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

christianhess

Trabalhand com DLL

Recommended Posts

Não entendi muito bem o que voce quer, mais vou ver se ajudo :D

 

Ate onde sei, DLL é como escrever funcões (acho que ate classes, nunca testei, mas acho que pela logica pode) e depois usa-las como um arquivo externo, que é exatemente o que acontece.

No delphi voce vai em file-new-other-DLL Wizard, e la voce escreve as funcões normalmente, ex:

library TesteDLL;uses  SysUtils,Dialogs,  Classes;{$R *.res}function FuncaoTeste(dataNow: TDateTime):Boolean;stdcall;Var  data: String;Begin  data := '08/08/2005';  if (StrToDate(data) = dataNow) then  Begin    ShowMessage('Data hoje = '+DateToStr(dataNow)+'Data Funcao = '+data);    result := True;  end  else  Begin    ShowMessage('Datas nao coincidem  :P  ');    result := False;  end;end;ExportsFuncaoTeste;beginend.
Salva normal e compila, como uma nova aplicação mesmo.

Na unit que voce for precisar da funcao, logo acima de Implementation, escreve:

function ValidaSistema():Boolean;stdCall;external 'TesteDLL.dll';

Ps: Nesse ex, a DLL tem que estar no mesmo diretorio do projeto http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

É bom salvar o projeto da DLL em um outro diretorio diferente do seu projeto, ate pra na misturar os arquivos e ficar aquela lambaça. Feito isso, é so copiar a DLL para o diretorio do projeto a ser usado http://forum.imasters.com.br/public/style_emoticons/default/grin.gif

 

Espero ter ajudado http://forum.imasters.com.br/public/style_emoticons/default/shifty.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.