Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.25;
Скачать: CL | DM;

Вниз

Вопрос по удалению из БД   Найти похожие ветки 

 
DimonS ©   (2005-12-09 05:37) [0]

Добрый день всем. Вопрос, может, и не совсем по теме. Есть DBGridEh. ReadOnly=false, т. к нужно разрешить редактирование записей. Но мне нужно запретить удаление записей, т. е. по нажатию кнопок Ctr+Del. Как можно сделать? Если отловить нажатие клавиш, то как? Пишу в BeforeDelete:

if (key=vk_delete) and (key=vk_control) then exit;

Но ничего не происходит. Может как-то по-другому надо? Редактировать в отдельной форме проблематично - в таблице ок. 50 столбцов, просто код большой нужен будет, да и форма сильно загружена.


 
DimonS ©   (2005-12-09 05:39) [1]

Да, добавление. Это нужно для того, чтобы запись не удалялась физически, а просто в графе Status менялось значение.


 
Ильш ©   (2005-12-09 05:59) [2]

а может лутше повесить на KeyPress  ??? ;)


 
DimonS ©   (2005-12-09 06:44) [3]

Хм..
Тогда выходит ошибка:

Incompatible types

я так понимаю, что вместо vk_delete и vk_control нужны коды клавиш?


 
sniknik ©   (2005-12-09 08:36) [4]

надо пересмотреть условие, одна переменная не может одновременно быть равна двум разным значениям. ловить в onKeyDown, и вместо выхода присваивать клавише 0.


 
DimonS ©   (2005-12-09 10:05) [5]

Вопрос снят. Просто отловил клавишу Delete и все.


 
Sergey13 ©   (2005-12-09 10:12) [6]

2[5] DimonS ©   (09.12.05 10:05)
> Просто отловил клавишу Delete и все.
А при редактировании поля она работает?
Почему нельзя запретить удаление на уровне датасета?
В ЕхГриде есть свойство AllowedOperations там есть alopDeleteEh - не оно надо было?


 
Sandman29 ©   (2005-12-09 10:24) [7]

В BeforeDelete нужно написать Abort.


 
DimonS ©   (2005-12-09 10:56) [8]

Спасибо за ответы, в понедельник попробую, а то рабочий дэн закончился уже )))



Страницы: 1 вся ветка

Текущий архив: 2005.12.25;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.042 c
1-1132991191
thely
2005-11-26 10:46
2005.12.25
Delphi & PDF


2-1133953074
novice
2005-12-07 13:57
2005.12.25
Запуск приложения с ключом


2-1133759989
Gem
2005-12-05 08:19
2005.12.25
Определение реального текущего номера записи таблицы


2-1133856902
Alex7
2005-12-06 11:15
2005.12.25
операция "in"


2-1134098399
DDDeN
2005-12-09 06:19
2005.12.25
Рисование на TImage.Canvas