Se estivermos falando de DataSets quaisquer, descendentes de TDataSet, não vejo outra alternativa ao seguinte trecho de código sugerido:
function CompareDataSets(ds1, ds2: TDataSet): boolean; begin Result := true; if Result then CheckSameStructure(ds1, ds2); if Result then CheckSameRecordCount(ds1, ds2); if Result then CheckSameData(ds1, ds2); end; Daí, implementaria-se o código de cada uma das funções chamadas em CompareDataSets(). Não existe meio inteligente que, com poucas linhas de código, resolva seu problema. A chamada sugerida parece ser simples, mas a implementação de todas as funções chamadas internamente pode necessitar de boas centenas de linhas de código. Fora isto, não existe uma maneira 'mágica' de fazer isso usando poucas linhas de código. Boa sorte. Sds. ________________________________ De: delphi-br@yahoogrupos.com.br [delphi...@yahoogrupos.com.br] em Nome de José Mário Silva Guedes [jmariogue...@gmail.com] Enviado: segunda-feira, 15 de junho de 2009 8:42 Para: Delphi BR - Grupo de Discussão Assunto: [delphi-br] Comparar dois DataSets Olá amigos! Há uma forma fácil de comparar dois DataSets para verificar se são iguais? Por iguais entende-se se contêm os mesmos resgistros, com as mesmas colunas etc. Obrigado, -- José Mário Silva Guedes Analista Programador Delphi . [As partes desta mensagem que não continham texto foram removidas]
