Buscar por:

Gravando dados localmente em formato xml

Código

{Gravando dados localmente em formato XML

Por Thiago Macedo de Sousa

Para essa operação vamos utilizar um componente chamado ClientDataSet da paleta DataAcess.

Cole no seu formulário: 1 ClientDataSet, 1 DataSource, 1 DBGrid e 2 Botões.

Ligue o DBGrid com o DataSource e DataSource com o ClientDataSet. Dê um click duplo no ClientDataSet para abrir o editor de campos, click com o botão direito do mouse no editor de campos vá em NEW FIELDS e adicione os campos que você desejar os campos deverão ser do tipo DATA.

Depois de adicionado todos os campos click com o botão direito do mouse no ClientDataSet e click na opção CREATE DATASET. Pronto sua estrutura de dados já está criada. Nesse instante já será possível visualizar no DBGRID sua estrutura assim como na figura abaixo.

Altere a propriedade Caption de um dos botões para Gravar e do outro para Recuperar. No onClick do Botão GRAVAR coloque o comando:

}

ClientDataSet1.SaveToFile(‘C:Nome_Do_Arquivo.xml’, dfXML);

{

No onClick do Botão Recuperar coloque o comando:

}

ClientDataSet1.LoadFromFile(‘C:Nome_do_Arquivo.xml’);

{

Pronto. Agora é só testar. Digite valores no GRID Click em salvar, feche o programa abra de novo e verifique que seus dados são persistentes.

Olhe também fisicamente no seu HD o arquivo que foi gerado. Ele é um arquivo XML comum que poderá ser visualizado até mesmo em seu browser.

Obs.: Em tempo de projeto a estrutura de dados fica armazenada em memória, ou seja, se você quiser criar uma outra estrutura de dados diferente terá de colar no formulário outro componente (ClientDataSet).

Sobre o Autor 

Thiago Macedo de Sousa

Estudante de Sistema de Informação na UNIC - Universidade de Cuiabá.

Programador Delphi 7. Atualmente trabalhando com DBExpress e IntraWEB 

}