Alguien puede explicarme como funciona realmente un DataSet?

[Sirkius]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
begin
   IBTable1.Active:=True;
   While not ClientDataSet1.Eof do
   begin
      IBTable1.Insert;
      For i := 0 to 8 do
         IBTable1.Fields[i].Value := ClientDataSet1.Fields[i].Value;
      ClientDataSet1.Next;
      IBTable1.Post;
   end;
   IBTable1.Active:=False;
end;

Así mejor