Quick Tips : Trabalhando com DLL

Nesta Quick Tips, irei mostrar a utilizaç�o da DLL.

Primeiramente precisamos criar uma aplicaç�o em Delphi e monte a seguinte estrutura.

Adicione 5 LabelsEdit e um Bot�o

Faça as seguintes implementaç�es na Unit.


unit uPrincipal;
 
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;
 
const
 DllData = 'Data_DLL.DLL';
 
type
  TFrmPrincipal = class(TForm)
    EdtDiadoMes: TLabeledEdit;
    Button1: TButton;
    EdtDiadaSemanaAbreviado: TLabeledEdit;
    EdtDiadaSemana: TLabeledEdit;
    EdtData: TLabeledEdit;
    EdtDataCompleta: TLabeledEdit;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  FrmPrincipal: TFrmPrincipal;
 
  {Funç�es da DLL  }
  function DiadoMes: String; stdcall; external DllData;
  function DiadaSemanaAbreviado: String;stdcall; external DllData;
  function DiadaSemana: String; stdcall; external DllData;
  function Data: String; stdcall; external DllData;
  function DataCompleta: String; stdcall; external DllData;
  {Funç�es da DLL  }

Obs: Foi criado uma const com o nome da DLL para ficar mais f�cil a manipulaç�o, caso voc� mude o nome ou o local da DLL n�o ter� que alterar em todas as declaraç�es apenas na constante.

External: Indica que esta funç�o esta associada em outro meio, no nosso caso uma DLL.

No Click do Bot�o


 
procedure TFrmPrincipal.Button1Click(Sender: TObject);
begin
  EdtDiadoMes.Text             := DiadoMes;
  EdtDiadaSemanaAbreviado.Text := DiadaSemanaAbreviado;
  EdtDiadaSemana.Text          := DiadaSemana;
  EdtData.Text                 := Data;
  EdtDataCompleta.Text         := DataCompleta;
end;

Ao final termos o resultado

Conclus�o

Com a utilizaç�o de uma DLL podemos deixar nosso execut�vel menor, dependendo da quantidade de m�todos que nossa DLL tenha, deixar o c�digo desacoplado, reutiliz�vel em outros sistemas, tendo assim uma portabilidade muito grande.

Exemplo de outros M�todos que poder�amos colocar em nossa DLL, validar CPF / CNPJ, retornar o IP ou nome da M�quina, fazermos algum calculo espec�fico entre outras.

Espero que tenham gostado desta seq��ncia de 3 Quick Tips.

Fico por aqui at� a pr�xima Quick Tips.

Trabalhando com DLL - Parte 1

Trabalhando com DLL - Parte 2

Um abraço

Quick Tips : Trabalhando com DLL - Parte III

Nesta Quick iremos ver conceito de DLL, finalidade e onde usar, além de montarmos um exemplo prático e usar a DLL

Conclus�o

Artigos relacionados