из 4 баз в одну

[Маша1993]

Помогите пожалуйста уже 2 недели не могу ничего сделать. Надо из 4 баз перекинуть все предметы в одну общую базу. в каждой базе разные предметы на 1 на 2 на 3 и на 4 курсе. Делаю через ADOTable1.Insert он мне закидывает оценки по предметам не в одну строку а вот так: 1 курс нормально, 2 курс идет ниже, и т.д. А через ADOTable1.Edit одну запись последнюю выдает либо зацикливается. Скину код может что то не правильно написала.

[evg_m]

// Form1.ADOTable1.Last; совершенно лишняя (Insert и без не работать будет)
while AdoXXX.eof do
  if Form1.ADoTable1.Locate(?????????) then // пытаемся в общей таблице найти нужную 
     Form1.ADOTAble1.Edit 
  else 
     Form1.AdoTable1.Insert;
  ......................
  form1.AdoTable1.Post;
  AdoXXX.Next;
end;

или же копируем все таблицы сразу
!!! порядок "склейки" как придется !!!

while (not ADO1.Eof) or (not ADO2.Eof) or (not ADO3.eof) do
begin
  Form1.AdoTable1.Insert;
  if not ADO1.Eof then begin
     ................//из первой
    ADO1.Next;
  end;
  if not ADO2.eof then begin
      ..................из второй
     ADO2.Next;
  end;
  if not ADO3.Eof then begin
     .................//из третьей
     ADO3.Next;
  end;

end;

[Маша1993]

не получается, вообще ничего не закидывает в общую базу. а что вы имели ввиду где Locate в общей таблице найти нужную?