редактировать запись в ADO

[Kara1989]

Необходима ваша помощь!!!
Ниже приведен код, по нему я делаю фильтрацию, если после фильтрации в ADO найдется запись, - надо ее просто редактировать,
а если нету никакой записи хотелось бы добавить новую запись
вот у меня не получается
можете ли хоть какой-то совет дать, а то у меня вообще не получается

var
m:integer;
begin
Form12.ADOTable1.Filtered:=False;
Form12.ADOTable1.Filter:='TabN='''+ Form2.ADOTable2.Fields[0].Text+'''';
Form12.ADOTable1.Filtered:=true;
m:=Form12.ADOTable1.RecordCount;
If m=1 then Form12.ADOTable1.Edit
else Form12.ADOTable1.Insert;
...........................
end;

[Gorychev]

Код правильный, а что Вас смущает?
ИМХО, вместо Form12.ADOTable1.Edit лучше открывать форму в которой можно редактировать данные, а вместо Form12.ADOTable1.Insert - форму добавления новых данных, а дбгрид сделать readonly:=true;.
B вот это "m:=Form12.ADOTable1.RecordCoun t" - лишнее(зачем вводить лишнюю переменную)

.............
If Form12.ADOTable1.RecordCount > 0 then ОТКРЫВАЕМ ФОРМУ РЕДАКТИРОВАНИЯ
else ОТКРЫВАЕМ ФОРМУ ДОБАВЛЕНИЯ ДАННЫХ;

[Kara1989]

если после фильтрации нету никаких записей, то можно с легкостью сохранить данные (добавлять новую запись и сохранять значения)
а если найдется запись, то так ругается:

ИЗМЕНЕНИЯ НЕ БЫЛИ УСПЕШНО ВНЕСЕНЫ ИЗ-ЗА ПОВТОРЯЮЩИХСЯ ЗНАЧЕНИЙ В ИНДЕКСЕ, КЛЮЧЕВЫХ ПОЛЯХ ИЛИ СВЯЗЯХ.
ИЗМЕНИТЕ ДАННЫЕ В ПОЛЕ ИЛИ В ПОЛЯХ, СОДЕРЖАЩИХ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ, УДАЛИТЕ ИНДЕКС ИЛИ ПЕРЕОПРЕДЕЛИТЕ ЕГО, ЧТОБЫ РАЗРЕШИТЬ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ, И ПОВТОРИТЕ ПОПЫТКУ

[Sparky]

а какая у вас СУБД?

[mihali4]

Сообщение от Kara1989

а если найдется запись, то так ругается:
ИЗМЕНЕНИЯ НЕ БЫЛИ УСПЕШНО ВНЕСЕНЫ ИЗ-ЗА ПОВТОРЯЮЩИХСЯ ЗНАЧЕНИЙ В ИНДЕКСЕ, КЛЮЧЕВЫХ ПОЛЯХ ИЛИ СВЯЗЯХ.
ИЗМЕНИТЕ ДАННЫЕ В ПОЛЕ ИЛИ В ПОЛЯХ, СОДЕРЖАЩИХ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ, УДАЛИТЕ ИНДЕКС ИЛИ ПЕРЕОПРЕДЕЛИТЕ ЕГО, ЧТОБЫ РАЗРЕШИТЬ ПОВТОРЯЮЩИЕСЯ ЗНАЧЕНИЯ, И ПОВТОРИТЕ ПОПЫТКУ

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