Artigo Clube Delphi 110 - Curso de Delphi Prism – Parte 3

Curso de Delphi Prism – Parte 3

Novidades da Linguagem – Classes parciais,  Tipos anônimos e Métodos de extensão

Classes, objetos, propriedades automáticas e Generics

  As classes fazem parte da vida do desenvolvedor Delphi desde a sua primeira versão. Mas as coisas não eram simples no tempo do Pascal. Para quem lembra, tínhamos que fazer algo como na Listagem 1. Este fragmento de código foi retirado de um projeto que desenvolvi ainda nos tempos acadêmicos (1996), disponível com os fontes em no meu site no CodeCentral da Embarcadero (veja seção Links). Dados e funcionalidade ficavam separados, fazíamos um record para guardar os dados de uma entidade, depois uma variável file para gravar o record no disco e um buffer de memória para manipular o registro. E separadamente, os procedures para manipular esses dados.

Listagem 1. Records, variáveis globais e programação estruturada

TCliente = record

  codigo: integer;

  ai: char; // undelete à moda antiga

  nome: string39;

  ...

var

Fclientes : file of TCliente;

Bclientes : TCliente;

...

Procedure open_Fclientes;

Procedure close_Fclientes;

Procedure Cria_Fclientes;

Procedure zera_cli;

Procedure menu_cli;

Procedure mostra_cli;

O suporte a objetos veio no Turbo Pascal 5.5, com a inclusão da palavra-chave object. Basicamente podíamos colocar os procedures que trabalhavam com os dados do record dentro do próprio record (que então virou object). Mais tarde, no Delphi 2, a palavra-chave foi renomeada para class, por questões óbvias, convenção que permanece até hoje, inclusive no Prism e C#. O record ainda existe, e evoluiu, podemos no Prism colocar procedures dentro de records. E em algumas versões do Delphi for .NET também. Ele é usado ainda hoje quando queremos criar estruturas que são passadas por valor, e não por referência, como o que acontece no caso de classes.

  Tudo bem, mas o que isso tem a ver com esse curso? Novamente, estamos olhando para o passado para entender o presente e futuro. Vamos ver como seria minha antiga classe "