* В следующем примере демонстрируется, как отобразить
CREATE TRIGGER ON customer FOR DELETE AS delTrigger()
SET MULTILOCKS ON
?CURSORSETPROP("buffering",5)
LOCATE FOR customer.cust_id = "ANTON"
DELETE
?TABLEUPDATE(.T.)
?TABLEREVERT()
PROCEDURE delTrigger
IF customer.title = "Owner"
=MESSAGEBOX("Company belongs to customer, cannot be deleted!")
RETURN .F.
ENDIF
* пользовательский текст для триггера, хранящегося в
* процедуре, когда режим буферизации установлен с помощью
* функции CURSORSETPROP( ).
Новое на сайте
-
Обновлен портфель программиста
Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский) -
Новые примеры программ
Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2) -
Обновленна справка
Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.