Обновление товара

[Steil]

Не поможите дописать код, чтоб при нажатии кнопки добавить, количество (Edit2.Text); отнималось от всего колличества товара на складе('Sklad') и DBEdit5 сразу обновлялся.

Button4.Enabled := false;
DM.Table2.Open;
DM.Table2.Insert;
DM.Table2.FieldByName('Kod_zakaza') .AsInteger:=strtoint(Edit1.Text);
DM.Table2.FieldByName('Kod_tovara') .AsInteger:= strtoint(DM.Tovar.FieldValues['Kod_tovara']);

DM.Table2.FieldByName('Kolichestvo' ).AsInteger:= strtoint(Edit2.Text);