TechTips

A CodeGear anunciou o Delphi 2007 for Win32 para ser lançado em março, também conhecido como Spacely. Uma das novidades interessantes é a atualização do DbExpress, chamado de DBX4. O Steve Shaughnessy, líder da equipe de desenvolvimento de banco de dados para o Delphi, escreveu um post sobre essas novidades. Como também participei do desenvolvimento de alguns desses novos recursos, também quero falar um pouco sobre essas mudanças.

Componentes vs API

Ao pensarmos em DbExpress, pensamos primeiramente nos componentes de acesso à banco de dados. O TSqlConnection, TSqlQuery, e afins. É fácil de entender isso, pois até agora não existia uma API definida para utilizar facilmente o DBX sem ser através esses componentes. O que existia era uma interface COM exposta por drivers em DLLs, escritos em C++, que não era nem um pouco fácil de ser usada diretamente, e nem de escrever novos drivers. Isso afetava também o deployment de aplicações DbExpress, que precisavam levar junto as DLLs de cada driver que fosse eventualmente ser utilizado.

No DBX4 foi criada uma API definida, escrita em Delphi, com o mesmo código fonte para código nativo ou gerenciado, que pode ser utilizada diretamente na sua aplicação, ou indiretamente através dos componentes como antigamente, sem alteração alguma. Pra quem for recompilar sua aplicação em no Delphi 2007 for Win32, não vai ver nenhuma alteração na superfície. Quem for escrever uma aplicação nova, também não vai ver diferenças de imediato. Por baixo dos componentes, porém, começam as vantagens.

Drivers escritos em Delphi

Drivers podem agora ser escritos em Delphi, extendendo algumas classes diretamente. Não é mais necessário ter drivers em DLLs externas e ter que enviá-los com a sua aplicação. Drivers que forem escritos em Delphi podem simplesmente ser adicionados no uses da sua aplicação e compilados automaticamente. Se preferir carregar os drivers dinamicamente, você pode usar runtime packages e usar um LoadPackage() para carregar a BPL com o driver que quiser.

E os drivers para DBX3 que já tenho em DLLs? Eles continuam funcionando, através de um driver chamado Dynalink que carrega as DLLs e serve de ponte entre elas e a nova API, de forma transparente. Nessa primeira versão ainda estaremos distribuindo os oito drivers em DLLs, como na versão anterior, mas com melhorias e correções de problemas neles.

Delegate Drivers

O DBX também suporta o que são chamados de Delegate Drivers. Esses drivers podem ser usados no pré e pós processamento de qualquer método ou propriedade de um driver, e podem ser encadeados um após o outro. Delegate Drivers fazem alguma ação e delegam o comando para o driver real.

Dois Delegate Drivers que foram criados, que serão incluidos com todo o código fonte escrito em Delphi, são o TDBXTrace e TDBXPool. O TDbxPool dá a capacidade de pooling de conexões para o DBX, evitando a espera de criação e abertura de cada conexão, particularmente útil pra quem faz diversas conexões com o banco de dados, como em aplicações web.

Já o TDbxTrace permite monitorar todos os comandos que estão sendo passados para o driver (como o Sql Monitor), e, o mais interessante, gera código Delphi descrevendo todas as ações executadas (sendo possível compilar o código gerado e rodá-lo para repetir todas essas ações!). Um exemplo de saída desse driver dado pelo Steve:

{CONNECT        } Connection2.Open;
{COMMAND        } Command2_1 := Connection2.CreateCommand;
{COMMAND        } Command2_1.CommandType := Dbx.SQL;
{COMMAND        } Command2_1.Text := 'SELECT * FROM BASICDML order by F_VARCHAR';
{PREPARE        } Command2_1.Prepare;
{COMMAND        } Reader2_1_1 := Command2_1.ExecuteQuery;
{COMMAND        } Command2_2 := Connection2.CreateCommand;
{COMMAND        } Command2_2.CommandType := Dbx.MetaData;
{COMMAND        } Command2_2.Text := 'GetIndexes "workerbee:c:\database\employee.gdb"."sysdba"."BASICDML" ';
{COMMAND        } Reader2_2_1 := Command2_2.ExecuteQuery;
{COMMAND        } FreeAndNil(Command2_2);

Um código assim é bem mais fácil de acompanhar do que um log de baixo nível dado por um SQL Monitor. Outro ponto interessante é o fato desse monitoramento não estar fixo no framework – a flexibilidade: se o formato não for adequado para você, basta escrever um novo Delegate Driver, possivelmente partindo do código fonte deste já existente.

Delegate Drivers abrem possibilidades de diversos usos, como replicação, por exemplo. Quero ver o que a comunidade vai criar em cima disso.

Extended Commands

A saída do TDbxTrace dada como exemplo acima acaba apontando mais um novo recurso – os Comandos Extendidos. Anteriormente os CommandTypes aceitos por um driver eram restritos à uma query, stored procedure, ou uma table. Vários dados podem ser requisitados passando algumas parâmetros e representados em um resultset. Agora os drivers pode definir novos tipos de comandos extendidos que funcionam como queries, mas retornam esses dados. Veja que o log acima aponta o CommandType como sendo Dbx.MetaData, e usa uma “query” GetIndexes para retornar os indices de uma tabela.

DBX4

Esses são algumas das novidades da área de banco de dados com o DBX4 no Delphi 2007 for Win32, que acredito que vão cada vez mais permitir que novas e melhores coisas sejam feitas no futuro. Além disso estamos corrigindo bugs, melhorando o produto e trabalhando em coisas que ainda não estão prontas para serem divulgadas. Fique ligado para mais novidades.