Долгая предыстория.

Делаю я тут "триггер для бедных" - надо отследить удаление записи в форме и сделать еще несколько действий, желательно в транзакции.

Просто использовать событие Form_Delete не могу:
1. Во-первых удаление еще не произошло
2. Во-вторых оно может и не произойти - если удаляются несколько записей и пользователь нажмет "Нет" (при включенной опции "Подтверждение удаления записей")
3. В-третьих ни о какой транзакции нельзя и мечтать (патамушта Access 97)

Немного извращаюсь (упрощенный код):

Все хорошо, за одним НО: в форме остается запись "#Удалено#"
Requery в FormDelete не всунешь ("Операция не поддерживается в транзакции", причем транзакция - на моя, а скрытая аксесовксая). От безысходности всунул Requery в Current, т.е.

Уже лучше, но Requery не срабатывает при удалении последней записи, да еще какое-то странное моргание происходит. И текущая запись слетает (текущей становится первая).
Решил, что надо от всего этого избавиться.
Конец предыстории.

Чесал репу. Долго думал. Сделал совсем извратно.

Работает как часы. Удаленная запись из формы исчезает, текущая запись не портится, в общем все прекрасно. ГДЕ ЗАСАДА???
И почему это только при втором вызове Delete? Если только один Delete - то запись удаляется, "#Удалено#" остается (чего и следовало ожидать). Второй (хоть и заканчивается с ошибкой) - запись исчезает без следа.

Сори за длинный пост, но уж больно страшно такие фишки в рабочую програму втыкать не посоветовавшись с мировым сообществом.

2 Саныч
Про таймер я помню. Но блин реквери по таймеру... ужас... некрасиво.
К тому же мигает оно как-то гораздо больше одного раза. Опять некрасиво.
Вот так и живу - одно решение кривое, другое - страшное.

2 Виктор Сенин
Угу. SP2

Гео предупреждалВ onDelete что-то делать - смерти подобно
Угугу. Только я формочек всяких не открываю, Msgbox'ов не выкидываю, и вообще только с рекордсетами работаю. Должно справиться.

Саныч предлагалА все проверки делать ДО стирания.
А мне надо после :(
И Cancel = True у меня только для того, чтобы удаление самому сделать. И, помимо удаления что-то еще в данных подправить.

2 Erika
Выдели 10 записей и удали их таким образом.
Мало того что пользователь озвереет на кнопку Ок жать, там он еще в конце Отмену нажмет (когда сам аксес спросит "Не уверены ли вы что вы не хотите не удалять эти записи если да нажмите нет"). А ты все свои дела уже сделал...

2 Erika
Мне транзакция нужна не сама по себе, а именно чтоб аксесовское удаление записи в нее попало. А оно, к сожалению, в скрытом аксесовском workspace'е происходит.
В 2000-м и выше можно с Me.Recordset поиграть, а в 97-м - нет.

2 Саныч еще раз
Мне не надо отменять удаление.
Мне надо обеспечить увязать аксесовскую операцию (удаление записи) со своими. Обеспечить атомарность. Т.к. аксес и я работаем в разных workspace'ах, то приходится херить аксесовское удаление и делать свое (в моем workspace'е).

2 Mihonin
Ну вот, щас меня транзакциям будут учить

2 Erica & Саныч
Да не нужны мне проверки. Ненужныыыыыы
Мне трииггггееерррр нууужжжееееннннн!!!!

2 Erica еще раз
Ну убери Msgbox, и что?
Я писалон еще в конце Отмену нажмет (когда сам аксес спросит "Не уверены ли вы что вы не хотите не удалять эти записи если да нажмите нет"). А ты все свои дела уже сделал...
С этим как бороться?

Патамушта он может и не стеереееееееть.... (постепенно проваливаясь по уши в какое-то г..)

Саныч вопрошалА почему тогда ты не можешь доверить Аксессу стирать обычным образом?
А еще патамушта на событии Delete запись еще не удалена из базового набора, а после собственно удаления мне остается только таймер ловить.
Неужто действительно придется ID-шник удаляемой записи запоминать и самому себе говорить - "ЭТОЙ ЗАПИСИ НЕТ! НЕ ВЕРЬ ГЛАЗАМ СВОИМ!"
Так и придется видимо... (выныривая из какого-то г..)

2 Хам
Спасибо на добром слове.

2 Саныч
А если он не сотрет, то поставишь Cancel
Да где ж я его поставлю?
Все Form_Delete уже отработали, вся работа сделана, пришло BeforeDelConfirm, AfterDelConfirm не пришло (юзер отмену нажал). Что, опять таймер?

2 АлексейК
К сожалению нет.
Нужно кривой псевдоагрегат по составу документа считать. И, наплевав на нормализацию, сохранять его в родительской таблице (заголовке).

2 Саныч
А еще на событии OnDelete записи не блокированы. Так что я могу тупо на блокировку другим юзером нарваться, удаление опять таки не произойдет, а все что мне нужно уже посчитается. Тьфу на этот 97-й аксес.

А если отмена только стандартными средствами (а не твоими), то он в OnDelete и сам не придет
Еще как придет. И не один раз.

2 Саныч
Таки надо...

2 Хам
не получится триггер
на а97
проваливайся потихоньку в г....
Так ведь получился же. Только либо с артефактами в интерфейсе, либо с шаманством (двойное удаление из клона). Одно не хочется, другое страшно.

2 Erika
Это не меняет сути вопроса - сначала удалить, а потом спросить - надо ли удалять?
Вообще-то если собственное удаление аксеса отменить (и удалять самому), то и вопросов юзеру никаких не задастся. Чему я даже рад. См. абзацем ниже.

Поскольку при событии Form_Delete запись помещается во временный буфер
Зависит от настроек. Если включено "Подтверждение изменений записей" - то все удаление оборачивается в транзакцию (то, что ты буфером назвал(а)). Если отключено - то удаляется сразу после Form_Delete (правда, все равно в маленьких транзакциях).

А если передумал - в этом случае назад их уже не вернешь :0
В принципе да. Только практика показывает, что юзера автоматом жмут "Да", а потом уже думают - передумать или нет.

Можно сделать проще - забить на форме возможность удаления, и повесить на нее свою кнопку
См. ответ Гео ("И после этого учить пользователя...")

Вообще мне весь этот гемор совсем не по душе.
Во всех своих новых наработках я редактирование документа делаю во временных таблицах. И потом уже переношу их в основные. Единственный трабл при этом - предусмотреть возможность изменения тех же самых данных другим юзером.
Но иногда приходится чужие (унаследованные) куски кода модифицировать. Большую часть я уже переписал с нуля. Когда-нибудь и до этого куска дойду. А пока вот мучаться приходится.

2 Гео
Хотя, смех смехом, а резон в этом есть. Перехватывать все попытки удаления записи в форме (onkeydown, подмена пункта меню, свои кнопки в панели инструментов) и замена их на свои обработки со своим удалением. И резон, кстати, неплохой.
Вот вот. Я именно так и думаю. Только вместо того, чтобы перехватывать все что только можно и скрывать все возможные кнопочки, а так же возможность добавить эти кнопочки (т.е. запрещать настройку тулбаров), я пытаюсь словить и обработать одно событие, которое при всех этих действиях происходит. Пока не особо успешно :(.

2 Сенин Виктор
Да что там юзеры. Я сам поначалу в винде отключал перемещение файлов в корзину (при удалении) - типа зачем оно мне. При этом автоматически включался вопрос. Дык точно так же на автомате "Да"... и волосы рвать . Так что теперь все в корзину без вопросов.
Жалко что нельзя такую же корзину в аксесе сделать.

2 assa
Form_AfterDelConfirm плох тем, что:
а) Его может и не быть - если подтверждения выключены (и этого уже достаточно чтобы зарубить использование этого события)
б) Честно говоря, я не помню, попадает ли аксес в Form_AfterDelConfirm при нажатии "Отмена"
в) не дай бог накопить чего лишнего на событии Delete

2 Erika
Да понимаю я, что можно сделать полностью свое удаление.
Но не буду я переопределять аксесовский интерфейс.
Говоришь только кнопкой Delete? А Ctrl-X у тебя пользователи никогда не нажимают? Что мне, Ctrl-X тоже обрабатывать, причем еще и в буфер обмена данные писать ?
Да и мало ли чего они еще могут придумать.
Или придется объяснять юзерам, что это такая вот чудо формочка, из нее нельзя в буфер обмена записи вырезать.... не хочу я им ничего объяснять... лучше буду пытаться аксесовкие события использовать по их прямому предназначению. не получится совсем - тады ой.

Хороший вопрос
фак :(((

2 Нуф-Нуф
Твой совет помог.
Вообще ниче не понимаю.
Теперь и совсем без Requery работает, и записи пропадают. Пойду чесать репу.

2 Саныч по поводу буфера обмена
Таки при отмене аксесовского удаления в буфер копируется. О как!