Tabela Virtual

Delphi

27/05/2003

Pessoal, alguém sabe como posso armazenar dados em uma espécie de tabela virtual??


Earmarques

Earmarques

Curtidas 0

Respostas

Cruz

Cruz

27/05/2003

Visite meu site [url=http://www.jczdesign.com]JCZ Design Fotografia[/url]
Coloque um TClientDatase no form onde quer criar a tabela.
Crie os campos manualmenete.
No evento OnCreate do form escreva o código abaixo.
procedure TForm1.FormCreate(Sender: TObject);
var
  s: string;
begin
  s:= ExtractFilePath(Application.ExeName)+´tmp.cds´;
  ClientDataSet1.FileName:= s;
  ClientDataSet1.CreateDataset;
  ClientDataSet1.SaveToFile(s);
  ClientDataSet1.Open;
end;

obs. Toda vez que o form for criado a tabela também será recriada e todos os dados nela armazenados serão apagados.
Este tipo de tabela só funciona em máquinas que possuem o Midas.dll que é instalado pelo Delphi.


GOSTEI 0
POSTAR