Например, создав соотв. запрос. Еще можно руками скопировать, типа так:
Код:
var
I : Integer;
begin
DBGrid2.DataSource.Append;
For I := 0 To DBGrid1.DataSource.FieldsCount-1 do
DBGrid2.DataSource.Fields[i].Value := DBGrid1.DataSource.Fields[i].Value;
DBGrid2.DataSource.Post;
DBGrid1.DataSource.Delete;
end;
Не для всех типов полей прокатит, но для элементарных (integer, varchar, char, date, etc) - работает.