Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Работа с TQuery, Запрос на удаление (ред.) текущей записи 
:(
    Опции темы
Akella
Дата 14.6.2009, 14:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329



Цитата(Данкинг @  14.6.2009,  11:30 Найти цитируемый пост)
Цитата(Anastazi25252525 @  14.6.2009,  04:16 Найти цитируемый пост)
СУБД - Delphi 7

Не знаю такой СУБД. smile Видимо, "йа блондинко". (с) smile

 smile 
PM MAIL   Вверх
Anastazi25252525
Дата 14.6.2009, 23:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 15
Регистрация: 13.6.2009

Репутация: нет
Всего: нет



забыть вот вряд ли получится... да и изучать поздно. защита завтра уже. а тот "страшный код" выбирает нужные для удаления записи. необходимо соблюдение 4х условий. три из коротых должны совпадать с другой таблицей. сначала какой должен цикл идти? С запросом из Квери, или с таблицей1?
PM MAIL   Вверх
Anastazi25252525
Дата 27.10.2009, 14:54 (ссылка)  | (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 15
Регистрация: 13.6.2009

Репутация: нет
Всего: нет



забыла написать, чем дело кончилось....
всё оказалось намного проще ))))

Код

Table1.First;
for i:=1 to Table1.RecordCount do
begin
if Table1Sostoyanie.Value='Заказано' then
Table1.Delete;
Table1.Next;

PM MAIL   Вверх
morpheyushka
Дата 27.10.2009, 16:30 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Зеленый человек
**


Профиль
Группа: Участник
Сообщений: 563
Регистрация: 26.2.2008
Где: Киев

Репутация: нет
Всего: 8



Может все таки это "йа блондинко", но до меня так и не доходит...почему нельзя все это сделать одним запросом к базе через Query...зачем таблицы гонять туда-сюда? А если в таблице записей под миллион...это же повеситься можно smile 


--------------------
user posted image
Спасибо делается вот так!!!
PM MAIL WWW   Вверх
Данкинг
Дата 27.10.2009, 16:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Yersinia pestis
****


Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 35
Всего: 130



Цитата(Anastazi25252525 @  27.10.2009,  14:54 Найти цитируемый пост)
забыла написать, чем дело кончилось....

Я вообще забыл, чем оно начиналось. smile 

Цитата(morpheyushka @  27.10.2009,  16:30 Найти цитируемый пост)
Может все таки это "йа блондинко", но до меня так и не доходит...почему нельзя все это сделать одним запросом к базе через Query...зачем таблицы гонять туда-сюда?

Значит, ты не блондинко. smile Я вот тоже не понимаю. smile 

Anastazi25252525,  есть такой SQL-запрос (в общем виде):
Код

delete from table where Sostoyanie='Заказано'

 smile 


--------------------
There's nothing left but silent epitaphs.
PM MAIL WWW   Вверх
Akella
Дата 27.10.2009, 20:12 (ссылка) |    (голосов:1) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329



Цитата(Anastazi25252525 @  27.10.2009,  14:54 Найти цитируемый пост)
Table1.First;
for i:=1 to Table1.RecordCount do
begin
if Table1Sostoyanie.Value='Заказано' then
Table1.Delete;
Table1.Next;


1. Удалять нужно с конца таблицы.
2. А лучше удалять SQL запросом
PM MAIL   Вверх
Anastazi25252525
Дата 29.10.2009, 20:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 15
Регистрация: 13.6.2009

Репутация: нет
Всего: нет



тут вообще такая сложная штука.... smile 
на форме в запущенном виде все данные отображаются в уже отсортированном(по трем параметрам) виде.
и при нажатии на кнопку с этой процедурой удаляются только те записи, которые = Заказано.  еще раз выполнять сортировку данных из 3х таблиц  по трем параметрам не нужно.... как-то так...

Добавлено через 4 минуты и 11 секунд
а запросом смысла нет удалять. т.к. пользователь сам решает, удалить ему эти заказанные билеты или нет...
вообще-то планировалось сделать это удаление с привязкой ко времени... то есть если до n-го времени осталось 15 минут, то программа автоматически удаляет эти самые места.... но решили не заморачиваться и сделать простой кнопкой, а на форме выставить часы, чтоб пользователь сам , глядя на время, удалял.... )))
PM MAIL   Вверх
Akella
Дата 30.10.2009, 14:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 29
Всего: 329



Цитата(Anastazi25252525 @  29.10.2009,  20:28 Найти цитируемый пост)
при нажатии на кнопку с этой процедурой удаляются только те записи, которые = Заказано. 

идеальный вариант запросом
Код

delete from tabke1 where status = 'Заказано'


Добавлено через 1 минуту и 15 секунд
Цитата(Anastazi25252525 @  29.10.2009,  20:28 Найти цитируемый пост)
 еще раз выполнять сортировку данных из 3х таблиц  по трем параметрам не нужно.... как-то так...

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

Это сообщение отредактировал(а) Akella - 30.10.2009, 14:08
PM MAIL   Вверх
Anastazi25252525
Дата 31.10.2009, 21:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 15
Регистрация: 13.6.2009

Репутация: нет
Всего: нет



то есть сделать запрос и на него кнопку?....
PM MAIL   Вверх
Страницы: (3) Все 1 2 [3] 
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи
  • Вопросы по SQL и вопросы по базам данных не связанные с Дельфи задавать здесь

FAQ раздела лежит здесь!


Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »


 




[ Время генерации скрипта: 0.2956 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.