Две таблицы

Тема в разделе "Delphi - Базы данных", создана пользователем viktooor, 30 июн 2010.

Статус темы:
Закрыта.
  1. viktooor

    viktooor Гость

    У меня две таблицы(ADO). В одной таблице через Grid при нажатии Delete в навигаторе удаляеися строка. Нужно чтобы эта строка записывалась во вторую таблицу.
    Подскажите как это сделать
    С уважением Виктор
     
  2. VahaC

    VahaC Well-Known Member

    Регистрация:
    10 янв 2007
    Сообщения:
    116
    Симпатии:
    0
    перед удалением вставляйте данные из одной таблицы в другую при помощи insert into select

    вот пример
     

    Вложения:

  3. V88

    V88 Well-Known Member

    Регистрация:
    22 окт 2008
    Сообщения:
    51
    Симпатии:
    0
    Можно и на событие BeforeDelete у ADOTable1 прописать добавление текущей записи в ADOTable2:
    Код (Delphi):
    procedure TForm1.ADOTable1BeforeDelete(DataSet: TDataSet);
    begin
    ADOTable2.Append;
    for i:=0 to ADOTable1.FieldCount-1 do
    ADOTable2.Fields[i].Value:=ADOTable1.Fields[i].Value;//при условии, что ADOTable2 имеет точно такую же структуру, что и ADOTable1
    ADOTable2.Post;
    end;
    P.S. Я не проверял может сработает. Проверь.
     
  4. viktooor

    viktooor Гость

    V88
    Cпасибо за помощь
    Но у меня такая задача.
    В одной таблице навигатором выбираю позицию для удаления,
    Нужно данную позицию перенести в другую таблицу, а в первой таблице удалить ее.
    Весь вопрос в том, как перенести в другую таблицу только выбранную позицию.
     
  5. VahaC

    VahaC Well-Known Member

    Регистрация:
    10 янв 2007
    Сообщения:
    116
    Симпатии:
    0
    Вы мой пример смотрели??
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей