В моем проэкте таблицы в Парадоксе, сделал так, для Аксеса аналогично.
Код:
//Добавление в таблицу Магазин 1
FormMag.DSMag1.DataSet:=FormMag.TabMag1;
FormMag.TabMag1.Last;
try
FormMag.TabMag1.AppendRecord([
DateTimePicker1.Date, //Дата
Edit7.Text, //Артикул
Edit1.Text, //Название
ComboBox1.Text, //Сезон
ComboBox2.Text, //Пол
Edit2.Text, //Материал
Edit3.Text, //Фирма
Edit4.Text, //Страна
StrToInt(Edit5.Text), //Количество
StrToInt(Edit6.Text)]); //Цена
except
MessageDlg('В поля формы введены недопустимые данные',
mtError,[mbOK],0);
Exit;
end;
Админ: Пользуемся тегами, при рецедиве последует БАН.