Se eu puder te ajudar.. te indico o componente que eu criei em:

http://sourceforge.net/projects/dddbxfacil/



2009/5/5 José Mário Silva Guedes <jmariogue...@gmail.com>

>
>
> Eu resolvi isto criando uma Unit com classes descendentes das classes que
> você citou...
>
> O que determinava qual seria utilizada era uma diretiva.
>
> Exemplo:
>
> {IFDEF BD_ADO}
> TMinhaQuey = class(TADOQuery)
> {$ENDIF}
>
> {$IFDEF BD_BDE}
> TMinhaQuery = class(TQuery)
> {ENDIF}
>
> //...
>
> end;
>
> O problema é que não pude mais espetar os componentes nos forms, tendo que
> criar em tempo de execução.
>
> var
> qMinhaQuery : TMinhaQuery;
> begin
>
> qMinhaQuery := TMinhaQuery.Create(Self);
> //...
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>  
>



-- 
Márcio F. Cruz


[As partes desta mensagem que não continham texto foram removidas]

Responder a