Mapeamento TMS Aurelius

Mapeamento Objeto-Relacional Usando o TMS Aurelius
Desenvolver sistemas com banco de dados é um dos usos mais comuns do Delphi. Porém lidar com comandos SQL pode ser uma tarefa enfadonha. Em geral, ao construirmos um sistema de banco de dados, o processo é geralmente o mesmo:
1. Configurar uma conexão
2. Criar um TSQLQuery ou outro descendente de TDataset que execute comandos SQL
3. Montar o comando SQL e executá-lo via TSQLQuery
4. Abrir o TDataset e varrer os registros lendo os valores usando objetos TField
Tem sido mais ou menos assim desde o início do Delphi e obviamente é um método consagrado - mas tem suas desvantagens. Temos que montar o SQL manualmente e lembrar os nomes dos campos e tabelas no banco, tanto na hora de montar a SQL quanto na hora de ler os valores. Se fizermos um refactor do banco, temos que rever todos os nossos comandos SQL.
Como alternativa, podemos usar uma framework de mapeamento objeto-relacional. Com ela, o processo é diferente: nós fazemos um mapeamento inicial, para informar como cada classe será salva no banco de dados e, a partir daí, não trabalhamos mais com SQL ou TDataset: manipulamos apenas os objetos. O objetivo deste artigo é mostrar como usar uma framework de mapeamento objeto-relacional pra construir aplicações de bancos de dados. A framework utilizada será o TMS Aurelius
(http://www.tmssoftware.com/site/aurelius.asp).

Criando uma conexão
A primeira coisa a se fazer é configurar uma conexão ao banco de dados. O TMS Aurelius não exige que você aprenda quase nada de novo aqui, porque na verdade ele não tem componentes de conexão ao banco de dados – ele simplesmente utiliza os que você tem na sua aplicação. São disponibilizados
“adapters” onde você apenas passa o componente de conexão que você utiliza. A listagem 1 mostra como obter uma conexão do Aurelius a partir de uma conexão dbExpress.
Listagem 1 – Criando uma conexão uses Aurelius.Drivers.Interfaces, Aurelius.Drivers.dbExpress;
var