Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
Asm/C++/Delphi/Py/PHP/VBA
 Аватар для Jin X
6812 / 2052 / 238
Регистрация: 14.12.2014
Сообщений: 4,304
Записей в блоге: 12
MS Access

Действия после добавления новой записи

05.06.2018, 00:51. Показов 1157. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
И снова здравствуйте!

Хочу выполнить некоторые действия после добавления новой записи.
В событии DataSet.AfterInsert запись ещё не имеет ключа (а он мне нужен).
В событии DataSet.AfterPost не понятно после чего произошло обновление – после создания записи или после редактирования. Действия же мне нужно выполнять именно после создания записи, а не редактирования...

Как это сделать?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
05.06.2018, 00:51
Ответы с готовыми решениями:

После добавления новой записи она не появляется в запросе
Доброй ночи. Нажимаю на TBNavigator'е кнопку Insert (+), в новой строке DBGrid'а ввожу информацию. Жму в навигаторе на Post (√)....

Позиционирование курсора в DBGrid после добавления новой записи
Доброго времени суток всем. Подскажите, пожалуйста, решение вот такой задачки: необходимо после добавления новой записи в таблицу БД...

DbAdvGrid: после добавления новой записи перенести указатель на новую запись
Добрый день! Прошу помочь с программой... Есть форма Планирование отбытия. С DBComboBox4 выбираем сотрудника, нажимаем кнопку...

4
Модератор
 Аватар для D1973
9917 / 6454 / 2455
Регистрация: 21.01.2014
Сообщений: 27,395
Записей в блоге: 3
05.06.2018, 03:27
указать какой-либо флаг, который будет взведен, если наступило событие добавления записи в БД. В событии AfterPost выполнить все действия только при взведенном флаге, после чего сбрасывать состояние флага обратно...
0
Asm/C++/Delphi/Py/PHP/VBA
 Аватар для Jin X
6812 / 2052 / 238
Регистрация: 14.12.2014
Сообщений: 4,304
Записей в блоге: 12
05.06.2018, 13:25  [ТС]
А если я добавил запись, а потом нажал "отменить"? И затем просто решил отредактировать запись. AfterInsert же всё равно сработает, а AtferPost – нет. В AfterEdit сбрасывать флаг?

Добавлено через 11 секунд
Других механизмов нет для этого?
0
Модератор
 Аватар для D1973
9917 / 6454 / 2455
Регистрация: 21.01.2014
Сообщений: 27,395
Записей в блоге: 3
05.06.2018, 14:19
Цитата Сообщение от Jin X Посмотреть сообщение
Других механизмов нет для этого?
Вот как бы я совсем не работаю с компонентами *Table... Привык все делать запросами без этих вот самых инсертов и постов... Поэтому затрудняюсь сказать более точно...
0
 Аватар для krapotkin
6849 / 4676 / 1464
Регистрация: 14.04.2014
Сообщений: 20,664
Записей в блоге: 21
05.06.2018, 15:31
Цитата Сообщение от Jin X Посмотреть сообщение
В событии DataSet.AfterPost
ну так узнайте что там было в событии DataSet.BeforePost

Добавлено через 16 секунд
свойство dataset.state
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
05.06.2018, 15:31
Помогаю со студенческими работами здесь

После добавления в БД новой строчки надо распечатать или просмотреть отчёт с новой строчкой по клику на кнопку
Вопрос такой: У меня Отчёт сделан с помощью rave ADOQuery1 подключен к RvDataSetConnection1 который подключен к RvProject1 После...

Не обновляется dbgrid после добавления или удаления записи
procedure TAddDealer.OKBtnClick(Sender: TObject); begin DataModule2.ADOdealers.Append; ...

Один столбец в DBGrid после добавления записи (очередное непонятное поведение)
Здравствуйте! В DBGrid порядка 10 полей. Некоторые из них не видны (DBGrid.Columns.Visible := False;). Теперь я добавляю новую...

После добавления записи, при клике на нее выскакивает системная ошибка: отсутствие данных в поле "чертеж"
Доброго времени суток! имеется вот такой код procedure TForm1.DBGrid1CellClick(Column: TColumn); begin if...

Кнопка добавления записи в Delphi
что нужно изменить чтоб кнопка добавления работала ??? вот код : unit Unit5; interface uses Windows, Messages,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru