Ошибка

← →
Berg (2002-12-15 16:48) [0]

При записи в БД необходимо проверить, не встречается ли в запись с таким же значением в конкретном поле (уникальное ключевое), делаю так:
... Table1.Append; ... if StrToInt(Memo1.Lines.Strings[0])= Table1.FieldByName("NCom").AsInteger then ShowMessage("В БД есть под таким номером!") else // если нет то запись Table1.FieldByName("NCom").AsInteger:=StrToInt(Memo1.Lines.Strings[0]); ...

Появляется упомянутая ошибка, помогите разобраться, что здесь не так?

← →
Reindeer Moss Eater (2002-12-15 16:52) [1]

if StrToInt(Memo1.Lines.Strings[0])= Table1.FieldByName("NCom").AsInteger then

А почему делается вывод что нет такой записи???

← →
Zz_ (2002-12-15 16:52) [2]

Table1.FindKey

← →
Reindeer Moss Eater (2002-12-15 17:01) [3]

>Zz
Исключения нам даны не для того, что бы их обходить, а совсем для другого.

try
Table1.Post;
except
on E:........
begin
MessageDlg();
Table1.Cancel;
end;
end;

Ошибка Найти похожие ветки