Fórum Tabela Virtual #162696

27/05/2003

0

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


Earmarques

Earmarques

Responder

Posts

27/05/2003

Cruz

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.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar