Form.DontAskDelete
Отключить подтверждения удаления

Вызов метода Form.DontAskDelete отключает предупреждение при удалении записи.

Предупреждение выводится после вызова метода Form.Apply в режиме Mode=emDelete. Если программа не содержит обработчика OnOkClick, то метод Form.Apply вызывается при нажатии на кнопку ОК.

Пример:

Procedure DeletePay(Id : Integer);
Var
  F : DocPay;
Begin
  F := CreateForm('DocPay', emDelete, Id);
  F.DontAskDelete;
  F.Apply; 
End;

Описание режимов смотри в статье Form.Apply.

© RTIT