Visualizando o Delta do ClientDataSet

Delphi

17/05/2005

Bom dia,
Estou inserindo, alterando, excluíndo dados no BD por um ClientDataSet. Queria visualizar o Delta deste ClientDataSet em um DBGrid. como eu faço isso?


Seu_madruga

Seu_madruga

Curtidas 0

Respostas

Kotho

Kotho

17/05/2005

você pode criar um botão e colocar esse código no OnClick dele; ou então, pode colocar no AfterPost do ClientDataSet de origem:

1) Coloque um ClientDataSet, sem vinculá-lo a nada
2) Coloque um DataSource, e conecte-o ao ClientDataSet
3) Coloque um DBGrid, e conecte-o ao DataSource
4) Digite o código:

  if ClientDataSet1.ChangeCount > 0 then
  begin
    if ClientDataSet2.Active then
      ClientDataSet2.Active := false;

    ClientDataSet2.Data := ClientDataSet1.Delta;
    ClientDataSet2.Active := true;
  end
  else
    ClientDataSet2.Active := false;



GOSTEI 0
POSTAR