Удаление выбранной записи из таблицы

@L.I.Vladislav · Регистрация: 03.03.2011

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

Нашел на форуме способ удаления, и вроде бы он рабочий:

C++
1
2
3
String del=Form1->DBGrid2->SelectedField->AsString;
String f=Form1->DBGrid2->SelectedField->FieldName;
String sql="DELETE from Country WHERE "+f+"="+del+"";

Но вот у меня ничего непроисходит, даже ошибку не выдает (таблица обновляется по нажатию кнопки

C++
1
2
ADOTable2->Active=false;
ADOTable2->Active=true;

)
Работаю в 6-м билдере.
Я так понял оно находит выбранную запись и запросом ее удалят, но не удаляет почему-то. Обьясните мне плугу пожалуйста что не так. =)

@Sasha · 10.05.2011, 01:06

Сообщение от L.I.Vladislav

Нашел на форуме способ удаления, и вроде бы он рабочий:

Где ты его нашёл? Скинь ссылку

@L.I.Vladislav · 10.05.2011, 01:08 **[ТС]**

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

Где ты его нашёл? Скинь ссылку

https://www.cyberforum.ru/cpp-... page2.html

@Sasha · 10.05.2011, 01:24

Я тебе могу предложить как я делаю

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
 if(MainForm->ADOQuery1->RecordCount !=0)
     {
         AnsiString ds = "Вы деиствительно хотите удалить выбранную строку? \n\n" + IntToStr(ADOQuery1->FieldByName("Invent_Number")->AsInteger)+" - "+ADOQuery1->FieldByName("Number_in_Lan")->AsString+" - "+ADOQuery1->FieldByName("Department")->AsString+" - "+ADOQuery1->FieldByName("Processor")->AsString+" - "+ADOQuery1->FieldByName("Memory")->AsString+" - "+ADOQuery1->FieldByName("HDD")->AsString+" - "+ADOQuery1->FieldByName("Room")->AsString;
     if (Application->MessageBox(ds.c_str(),"Подтверждение удаления строки из базы данных",MB_YESNO +MB_TOPMOST+ MB_ICONQUESTION)!=IDYES)
     {
         Abort();
     }
     else
 
      if(DBGrid1->SelectedRows->Count > 0)
     {
         ADOQuery1->DisableControls();
         int curItem = ADOQuery1->RecNo;
         ADOQuery1->First();
         while(!ADOQuery1->Eof)
     {
     if(DBGrid1->SelectedRows->CurrentRowSelected)
     {
         ADOQuery1->Delete();
     }
    else
     {
         ADOQuery1->Next();
     }
     }
        DBGrid1->SelectedRows->Clear();
        if(ADOQuery1->RecordCount > 0)
     {
        if(curItem > ADOQuery1->RecordCount)
     {
        ADOQuery1->Last();
     }
    else
    {
        ADOQuery1->RecNo = curItem;
        DBGrid1->SelectedRows->CurrentRowSelected = true;
    }
    }
     ADOQuery1->EnableControls();
    }

Добавлено через 9 минут
Кстати ответ на твой вопрос вот здесь в самом низу

Добавление записи в таблицу

@L.I.Vladislav · 10.05.2011, 02:28 **[ТС]**

Спасибо, работает так =)

C++
1
2
3
ADOTable2->Delete();
ADOTable2->Active=false;
ADOTable2->Active=true;

Добавлено через 12 минут
Немогу разобратся с вот этим запросом на удаление

