[Oleghka777]

Здравствуйте нужна помощь. Надо при нажатии правой кнопки на строку в dbgrid чтобы всплывало popup меню опция "востановить" и при нажатии на нее данные из записи востанавливались в таблицу1 dbgrid отображает данные из таблицы2 атрибуты все одинаковые в таблицах нюанс заключается в том чтобы скопировать именно выделенную строку и все значений атрибутов кроме конечно ключевого так как при его копировании возникнет ошибка буду вам признателен за помощь!

[NumLock]

Сообщение от Oleghka777

нюанс заключается в том чтобы скопировать именно выделенную строку и все значений атрибутов

не нужно делать Next/Prior для DataSet, а вот для Fields как раз цикл нужен с условием исключающим ключ. хотя ключ наверняка нулевой и тогда все еще проще будет.

[Oleghka777]

Я прошу прощение если можно по подробней с каким-нибудь простеньким примером.

[MiraLaklamon]

Сообщение от Oleghka777

Я прошу прощение если можно по подробней с каким-нибудь простеньким примером.

Простенький пример:

Код:

var
  i: Integer;
begin
  Table1.Append;
  for i := 0 to Table2.FieldCount-1 do
  begin
    if not (Table2.Fields[i] is TAutoIncField) then
    begin
      Table1.FieldByName(Table2.Fields[i].Name).Value:=Table2.Fields[i].Value;
    end;
  end;
  Table1.Post;
end;