Показать сообщение отдельно
  #4  
Старый 16.07.2011, 21:25
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,087
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

а какой тебе пример нужен???

Код:
If qryGuestList.FieldByName('GUEST_EXTENT').AsBoolean 
 Then qDelete.ExecSQL
  Else qUpdate.ExecSQL;

Соотв., еще надо поправить SQL в соотв. запросе. Можно сделать параметрический и протсо назначить параметры. Оба запроса должны отрабатывать по уникальному ключу, в этом случае даже если записи нет, то все будет нормально (в смысле, не будет сообщ. об ошибках и не испортишь другие записи).
Ответить с цитированием