A estrutura do código fonte

Os programas em Delphi são formados por duas estruturas básicas: a interface do usuário e o conjunto de programação (as duas principais janelas do Delphi: Form1 e Unit1).

Na interface do usuário iremos "desenhar" como será visualmente o nosso programa, alocando nela componentes como botões, caixas de diálogo, imagens, animações, mostradores, etc. No conjunto de programação estarão os procedimentos (procedures) que representam as ações que os eventos executarão.

Ao iniciar um projeto novo, o Delphi já cria as seguintes linhas na Unit1:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs;

type
  TForm1 = class(TForm)
private
  { Private declarations }
public
  { Public declarations }
end;

var
  Form1: TForm1;

implementation
{$R *.DFM}

end.

Ainda é cedo para detalhar o que cada linha dessas representa. Por hora basta saber que a parte que "digitaremos" dos programas estará dentro do seguinte trecho:

implementation
{$R *.DFM}

//Aqui estará todo o código de funcionamento
//do nosso programa


end.

Vimos numa página anterior como um componente pode ser deslocado pela tela (ou formulário), usando uma programação simples, num botão. Voltemos a ela por um instante:

implementation
{$R *.DFM}

procedure
TForm1.Button1Click(Sender: TObject);
begin

  Tela.Left:= Tela.Left - 1;
end;

end.

A procedure TForm1.Button foi criada automaticamente quando solicitamos a criação de um evento para responder ao pressionamento do botão (Janela do Object Inspector, Events, OnClick).

O código da procedure começou em begin e terminou em end;. No Delphi, as linhas de programação precisam ter o ";" para indicar onde elas terminam. Uma linha de programa pode ser tão grande que não caiba numa única linha física. Duas ou mais linhas podem ser usadas, mas será o ";" que indicará onde está o fim de uma linha de programação.

Não se preocupe com isso, pois se esquecer algum desses detalhes, o Delphi, ao compilar o programa, irá emitir uma mensagem de erro e esperar pela sua correção. Tente compilar o programa do botão de deslocamento, retirando o ponto e vírgula da palavra "end;" que está logo depois da linha com os códigos referentes a propriedade Left, do componente Tela.

Nota: no caso de ser a última linha, antes do end;, provavelmente o Delphi irá "entender" que se trata da última linha e não acusará o erro.

O último end. (com o ponto final) indica que alí é o final do nosso programa. O que estiver depois dele não será sequer verificado pelo Delphi e não fará parte do programa compilado.

Mesmo dentro das procedures, ou fora delas, podemos escrever comentários sobre o que determinado trecho do programa faz, sem que isso seja considerado como parte do programa executável. Para definir um comentário usamos as chaves "{" e "}".

{Aqui está o código de encerramento do programa}
procedure Termina_programa;
begin
  Close; {Fim do programa}
end;

Ou duas barras:

// Aqui está o código de encerramento do programa
procedure
Termina_programa;
begin
  Close; //Fim do programa
end;



online