Вниз
Скачать: CL | DM;

Присвоение значения для поля с автоинкрементом   Найти похожие ветки 

 
Евген ©   (2002-10-28 17:46) [0]

Мастера, помогите плз.!!! Суть проблемы: есть форма ввода информации о партнере в БД. Из нее вносится запись в таблицу Paradox. Есть поле FirmID - автоинкремент. Делаю так:

DM.FIRMS.Active:=true;
DM.FIRMS.Append
DM.FIRMSFName.Value:=EditFirmName.Text;
DM.FIRMSFAdress.Value:=EditFirmAdres.Text;
DM.FIRMSFCity.Value:=EditFirmCity.Text;
DM.FIRMSFPhone.Value:=EditFirmPhones.Text;
DM.FIRMSFEMail.Value:=EditFirmEMail.Text;
DM.FIRMSFPerson.Value:=EditFirmPersone.Text;
DM.FIRMSFDolg.Value:=0;
DM.FIRMSFCoeff.Value:=1;
DM.FIRMS.Post;

Т.е. вношу все данные кроме FirmID.
В ответ получаю сообщение что поле DM.FIRMSFirmID должно иметь значение. Хотя в другой форме этого же проекта вставка таким способом работает на "ура".


 
MsGuns ©   (2002-10-28 19:11) [1]

Если определено как AutoInc, то по идее должно работать. Хотя я слышал многократно (хотя сам в Парадоксе избегаю такой тип), что именно в этом формате автоинкремент часто глючит, иногда делая таблицу неспособной к добавлению. Лечится выборкой по всем полям с неповторяющимися ключами, чисткой родной таблы и добавлением из Answer всех записей.


 
Евген ©   (2002-10-29 10:49) [2]

Дело в том, что база пока еще пустая, и я пытаюсь ее заполнить. При вводе первой записи оно и заглючило. Повторюсь, что ввод данных в другую таблицу с автоинкрементным полем из этой же БД проходит нормально способом изложенным выше.


 
ЮЮ ©   (2002-10-29 11:31) [3]

Может DM.FIRMSFirmID.Required стоит True ? Тогда это сообщение BDE!


 
Евген ©   (2002-10-29 13:21) [4]


> ЮЮ ©

Да, действительно. Поменял в false - все ОК! Большое спасибо!



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c
1-59282
Dekabrist
2002-11-03 23:21
2002.11.18
Как сделать autorun в Делфи?


3-59035
Vityanya
2002-10-30 01:59
2002.11.18
НЕ работает БД


1-59148
GIL
2002-11-08 05:26
2002.11.18
TreeView и база данных


1-59202
Corte ™
2002-11-06 13:36
2002.11.18
Кто нить знает ???


1-59199
avl_nkz
2002-11-06 13:22
2002.11.18
метод наискорейшего спуска




   Наверх