C++
1
2
3
4
f(MainForm->ADOQuery1->RecordCount !=0)
     {
         AnsiString ds = "Вы деиствительно хотите удалить выбранную строку? \n\n" + IntToStr(ADOQuery1->FieldByName("Invent_Number")->AsInteger)+" - "+ADOQuery1->FieldByName("Number_in_Lan")->AsString+" - "+ADOQuery1->FieldByName("Department")->AsString+" - "+ADOQuery1->FieldByName("Processor")->AsString+" - "+ADOQuery1->FieldByName("Memory")->AsString+" - "+ADOQuery1->FieldByName("HDD")->AsString+" - "+ADOQuery1->FieldByName("Room")->AsString;
     if (Application->MessageBox(ds.c_str(),"Подтверждение удаления строки из базы данных",MB_YESNO +MB_TOPMOST+ MB_ICONQUESTION)!=IDYES)

Выдает: ADOQuery1:cannot perform this operation on a closed dataset

@Sasha · 10.05.2011, 09:20

А у тебя на форме ADOQuery1 есть?

@MsGuns · 10.05.2011, 10:20

А зачем ему ADOQuery1, если он удаляет запись методами TADOTable ?

@Sasha · 10.05.2011, 10:28

Сообщение от L.I.Vladislav

Выдает: ADOQuery1:cannot perform this operation on a closed dataset

Не чувствуется по ошибке, что он работает с ADOTable

@MsGuns · 10.05.2011, 10:37

Перечитай [5] (первый фрагмент)

Добавлено через 4 минуты
Похоже, что он запутался в "набросанных" компонентах. Отображает, очевидно, через TADOTable, а менять (удалять) хочет через квери. А потом удивляется, что в сетке все без изменений.
Затем сообразил, что удалять можно непосредственно через TADOTable->Delete, но кверик все равно оставил зачем-то, при этом еще пытается определить число записей при том, что этот кверик открыт не был.

@Sasha · 10.05.2011, 10:42

MsGuns, да ты прав вот поетому я унего и спросил о существовании самого компонента ADOQuery на форме.

Наверно человек бездумно перекопировал код и хочет из него, что-то получить

@L.I.Vladislav · 10.05.2011, 13:17 **[ТС]**

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

MsGuns, да ты прав вот поетому я унего и спросил о существовании самого компонента ADOQuery на форме.

Наверно человек бездумно перекопировал код и хочет из него, что-то получить

Квери на форме есть, я через него подключал базу, да код я копирнул, но абсолютно не бездумно, я прописал свои компоненты, формы, названия полей и т.д. Впрочем спасибо и на том. Да и квери у меня на форме для запросов поиска и добавления записи в таблицу.

@MsGuns · 10.05.2011, 14:31

>Да и квери у меня на форме для запросов поиска и добавления записи в таблицу.

Это правильно. Использовать для выборок один компонент, а для внесения изменений - другой - это абсолютно верный и, ИМХО, более надежный и "прозрачный" метод, чем "табличный" (все - через XXTable).
Но !
Зачем Вы вообще используете XXTable ? Почему не заменили его на TADODataSet, более концептуально походящий и, главное, куда более гибкий ?

@L.I.Vladislav · 10.05.2011, 14:38 **[ТС]**

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

>Да и квери у меня на форме для запросов поиска и добавления записи в таблицу.

Это правильно. Использовать для выборок один компонент, а для внесения изменений - другой - это абсолютно верный и, ИМХО, более надежный и "прозрачный" метод, чем "табличный" (все - через XXTable).
Но !
Зачем Вы вообще используете XXTable ? Почему не заменили его на TADODataSet, более концептуально походящий и, главное, куда более гибкий ?

Ну Table был вбит мне в голову преподом, а датасет даже непробовал еще, так что спасибо буду пробовать =)

Новые блоги и статьи Все статьи Все блоги /
Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	10.05.2011, 09:20
	А у тебя на форме ADOQuery1 есть? 0

@MsGuns 1497 / 1238 / 245 Регистрация: 04.04.2011 Сообщений: 4,363
	10.05.2011, 10:20
	А зачем ему ADOQuery1, если он удаляет запись методами TADOTable ? 0

@MsGuns 1497 / 1238 / 245 Регистрация: 04.04.2011 Сообщений: 4,363
	10.05.2011, 10:37
	Перечитай [5] (первый фрагмент) Добавлено через 4 минуты Похоже, что он запутался в "набросанных" компонентах. Отображает, очевидно, через TADOTable, а менять (удалять) хочет через квери. А потом удивляется, что в сетке все без изменений. Затем сообразил, что удалять можно непосредственно через TADOTable->Delete, но кверик все равно оставил зачем-то, при этом еще пытается определить число записей при том, что этот кверик открыт не был. 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	10.05.2011, 10:42
	MsGuns, да ты прав вот поетому я унего и спросил о существовании самого компонента ADOQuery на форме. Наверно человек бездумно перекопировал код и хочет из него, что-то получить 0

@MsGuns 1497 / 1238 / 245 Регистрация: 04.04.2011 Сообщений: 4,363
	10.05.2011, 14:31
	>Да и квери у меня на форме для запросов поиска и добавления записи в таблицу. Это правильно. Использовать для выборок один компонент, а для внесения изменений - другой - это абсолютно верный и, ИМХО, более надежный и "прозрачный" метод, чем "табличный" (все - через XXTable). Но ! Зачем Вы вообще используете XXTable ? Почему не заменили его на TADODataSet, более концептуально походящий и, главное, куда более гибкий ? 1