Olá, tenho uma aplicação em delphi que faz o seguinte: Faz uma consulta no banco PostGreSQL utilizando os componentes Zeos TZQuery/TZConnection, em seguida percorre o resultado gravando-o em outra tabela, tabela essa com colunas idênticas as das colunas geradas da consulta anterior.
Funciona, porém, a quantidade de registros é muito grande e percorrer todos esses registros 1 a 1 leva muito tempo. Eis que eu resolvi dividir esse trabalho de percorrer o DataSet utilizando threads, mas parei em um problema que é o seguinte:
Não consigo criar novas instâncias da tabela (DataSet), sendo assim não consigo trabalhar o paralelismo. Alguém tem uma ideia de como resolver isso?
Trecho de como estou executando e como tentei executar respectivamente:
qry := TZQuery.Create(nil);
qry := DM.Qry_Levantamento;
--------------
qry := TZQuery.Create(nil);
qry.Assign(DM.Qry_Levantamento);
Também pensei em fazer tudo isso por Query, mas ainda não levei isso adiante pois não sei se dá pra aplicar esse paralelismo SQL. Obrigado!