Conhecendo Delphi - Estrutura de Units - Conceitos - Introdução

Classe: Definição de tipo dos objetos, modelo de objeto.

Objeto: Instância de classe, variável cujo tipo é uma classe.

Atributos: Variáveis de instância, são os dados de um objeto.

Métodos: Funções e procedimentos de um objeto.

Propriedades: Apelido usado para evitar o acesso direto aos atributos de um objeto, onde podemos especificar métodos que serão usados para ler e atribuir seus valores a esses atributos.

Estrutura de Units

Ao criar uma nova Unit Observe:

Unit: A primeira declaração de uma unit é seu identificador, que é igual ao nome do arquivo.

Interface: Seção interface, onde ficam declarações que podem ser usadas por outras Units.

Uses: Na cláusula uses fica a Lista de Units usadas.

Type: Na cláusula type fica a definição de tipos, aqui temos a declaração da classe do Form.

Var: Na cláusula var são declaradas as variáveis, aqui temos a declaração da instância do Form.

Implementation: Na seção implementation ficam as definições dos métodos.

End: Toda Unit termina com um end a partir de onde qualquer texto é ignorado.

Variáveis Globais

Declaradas da Interface da Unit. Podem ser acessadas por qualquer Unit usuária.

exemplo:

varI: Integer;
sUsuario: string;
nA, nB, nSoma: Double;
bOk: Boolean;

Variáveis Locais

Só existem dentro do método, não podem ser acessadas de fora, mesmo que seja na mesma Unit. Na verdade essas variáveis são criadas quando o método é chamado e destruídas quando ele é finalizado

exemplo

procedure TForm1.Button1Click(Sender: TObject);
var
sAux: string;
begin
Aux := EdtA.Text;
EdtA.Text := EdtB.Text;
EdtB.Text := Aux;
end;

Comentários

Existem 3 tipo de comentário no Delphi, como mostrado abaixo.

(* Comentário *){ Comentário }// Comentário 

Estruturas de Decisão

If - (SE) usada para realizar instruções em determinadas condições
Exemplo:
if idade < 18 then  ShowMessage('de maior')
else  ShowMessage('de menor');


case - (CASO)Permite que o fluxo da execução seja desviado em função de várias condições de acordo com o valor do argumento
var
  iPosicao:integer;
  sOrdem:string;
begin
  case iPosicao of    1: sOrdem:= 'primeiro';
    2: sOrdem:= 'segundo';
    3: sOrdem:= 'terceiro';
  end;
end;

Estruturas de Repetição
While

O laço while executa uma instrução até que uma condição seja falsa.

I := 10;
while I >= 0 dobegin  ShowMessage(IntToStr(I));
  Dec(I);
end;

For

O laço for executa uma instrução um número determinado de vezes, incrementando uma variável de controle automaticamente a cada iteração. 

for I := 1 to alunos do
  ShowMessage('Este é o aluno n° ' + IntToStr(I)  );
Repeat

O laço repeat executa instruções até que uma condição seja verdadeira.

repeat
  S := InputBox('Acesso', 'Digite a senha', '');
until
 S = 'senha';

With

Usado para facilitar o acesso às propriedades e métodos de um objeto.

with Objeto do  begin    Name := 'nomeObj';
  end;

Funções

Funções são muito semelhantes a procedimentos a única diferença é que as funções retornam um valor. O tipo do valor de retorno deve ser informado no cabeçalho da função. Na implementação da função deve-se atribuir o valor de retorno à palavra reservada Result ou ao identificador da função. Pode-se então usar a função em expressões, atribuições, como parâmetros para outras funções, em qualquer lugar onde o seu valor possa ser usado.

function Soma(A, B: Integer): Integer;
begin  Result := A + B;
end;

Métodos

Métodos são funções ou procedimentos que pertencem a alguma classe, passando a fazer parte de qualquer objeto dessa classe. Na implementação de um método precisamos indicar qual a classe à qual ele pertence. Para chamar um método em algum lugar não pertencente à sua classe, como procedimentos, funções ou métodos de outras classes, deve ser indicado o objeto que deve executar o método. Os métodos usam os mesmos níveis de encapsulamento dos atributos.

procedure MostraMsg(sMensagem:string);

begin

  ShowMessage(sMensagem);

end.