Какая-то хрень.. Методом тыка пришел к такому изменению:
Код:
1 2 3 4 5 6 7 8 9 10 11 12 | DM . ADOtab2 . Append;
dm . ADOtab2[ 'name_kat' ]:=cbb2 . Items . Strings[ 0 ];
DM . ADOtab2[ 'name_kn' ]:=edt2 . text;
DM . ADOtab2[ 'avtor' ]:=edt3 . text;
DM . ADOtab2[ 'god' ]:=edt4 . text;
dm . ADOtab2[ 'name_file' ]:=edt5 . text;
dm . ADOtab2[ 'tip_file' ]:=edt6 . text;
dm . ADOtab2[ 'data' ]:=date();
dm . ADOtab2 . Post;
dm . ADOtab2 . Edit;
dm . ADOtab2[ 'name_kat' ]:=edt1 . Text;
dm . ADOtab2 . Post;
|
Т.е. сначала сделал запись с точно существующей позицией, потом открыл для изменения и заменил на новую... И все работает.. Мне плевать, на сколько ужасно это выглядит, но зато работает, а другого мне и не надо )