| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Ошибка
Berg © (2002-12-15 16:48:00)При записи в БД необходимо проверить, не встречается ли в запись с таким же значением в конкретном поле (уникальное ключевое), делаю так:
...
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 17:01:00) [1]>Zz
Исключения нам даны не для того, что бы их обходить, а совсем для другого.
try
Table1.Post;
except
on E:........
begin
MessageDlg();
Table1.Cancel;
end;
end;
Reindeer Moss Eater (2002-12-15 16:52:00) [2]if StrToInt(Memo1.Lines.Strings[0])= Table1.FieldByName("NCom").AsInteger then
А почему делается вывод что нет такой записи???
Zz_ (2002-12-15 16:52:00) [3]Table1.FindKey
| |
