tabellen abgleichen

[Memo]

Code:

 
       while not QuelleTable.Eof do
       begin
         ZielTable.Append;
        for i:=0 to QuelleTable.FieldCount -1 do
          Try  ZielTable.Fields[i].Assign(QuelleTable.Fields[i]) except  end;
           ZielTable.Post;
          QuelleTable.Next;
       end;

Gegebenenfalls selbst an Bedürfnisse anpassen.