Показать сообщение отдельно
  #2  
Старый 15.11.2012, 20:26
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,087
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Например, создав соотв. запрос. Еще можно руками скопировать, типа так:
Код:
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) - работает.
Ответить с цитированием