Boa Tarde
No meu ponto de vista acredito que ficaria mais fácil você tratar estas
informações persistindo dados no formato xml caso você esteja utilizando o
ClientDataSet o mesmo tem a capacidade de salvar e recuperar dados em um
arquivo de dados no formato DataPackageXML.
Para fazer isso, você adiciona dois novos componentes, OpenDialog e
SaveDialog da palheta Dialog, acrescente tambem na cláusula Uses, a
biblioteca DBClient.
Ai então basta você acrescentar um botão para executar a geração do arquivo
no formato xml e outro para obtenção dos dados.
.. salvar XML
procedure TForm1.btSalvarXMLClick(Sender: TObject);
begin
if SaveDialog1.Execute then
begin
DM.CdsConsTeste.SaveToFile(SaveDialog1.FileName,dfXML);
end;
end;
..Ler dados XML
procedure TForm1.btSalvarXMLClick(Sender: TObject);
begin
if SaveDialog1.Execute then
begin
DM.CdsConsTeste.LoadFromFile(SaveDialog1.FileName,dfXML);
end;
end;
Espero ter ajudado!!
---------------------------------
Abra sua conta no Yahoo! Mail, o único sem limite de espaço para armazenamento!
[As partes desta mensagem que não continham texto foram removidas]
