Как имитировать автоинкрементное поле в дбф?

← →
Пубертанец (2003-10-27 10:03) [0]

Как имитировать автоинкрементное поле в дбф?

Пишу:
insert into some_table (id, xxx, yyy) values
((select max(id)+1 from some_table), 5, 6)

а он не ругается но вставляет только правильное значение id, а поля ххх и ууу остаются пустыми.

← →
paul_k © (2003-10-27 10:10) [1]

естественно ругается
в "values" нельзя использовать подзапросы
query.sql.text = "select max(id) from table"
query.open
if query.fielfs[0].isnull
then newid:=1
else newid:=query.fielfs[0].aSInteger+1
query.close
query.text:="insert into some_table (id, xxx, yyy) values
("+inttostr(newId)+", 5, 6)

http://delphimaster.net/view/3-1066293532/

Как имитировать автоинкрементное поле в дбф? Найти похожие ветки