Здравствуйте мастера!У меня такая проблема:есть компонент TPageControl (несколько вкладок) у каждой вкладки(TabSheet1,TabSheet2...)есть свой DBGrid1,DBGrid2...и свой TTable1,TTable2...,а также свой DataSeurse1,DataSeurse2...мне надо сделать кнопочку BitBtn, чтобы запись при её нажати добовлялась в активную таблицу(вкладку),но почему то запись добовляется во все вкладки,может это из-за того, что у меня во всех TTable-ах одинаковое TableName(имя таблицы)?
Пишу так:

procedure TForm1.BitBtn1Click(Sender: TObject);
Begin
  case PageControl1.ActivPageIndex of
    1:IF Table1.Locate(StToInt(edit1.Text),[loCaseInsensitive])=true 
        then MessageDlg('совпадение',mtInformation,[mbok],0)
        else begin
          Table1.Insert;
          Table1.FieldByName('Год').AsInteger:=strtoint(Edit1.text);
          Table1.FieldByName('Автор').AsString:=Edit2.Text;
          Table1.FieldByName('Название литературы').AsString:=edit3.Text;
          Table1.FieldByName('Источник').AsString:=edit4.Text;
          Table1.FieldByName('Примечание').AsString:=Edit5.text;
          Table1.Post;
          Table1.Close;
          Table1.Open;
        end;

ит.д.с Table2.....
Я в делфи ещё новичёк,омогите пожайлуста.Niky