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

Вниз

CTRL+C и Shift+Ins   Найти похожие ветки 

 
Gnom   (2002-05-10 20:34) [0]

Нужно делать копирование из буффера в RichEdit без учета разметки (читсый текст). Как это сделать - понятно - Richedit1.Perform(EM_PASTESPECIAL, Clipboard.Formats[4], 0);
Но теперь хочется, чтоб и вставка по стандартным сочетаниям Ctrl+C и Shift+Ins делала тоже самое.
Делаю событие для RichEdit-a onKeyDown. В его обработчике проверяю что за клавиша(и) нажаты :
If ((shift=[ssCtrl]) and (key=67)) or ((shift=[ssShift]) and (key=45)) then begin
...
но с удивлением обнаруживаю, что Ctrl+C вставляет так как мне надо, а Shift+Ins - как и раньше - вместе с разметкой...
Сначала было подумал что напутал с кодами клавиш, но нет - если после Begin стоит что то еще, то оно при нажатии Shift+Ins выполняется , т.е. условие выполнено...


 
evgeg   (2002-05-10 21:06) [1]

А Key := 0 делаете?


 
Gnom   (2002-05-10 21:31) [2]

Спасибо, это помогло!!!
Вот уж действительно - век живи, век RTFM :-))
Хотя по-моему удивительно, что для Ctrl+C этого не надо, а для Shift+INS необходимо...



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

Форум: "Основная";
Текущий архив: 2002.05.23;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.006 c
1-73210
oomneeq
2002-05-14 14:52
2002.05.23
Противоречие .....


1-73275
Vladislav
2002-05-07 09:44
2002.05.23
Локализация приложения


1-73114
Anton_a
2002-05-12 16:00
2002.05.23
ini


4-73445
Keymaster
2002-03-21 23:35
2002.05.23
Журнал программ


1-73235
Дмитрий К.
2002-05-14 13:33
2002.05.23
Добавление записи в реестр





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский