PowerSQLBuilder

PowerSQLBuilder - Delphi single units with 3 class TPowerSQLBuilder, TDataSQLBuilder and TSQLQuery.

O objetivo destas 2 unidades que trabalham em conjunto é simplificar a vida do programador que gera muitos códigos de scripts SQL na mão e não quer ficar preso a componentes de terceiros ou até mesmo componente DBWare do Delphi.

Exemplo de um Select :

SQL.Select('a.nome, b.grupo').From('animal a').LeftJoin('grupo b').&ON('b.id = a.id_grupo').OrderBy('nome');

Mais as maiores vantagens são os comandos Insert e UPDate.

Exemplo de um Insert : Tipos dos campos WideString, Double, TDateTime e Boolean.

SQL.Insert('clientes').Fields('nome, endereco, bairro, cep, estado, telefone, salario, data_nascimento, dependentes').Values; SQL.Field( Model.Nome ).Next;
SQL.Field( Model.Endereco ).Next; SQL.Field( Model.Bairro ).Next; SQL.Field( Model.Cep ).Next; SQL.Field( Model.Estado ).Next; SQL.Field( Model.Salario ).Next; SQL.Field( Model.Data_nascimento ).Next; <-- Não precisa se preocupar com Tipos SQL.Field( Model.Dependentes ).EndValues;

Exemplo de um Update :

SQL.Update('clientes').UpField('nome', Model.Nome ).Where('id').Equal( Model.ID );