---|Ветка была без названия|---

← →
Ч (2003-01-17 19:49) [0]

Скажите пож-та, где в каком событии и компоненте можно перехватить нажатие, например, Ctrl-Del в гриде и отменить действие? Только кеуdown?

← →
TTCustomDelphiMaster © (2003-01-17 20:13) [1]

TDataSet.BeforeDelete

← →
Ч (2003-01-17 20:16) [2]

Но запись все равно удаляется, не удается сделать отмену в BeforeDelete!

← →
Anatoly Podgoretsky © (2003-01-17 20:26) [3]

А ты там что нибудь написал?

← →
Ч (2003-01-17 20:38) [4]

честно говоря, даже не знаю, что писать. Попроб. DataSet.Cancel - не помогает :(

← →
mike-d © (2003-01-17 20:56) [5]

> Попроб. DataSet.Cancel - не помогает :(

и не поможет.
Abort - вот это поможет!

← →
gsu © (2003-01-17 20:56) [6]

или презерватив (-:|~

← →
Ч (2003-01-17 20:59) [7]

Мерси :((( Хорошие советы для девушки

← →
mike-d © (2003-01-18 14:03) [8]

Пример:

uses SysUtils;

...

TForm1.Table1BeforeDelete(DataSet: TDataSet);
begin
Abort;
end;

Описание:
Заканчивает текущий процесс без сообщения об ошибке.
Если это плохо понятно, то - HELP и найди там "Abort procedure"

2 gsu © (17.01.03 20:56)
Оно конечно весело поприкалываться над начинающими. Собственное Я так и прет. Если бы еще и совет умный давал, то цены бы тебе не было.

>> mike-d ©
я и сам начинающий, а ответ я бы мог дать, конечно с потугами, но он уже был даден до мя, а вот зачем ты его переписал еще раз ?

Самое простое - это определить TActionList, туда добавить акции
Action1, Action2,.., которым назначить ShortCut`ы: Ctrl+Del, Ctrl+Ins и т.д. В обработчиках же акций написать код, ответственный за удаление, вставку и т.д. в зависимости от контекста датасета и грида. Например, если удаление (вставка) в данном аспекте не нужны, присвоить этим экшинам Enable=false. Можно положить в контрольную панель соотв.кнопки, пункты Гл. и PopUp-меню, которым назначить эти акции и таким образом контекстно активировать/деактивировать те или иные действия с НД так, как это надо из бизнес-логики приложения.

---|Ветка была без названия|--- Найти похожие ветки