Delphi Sources

Проверка изменения данных таблицы


В обработчике события формы OnClose вы можете поместить следующий код:


if Table1.State in dsEditModes then
  if MessageDlg( 'Сохранить изменения?', mtInformation, [mbYes, mbNo], 0 ) = mrYes then
    Table1.Post
  else
    Table1.Cancel ;