Delphi - 復制在 DBGrid 上選擇的記錄並將其插入到另一個 ADO 表中

Question

所以我試圖將某個選定的記錄/活動記錄從 DBGrid（當然通過 TDataSource 組件連接到 ADO 表）復制到另一個 ADO 表中，但我不知道如何處理這個？

所涉及的兩個數據庫完全相同，只是名稱和用途不同。

在此先感謝您的幫助！

親切的問候 PrimeBeat

Answer 1

procedure TfrmEntry.Copy(tblSource: TADOTable; tblDest: TADOTable);
var
  i:integer;
begin
    tblDest.Open;
    tblDest.Append;
    tblSource.Open;
    for i := 0 to tblSource.FieldCount -1 do
    begin
        tblDest.Fields[i].AsString := tblSource.Fields[i].AsString;
    end;
    tblDest.Post;
end;