BPL em Delphi

Materia publicada no site: http://www.portaldaprogramacao.com/artigos2.asp?n=882

Run Time:

O Delphi tem como padrão , carregar alguns pacotes no momento da execução do aplicativo. No entanto podemos optar por carregar os pacotes em arquivos separados ou anexados ao executavel .Uma das desvantagens deste tipo de pacote é o executavel ficará com alguns Kb a mais.Embora , não será preciso carregar outros arquivos com a sua aplicação como .pas ou .bpl. Pois estes estaram concatenados com o seu aplicativo.

Exemplificando:

- Abra o Delphi.
- Va no menu File > New > Application
- Insira no form um label , um botao e um edit
- Salve
- Compile o programa

Note que o programa ficou com o tamanho de 367 Kb

"Note que a janela files do nosso pacote se divide praticamente em duas partes contains e requires. Contais é os arquivos que contem o pacotes são os “modulos utilizados “. Ja requires são as bibliotecas (pacotes) que esses modulos precisaram para executar"

- Agora va no menu Project>Option
- Selecione a aba Packages
- Marque o check Build With Runtime Packages
- Apage toda a linha
- Digite vcl;rtl (que são a bibliotecas que comtem os objetos padrão)
- Precione o botão Ok
- Recompile o programa

Agora o programa ficou com 16 Kb. O Delphi retirou do codigo do executavel as demais bibliotecas desnecessarias .Deixando só as que foram informadas a vcl e a rtl, nas quais contem os objetos padões utilizdos em praticamente qualquer aplicação.

Podemos verificar tambem a existencia dos pacotes de Desing Time, esses pacotes tem por finalidade carregar objetos para a IDE do Delphi.




Pratica:

No nosso exemplo iremos criar um from no qual ira pedir ao usuario uma senha e um login.

- Menu File
- New
- Application
- Adicione dois labels e dois edits
- Adicione tambem um botão
- Troque o caption dos labels respectivamente para usuario e senha
- Troque o caption do botão para ok
- Salve o aplicação o fonte com o nome de untlogin.pas e o projeto de prjlogin.dpr
- Compile e feche o projeto

- Menu File
- New
- Other
- Na aba New selecione Package
- Ira abrir uma janela , precione o botão add
- Va na pasta onde voce salvou o untlogin.pas e selecione-o

- Salve o pacote com o nome de Login60
- Clique no botão compilar. O pacote ira mostrar um erro , clique no botão Ok que ele ira adicionar um novo pacote a sua aplicação a vcl.
- Procure o arquivo Login60.bpl e login.bcp (\arquivos de programas\borland\delphi6\bin) e mova para a pasta que esta os fontes do pacote
- Salve e feche o pacate

O pacote estara pronto para uso tanto estaticamente como dinamicamente.


Usando pacote estaticamente:

- Menu File
- New
- Application
- Project|Options
- Packages
- RunTime Packages
- Precione o botão add
- Selecione o arquivo login60.bcp
- Va no form selecione o evento onshow e digite
frmlogin:=Tfrmlogin.create(application);
try
frmlogin.showmodal;
finally
freeandnil(frmlogin);
end;
- abaixo da seção implementation digite
uses untsenha;

O pacote esta anexado ao executavel estaticamente

Autor: Rafael Ferreira