Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.01.16;
Скачать: [xml.tar.bz2];

Вниз

DBGrid   Найти похожие ветки 

 
NickNaz   (2003-12-19 12:34) [0]

Добрый день!
У менея такой вопрос: в DbGrid-е при нажатии на комбинацию клавиш Ctrl+Delete удаляется запись. Как можно исключить это, либо перехватить (по тому, что на удаление у меня свой код).
Спасибо.


 
Johnmen   (2003-12-19 12:44) [1]

OnKeyDown


 
NickNaz   (2003-12-19 12:48) [2]

Благодарю


 
NickNaz   (2003-12-19 13:51) [3]

Johnmen © (19.12.03 12:44) [1]

Это событие возникает при нажатии на любую клавишу, как проверить нажатие на комбинации клавиш Ctrl+Delete?


 
gek   (2003-12-19 13:57) [4]

case key of
VK_ESCAPE : if(ssShift in Shift)then ...


 
Anatoly Podgoretsky   (2003-12-19 14:02) [5]

BeforeDelete


 
Johnmen   (2003-12-19 14:03) [6]

if (Key = VK_DELETE) and (ssCtrl in Shift) then


 
NickNaz   (2003-12-19 14:23) [7]

Johnmen © (19.12.03 14:03) [6]

Хорошо, но при этом выдает сообщение "Delete record?", а я и борюсь чтоб Delphi не выдовал этого сообщения.


 
gek   (2003-12-19 14:28) [8]

ConfirmDelete:=false


 
Johnmen   (2003-12-19 14:31) [9]

if (Key = VK_DELETE) and (ssCtrl in Shift) then begin;
<...делаешь свои дела...:)>
Key:=0;
end;


 
NickNaz   (2003-12-19 14:40) [10]

gek © (19.12.03 14:28) [8]

При этом Delphi не покажет сообщения, но запись все равно удалит!


 
NickNaz   (2003-12-19 14:41) [11]

Johnmen © (19.12.03 14:31) [9]

Все good. Спасибо


 
dtm   (2003-12-19 15:29) [12]

А ReadOnly свойство для чего?



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

Форум: "Базы";
Текущий архив: 2004.01.16;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.01 c
1-49546
Noname
2004-01-06 11:11
2004.01.16
Combobox


1-49576
Lt
2004-01-05 09:00
2004.01.16
Переменные и TEdit


1-49550
Adil Aliyev
2004-01-01 02:44
2004.01.16
Иконка файла


14-49757
Officeman
2003-12-26 12:40
2004.01.16
что нового в DELPHi 7 ??


3-49466
GIL
2003-12-17 16:32
2004.01.16
БД в OEM





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский