Conteúdo dos arquivos PAS, DFM e DPR


Conteúdo do arquivo UPrincipal.pas

 

Declaração
da unit

unit UPrincipal;

 

 

Inteface

Interface

 

Uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics,

  Controls, Forms, Dialogs, StdCtrls;

 

Type

  TFPrincipal = class(TForm)

    Button1: TButton;

    procedure Button1Click(Sender: TObject);

  Private

    { Private declarations }

  public

    { Public declarations }

  end;

 

var

  FPrincipal: TFPrincipal;

 

 

Implementação

implementation

 

uses ULabel;

 

{$R *.dfm}

 

procedure TFPrincipal.Button1Click(Sender: TObject);

begin

  FLabel.ShowModal;

end;

 

 

Finalização

da unit

end.

 

- Declaração da unit : Nessa seção tem a definição do nome da Unit, note que ele é igual ao nome dado a Unit no momento que a mesma foi salva.

 

- Interface : A definição do formulário, assim como de outros componentes e tipos, podem ser vistos nessa seção.  Aqui informamos os procedimento, funções, variáveis, constantes, entre outros, que serão definidos junto aos componentes e tipos.  Ela ainda se divide nas seguintes cláusulas:

 

- Uses : Aqui são colocadas bibliotecas externas à Unit, mas que são necessárias para a compilação da mesma.  O Delphi incorpora automaticamente bibliotecas necessárias para o uso dos componentes instalados nele, mas outras devem ser implementadas pelo próprio programador.

 

- Type : Essa cláusula é responsável por receber os objetos da Unit, incluindo-se a declaração da classe do formulário.  Os procedimentos, funções, variáveis e constantes do formulário podem ser declarados como:

 

- Private : Os campos de dados, métodos (procedimentos  e funções de um objeto) e objetos declarados nessa área só poderão ser acessados pela própria Unit.

 

- Public : Os campos de dados, métodos e objetos declarados nessa área poderão ser acessados tanto pela própria Unit como por outras Units.

 

- Var : Aqui devem ser declaradas as variáveis publicas da Unit, além dos objetos  que serão instanciados tal como o formulário.

 

- Implementation : O desenvolvimento das funcionalidades dos métodos declarados nos objetos devem ser feitos entre nessa seção.

 

Observação1

Dentro da seção Implementation tem outra cláusula uses que foi inserida pelo Delphi no momento que implementamos a chamada do Form FLabel.  Basicamente a cláusula uses da seção Interface referência as bibliotecas que serão usadas na definição do formulário, outros componentes e tipos.  Já a uses que fica na seção Implementation faz referencia as bibliotecas que serão usadas na funcionalidade dos métodos.

Observação2

Embora utilizemos as chaves para delimitar comentários em uma ou várias linhas, no caso do código {$R *.dfm} o Delphi reconhece como uma diretiva de compilação.  Nesse caso essa diretiva está informando o arquivo que contém as configurações do formulário e dos componentes colocados neles.  Esse arquivo tem o mesmo nome da Unit (UPrincipal.pas), mudando apenas a extensão (UPrincipal.dfm).

 

- Finalização da unit : Essa seção finaliza a Unit, o que for colocado após ela será desprezado pelo compilador.

 


Conteúdo do arquivo UPrincipal.dfm

 

object FPrincipal: TFPrincipal

  Left = 0

  Top = 0

  Caption = 'FPrincipal'

  ClientHeight = 206

  ClientWidth = 339

  Color = clBtnFace

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -11

  Font.Name = 'Tahoma'

  Font.Style = []

  OldCreateOrder = False

  PixelsPerInch = 96

  TextHeight = 13

  object Button1: TButton

    Left = 136

    Top = 112

    Width = 75

    Height = 25

    Caption = 'Button1'

    TabOrder = 0

    OnClick = Button1Click

  end

end

 

Esse arquivo contém as propriedades, eventos vinculados e grau de dependência dos objetos declarados na Unit UPrincipal.pas.

 

Podemos ver que o objeto Button1 está declarado dentro do objeto FPrincipal, isso indica que o FPrincipal é o objeto pai do Button1.

 


Conteúdo do arquivo CursoDelphi.dpr

 

Declaração
do programa

program CursoDelphi;

 

 

Units que
compõem o
aplicativo

Uses

  Forms,

  UPrincipal in 'UPrincipal.pas' {FPrincipal},

  ULabel in 'ULabel.pas' {FLabel};

 

{$R *.res}

 

 

Inicio da
execução do
programa

Begin

  Application.Initialize;

  Application.CreateForm(TFPrincipal, FPrincipal);

  Application.CreateForm(TFLabel, FLabel);

  Application.Run;

end.

 

 

- Declaração do programa : Nome do aplicativo que será executado.  Semelhante a Unit, o nome dado ao Project no momento que foi salvo é o mesmo que está indicado como nome do programa nessa seção.

 

- Units que compõem o aplicativo : Todas as Units usadas no projeto são declaradas nesse ponto.

 

Observação

Nessa seção temos a diretiva de compilação {$R *.res}, nesse caso ele se refere ao arquivo de recursos (ícone, título e versão da aplicação são algumas das opções que podem existir nesse arquivo).

 

- Inicio da execução do programa : Essa seção inicializa o aplicativo, instância os formulários e em seguida executa o aplicativo.

 

Este artigo foi cedido por http://www.cassic.com.br/