Olá Josimar, Já fiz algo parecido, mas sem criar novos componentes. A intenção era fazer os sistemas poderem suportar novos bancos de dados sem intervenções significativas no código.
O que fiz foi deixar de usar componentes específicos de acesso a dados (DBX, ADO etc) na maior parte do programa e utilizar apenas Datasets de memória (TjvMemoryData do Jedi). Os componentes específicos de acesso a dados (1 de conexão e 1 de query) ficam num TDataModule que implementa uma interface (IDatabaseManager) que contem as operações típicas de um database. A interface pode ser vista a seguir: http://pastebin.com/dFFeTsnj (essa URL vai expirar em 1 mês) Numa unit compartilhada por todo o programa, declaro uma variável global do tipo dessa interface: var databaseMgr: IDatabaseManager = nil; Num local apropriado, inicializo a variável com o Datamodule específico para determinado Database. (Este é o único ponto do programa que deve fazer referência ao datamodule específico.) Ex: dmDatabase := TdmDataBaseSqlite.create(nil); dataBaseMgr := dmDataBaseSqlite; Para cada novo banco de dados que for preciso suportar, um novo Datamodule que implemente IDatabaseManager será criado. A seleção do Datamodule que será incluído na compilação pode ser feita com Defines ou criando-se um DPR para cada banco de dados. O uso, por exemplo para popular o MemoryData de um formulário é feito assim: databaseMgr.openDatasetQuery(memoryDataCliente, 'SELECT * FROM Cliente WHERE idCliente='+inttostr(idCliente)); Outros exemplos: databaseMgr.startTransaction; try databaseMgr.ExecSql('update Tabela set campo=campo+1'); databaseMgr.commitTransaction; except databaseMgr.rollbackTransaction; raise; end; {...} barraFerramentas.visible := databaseMgr.getQueryValue('select mostrarBarraFerramentas from Configuracoes')='1'; É preferível não usar dialetos específicos de SQL para facilitar a transição entre bancos de dados. Mas se algo específico é necessário, pode ser colocado em Views ou StoredProcedures. A idéia no meu caso não foi desenvolver uma infraestrutura preparada para qualquer problema futuro, mas criar o mínimo necessário para atingir os objetivos imediatos e evoluir a estrutura conforme a necessidade. Espero ter te ajudado a planejar a sua solução. Um abraço, Dirlei Dionísio Novo artigo: Quando utilizar soluções de contorno http://MaisQueBomCodigo.blogspot.com Em Qua, 2010-06-02 às 09:11 -0300, Josimar Zimermann escreveu: > > Bom dia programadores! > > Aqui na empresa estamos iniciando o desenvolvimento de uma nova > tecnologia interna utilizando os componentes de conexão ZEOS. > > O nosso objetivo é criar uma suíte de componentes baseados no ZEOS > que > carregarão dinamicamente as consultas/comandos SQL de acordo com o > banco > de dados do cliente (ORACLE, MySQL, PostgreSQL). > > Ainda estamos pensando onde vamos armazenar as consultas/comandos SQL > para depois carregá-las dinamicamente. > > A minha questão: alguém tem alguma experiência com esta espécie de > projeto (conexão com diferentes bancos de dados e carregamento > dinâmico > de SQL) ? > O que os senhores sugerem? Tem alguma experiência com esta espécie de > projeto ? > > Qualquer sugestão ou informação será bem-vinda! > > Obrigado! > > Josimar Zimermann
