Вычитание из таблицы

[Cheser]

есть 3 формы и у каждой формы по таблице:
1)содержит(товар) id1, имя, завод, производителя, год выпуска, количество штук, класс и цену
2)содержит(наличие) id2, кол-во упаковок, кол-во штук в 1 упаковке, id1
3)содержит(продажи) id3, дату продажи, цена, количество штук, id1
вопрос как сделать что бы из 1таблицы вычиталась 3таблица по количеству штук?
желательно примерный код

[D-mon]

Какие компоненты используешь?
И что значит "вычиталась"??? Та нужна разница записей таблицы или чтобы в таблице 1 не показывались записи из твблицы 3???

[Apostol13]

S := ADOTable1.Fields.Fields[Номер столбца].AsString;
// или же
S := ADOTable1.Fields.Fields[Номер столбца].AsInteger;

потом загоняем ето все в цикл >>> но если значение столбца Str то обязательно переходим к StrToInt и обратно на вывод IntToStr

for i:=0 to [нужное значение] do
  begin
    for k:=0 to [нужное значение] do
          begin
                ADOTable3.Fields.Fields[Номер столбца].AsInteger:=
                                 (ADOTable1.Fields.Fields[Номер столбца].AsInteger)
                              -  (ADOTable2.Fields.Fields[Номер столбца].AsInteger)
               k:=k+1;
          end;
  end;