Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / DBNavigator+своя хранимка на удаление / 9 сообщений из 9, страница 1 из 1
29.03.2011, 09:40
    #37187086
дельфист-экстремал
дельфист-экстремал
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
есть дб-нафигатор
нужно удалять хранимкой.
а эта сволочь удаляет напрямую.
как повесить на него хранимку, а стандартный query.delete отключить?

заранее говорю, варианты: писать свой нафигатор, или городить массу кнопочек на панели - желательно обойтись без этих вариантов.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2011, 09:58
    #37187118
Кто-то уже как бэ
Кто-то уже как бэ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
использовать триггер, не? %)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2011, 10:01
    #37187125
дельфист-экстремал
дельфист-экстремал
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
вообщем, справился. может быть кому-то и пригодица
идея такая:
на BeforeAction нафигатора повесить такой код:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
 procedure  BeforeAction(бла-бла-бла...)
 begin 
   case  Button  of 
     // ... код для вставки и других действий 
    nbDelete:  begin 
      вызов_хранимки_на_удаление();
      Abort;  // а вот эта штуковина отменит функционал грида 
     end ;
   end ;
 end ;

код onClick не обрабатывать.

да и кстати. если не хотите чтобы нафигатор выдавал сообщение
Код: plaintext
"delete record, Y/N"
- то отключите у него свойство ConfirmDelete

триггер не нужен, из-за такой фигни писать триггер, вы чево?)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2011, 10:01
    #37187126
Tactical Nuclear Penguin
Tactical Nuclear Penguin
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
дельфист-экстремалесть дб-нафигатор
нужно удалять хранимкой.
а эта сволочь удаляет напрямую.
как повесить на него хранимку, а стандартный query.delete отключить?

заранее говорю, варианты: писать свой нафигатор, или городить массу кнопочек на панели - желательно обойтись без этих вариантов.

например так:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
 procedure  TForm1.DBNavigator1BeforeAction(Sender: TObject;
  Button: TNavigateBtn);
 begin 
   if  Button = nbDelete  then 
   begin 
    ShowMessage('Нееее, удалять будем через процедуру!');
     //тут удаляем через процедуру 
    Abort;
   end ;
 end ;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2011, 10:04
    #37187138
pit_alex
pit_alex
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
дельфист-экстремал,

У многих комонент есть свойство SQLDelete куда можно прописать свой код на удаление
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2011, 10:05
    #37187143
roschinspb
roschinspb
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
дельфист-экстремалесть дб-нафигатор
нужно удалять хранимкой.
а эта сволочь удаляет напрямую.
как повесить на него хранимку, а стандартный query.delete отключить?

заранее говорю, варианты: писать свой нафигатор, или городить массу кнопочек на панели - желательно обойтись без этих вариантов. Потомучто не надо на навигатор ни чего вешать.
Есть компонент TUpdateSQL, у него есть 3 свойства в которых задаёте запросы на удаление, вставку, изменение. Другой вариант: повесить обработчик на событие onBeforeDelete или onAfterDelete.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2011, 10:08
    #37187155
roschinspb
roschinspb
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
дельфист-экстремалвообщем, справился. может быть кому-то и пригодица
идея такая: ...
Здесь будет более уместно
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.03.2011, 10:09
    #37187159
SQLap
SQLap
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
но лучше всего все-таки использовать триггер.
Нет гарантий, что какой-нибудь чел не попробует давить кнопку в дб-нафигаторе какой-нибудь сторонней (а не твоей) программы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
15.06.2019, 16:33
    #39826842
Elmurod
Elmurod
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DBNavigator+своя хранимка на удаление
procedure TDM.ClientDataSet1AfterDelete(DataSet: TDataSet);
begin
ClientDataSet1.CancelUpdates;
end;

procedure TDM.ClientDataSet1BeforeDelete(DataSet: TDataSet);
begin
ClientDataSet1.CancelUpdates;
end;

ВОТ решения!!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / DBNavigator+своя хранимка на удаление / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 314ms
Закрыть
start [/forum/topic.php?fid=58&mobile=1&tid=2039372]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 48ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 31ms
get tp. blocked users:
 1ms
others: 199ms
total:  314ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]