Удаление записей в таблице Delphi

@Stifler135 · Регистрация: 07.03.2017

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

У в MS Access создан запрос на выборку из нескольких таблиц (К одной таблице добавил пару связанных записей из других таблиц). Этот запрос подключен к DBGrid в Delphi. Все выводится, можно редактировать, но почему то нельзя удалить запись, выдает ошибку "Недостаточно сведений о ключевом столбце для обновления". Можно ли как то удалять записи из запроса?

@D1973 · 02.12.2017, 13:14

Сообщение от Stifler135

Можно ли как то удалять записи из запроса?

Какой смысл удалять записи из запроса (а точнее - из результата выполнения запроса, если что...) Тут либо удалять записи в базе и "перезапрашивать", либо перестраивать запрос с учетом только нужных данных...

@Stifler135 · 02.12.2017, 13:22 **[ТС]**

Так из обычно таблицы удаляет, но проблема в том что я выбираю пункт из DBGrid, а в нем же запрос. Есть таблица и запрос, в запросе на 2 поля больше, можно ли как то при выборе пункта в DBGrid (с запросом) удалять соответствующее поле в таблице?

@D1973 · 02.12.2017, 13:59

ДБГрид только отображает тот набор данных, которые Вы получаете запросом. Как там может быть "на 2 поля больше"? Если Вам не нужны эти два поля для вывода, то есть два пути:
1. Выбирайте только нужные поля из таблицы БД
2. Делайте динамический набор столбцов ДБГрида в соответствии с количеством полей запроса

@Stifler135 · 02.12.2017, 14:10 **[ТС]**

Есть таблица(Discussion) и запрос(Discussion2). DBGrid подключен к запросу(Discussion2) т.е. при удалении я выбираю в нем строку из запроса, а удалить мне нужно строку из таблицы(Discussion), ибо из запроса удалить нельзя. Как реализовать что при выборе строки в гриде с запросом(Discussion2), выбиралась и строка в таблице(Discussion). Таблиц(Discussion)а так же подключена к проету.

@kavasaka · 04.12.2017, 14:21

Сообщение от Stifler135

Как реализовать что при выборе строки в гриде с запросом(Discussion2), выбиралась и строка в таблице(Discussion)

Так по значению поля idDiscussion и выбирай строку, это поле и в запросе и в таблице одно и тоже.

@Stifler135 · 04.12.2017, 15:32 **[ТС]**

Как это сделать? SQL Запросом?

@kavasaka · 04.12.2017, 16:17

Да.

@Stifler135 · 04.12.2017, 16:19 **[ТС]**

Можете подсказать пример запроса

@kavasaka · 04.12.2017, 16:38

В аксесе в конструкторе делаешь, потом его в делфи копипастишь.

Добавлено через 7 минут

SQL
1
2
3
DELETE Discussion.*, Discussion.idDiscussion
FROM Discussion
WHERE (((Discussion.idDiscussion)=2));

вот вроде этого в кавычках текст программы, потом вместо 2 поставляешь переменную или текущее значение поля датасета.
или через параметр.

@Stifler135 · 04.12.2017, 17:06 **[ТС]**

Как то так? Ваша 2 это значение IDDisscussion или что?

Delphi
1
2
3
4
x:=Form_dm.TDiscussion1.FieldByName('IDDiscussion').value;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('DELETE Discussion.*, Discussion.idDiscussion FROM Discussion WHERE (((Discussion.idDiscussion)=x))');
ADOQuery1.Open;

Так выдает ошибку "Параметр х не имеет значения по умолчанию". Если ставлю там конкретное число то ошибка "текущий поставщик не поддерживает возврат нескольких наборов записей в результате выполнения одной операции"

@D1973 · 04.12.2017, 17:38

1.

Delphi
1
ADOQuery1.ExecSQL;

, а не Open...
2.

Delphi
1
ADOQuery1.SQL.Add(Format('DELETE Discussion.*, Discussion.idDiscussion FROM Discussion WHERE Discussion.idDiscussion=%d', [x]));

Но это при условии, что х-целочисленная переменная.
Если х - переменная строковая, тогда так:

Delphi
1
ADOQuery1.SQL.Add(Format('DELETE Discussion.*, Discussion.idDiscussion FROM Discussion WHERE Discussion.idDiscussion=%s', [QuotedStr(x)]));

@Stifler135 · 04.12.2017, 17:53 **[ТС]**

Все заработало, большое вам спасибо.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Stifler135 1 / 1 / 0 Регистрация: 07.03.2017 Сообщений: 34

	Удаление записей в таблице Delphi 02.12.2017, 13:02. Показов 6087. Ответов 12 Метки dbgrid, delphi 7, записи, запросы, обновление, ошибка, удаление (Все метки) У в MS Access создан запрос на выборку из нескольких таблиц (К одной таблице добавил пару связанных записей из других таблиц). Этот запрос подключен к DBGrid в Delphi. Все выводится, можно редактировать, но почему то нельзя удалить запись, выдает ошибку "Недостаточно сведений о ключевом столбце для обновления". Можно ли как то удалять записи из запроса? 0

@Stifler135 1 / 1 / 0 Регистрация: 07.03.2017 Сообщений: 34
	02.12.2017, 13:22 [ТС]
	Так из обычно таблицы удаляет, но проблема в том что я выбираю пункт из DBGrid, а в нем же запрос. Есть таблица и запрос, в запросе на 2 поля больше, можно ли как то при выборе пункта в DBGrid (с запросом) удалять соответствующее поле в таблице? 0

@D1973 Модератор 9917 / 6454 / 2455 Регистрация: 21.01.2014 Сообщений: 27,389 Записей в блоге: 3
	02.12.2017, 13:59
	ДБГрид только отображает тот набор данных, которые Вы получаете запросом. Как там может быть "на 2 поля больше"? Если Вам не нужны эти два поля для вывода, то есть два пути: 1. Выбирайте только нужные поля из таблицы БД 2. Делайте динамический набор столбцов ДБГрида в соответствии с количеством полей запроса 0

@Stifler135 1 / 1 / 0 Регистрация: 07.03.2017 Сообщений: 34
	02.12.2017, 14:10 [ТС]
	Есть таблица(Discussion) и запрос(Discussion2). DBGrid подключен к запросу(Discussion2) т.е. при удалении я выбираю в нем строку из запроса, а удалить мне нужно строку из таблицы(Discussion), ибо из запроса удалить нельзя. Как реализовать что при выборе строки в гриде с запросом(Discussion2), выбиралась и строка в таблице(Discussion). Таблиц(Discussion)а так же подключена к проету. Миниатюры 0

@Stifler135 1 / 1 / 0 Регистрация: 07.03.2017 Сообщений: 34
	04.12.2017, 15:32 [ТС]
	Как это сделать? SQL Запросом? 0

@kavasaka W 115 / 115 / 33 Регистрация: 16.04.2013 Сообщений: 750
	04.12.2017, 16:17
	Да. 0

@Stifler135 1 / 1 / 0 Регистрация: 07.03.2017 Сообщений: 34
	04.12.2017, 16:19 [ТС]
	Можете подсказать пример запроса 0

@Stifler135 1 / 1 / 0 Регистрация: 07.03.2017 Сообщений: 34
	04.12.2017, 17:53 [ТС]
	Все заработало, большое вам спасибо. 0

Удаление записей в таблице Delphi

Решение